Сюда вписывам полезные и не полезные макросы
Полезные макросы
Started by Даййс, Feb 12 2012 01:39 am
6 replies to this topic
#2 off
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
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
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
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)
1 user(s) are reading this topic
0 members, 1 guests, 0 anonymous users