Рейтинг серверов World Of Warcraft

Jump to content


Photo

Полезные макросы


  • Please log in to reply
6 replies to this topic

#1 off Даййс

Даййс
  • Проходил мимо

  • 5 posts
Репутация: 0
Нейтральный

Автор темы Posted 12 February 2012 - 01:39 am

Сюда вписывам полезные и не полезные макросы

#2 off Some

Some
  • Новичок

  • 58 posts
Репутация: 5
Обычный

Posted 12 February 2012 - 02:00 am

Макрос обмена эмблем триумфа на эмблемы героизма #showtoltip Эмблема героизма /script local function buy (n,q) for i=1,30 do if n==GetMerchantItemInfo(i) then BuyMerchantItem(i,q) end end end buy ("Эмблема завоевания",1) buy ("Эмблема доблести",1) buy ("Эмблема героизма",1);
Изображение

Почетный мут за стеб лентяев (6.10)

#3 off Some

Some
  • Новичок

  • 58 posts
Репутация: 5
Обычный

Posted 12 February 2012 - 02:34 am

Удаляет из сумок предметы "серого" качества /script ClearCursor()local g,i,j,s,a,b=gsub;for i=0,4 do for j=1,GetContainerNumSlots(i)do s=GetContainerItemLink(i,j)if(s)then a,b,s=GetItemInfo(g(g(s,".* 124H",""),"124h.*",""))if(s==0)then PickupContainerItem(i,j)DeleteCursorItem ()end;end;end;end
Изображение

Почетный мут за стеб лентяев (6.10)

#4 off leadenmirk

leadenmirk
  • Пользователь

  • 130 posts
Репутация: 1
Обычный

Posted 12 February 2012 - 13:57 pm

Удаляет из сумок предметы "серого" качества
/script ClearCursor()local
g,i,j,s,a,b=gsub;for i=0,4 do for
j=1,GetContainerNumSlots(i)do
s=GetContainerItemLink(i,j)if(s)then
a,b,s=GetItemInfo(g(g(s,".*
124H",""),"124h.*",""))if(s==0)then
PickupContainerItem(i,j)DeleteCursorItem
()end;end;end;end

проще поставить макрос на продажу серого вендору
Изображение

#5 off Some

Some
  • Новичок

  • 58 posts
Репутация: 5
Обычный

Posted 12 February 2012 - 23:43 pm

Можно и на продажу. Если сам секретничаешь выложу я /script for bag = 0,4,1 do for slot = 1, GetContainerNumSlots(bag), 1 do local name = GetContainerItemLink (bag,slot); if name and string.find (name,"ff09d9d9d") then UseContainerItem (bag,slot) end; end;end
Изображение

Почетный мут за стеб лентяев (6.10)

#6 off Some

Some
  • Новичок

  • 58 posts
Репутация: 5
Обычный

Posted 12 February 2012 - 23:52 pm

Отправляет инвайт в ги таргету+можете что-то шепнуть

/ginvite
/run SendChatMessage("Тут Ваше
Сообщение
", "WHISPER", nil, GetUnitName
("target"))
Изображение

Почетный мут за стеб лентяев (6.10)

#7 off Some

Some
  • Новичок

  • 58 posts
Репутация: 5
Обычный

Posted 12 February 2012 - 23:57 pm

Макрос для массового набора в гильду /script n=GetNumWhoResults(); i=1; while(i<n +1) do c,g=GetWhoInfo(i); if(g=="") then GuildInvite©; end; i=i+1; end;
Изображение

Почетный мут за стеб лентяев (6.10)




1 user(s) are reading this topic

0 members, 1 guests, 0 anonymous users