Сюда вписывам полезные и не полезные макросы
0
Полезные макросы
Автор
Даййс
, фев 12 2012 02:39
Сообщений в теме: 6
#1
Отправлено 12 Февраль 2012 - 02:39
#2
Отправлено 12 Февраль 2012 - 03:00
Макрос обмена эмблем триумфа на эмблемы героизма
#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);
#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);
#3
Отправлено 12 Февраль 2012 - 03:34
Удаляет из сумок предметы "серого" качества
/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
/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
#4
Отправлено 12 Февраль 2012 - 02:57
Читатель (12 Февраль 2012 - 03:34 ) писал:
Удаляет из сумок предметы "серого" качества
/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
/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
Отправлено 13 Февраль 2012 - 12:43
Можно и на продажу. Если сам секретничаешь выложу я
/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
/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
Отправлено 13 Февраль 2012 - 12:52
Отправляет инвайт в ги таргету+можете что-то шепнуть
/ginvite
/run SendChatMessage("Тут Ваше
Сообщение", "WHISPER", nil, GetUnitName
("target"))
/ginvite
/run SendChatMessage("Тут Ваше
Сообщение", "WHISPER", nil, GetUnitName
("target"))
#7
Отправлено 13 Февраль 2012 - 12:57
Макрос для массового набора в гильду
/script n=GetNumWhoResults(); i=1; while(i<n
+1) do c,g=GetWhoInfo(i); if(g=="") then
GuildInvite©; end; i=i+1; end;
/script n=GetNumWhoResults(); i=1; while(i<n
+1) do c,g=GetWhoInfo(i); if(g=="") then
GuildInvite©; end; i=i+1; end;
Количество пользователей, читающих эту тему: 1
0 пользователей, 1 гостей, 0 анонимных