Карусель тем сервиса MYBB2.Ru
Ссылка на тему: http://ultimaonline.mybb2.ru/viewtopic.php?t=8

[code:1>sub Tinkering() var c while not uo

 
[code:1>sub Tinkering()
var c
while not uo.Dead()

uo.FindType(0x1BEF,0x0000,backpack)
if uo.GetQuantity(finditem)<=10 then

uo.FindType(0x0F0E,0x0000,backpack)
if uo.GetQuantity(finditem)>0 Then
uo.SetReceivingContainer(0x401AE0FB) ; Сундук куда батлы складываем
wait(1000)
uo.Grab(all,finditem)
wait(1000)
uo.UnSetReceivingContainer()
end if

uo.FindType(0x0E40,0x0000,0x400D7FA0) ; Сундук где айрон
wait(1000)
uo.Grab(500,finditem)
wait(1000)
end if

CheckLag()
uo.Exec("waitmenu Tinkering Jewelry Jewelry necklace")
uo.UseType(0x1EBC) ; Тинкер тулс
while not uo.InJournal("You put") and not uo.InJournal("Tinkering failed")
wait(300)
wend
wend
end sub

sub CheckLag()
uo.DeleteJournal()
uo.Click(backpack)
repeat
wait(50)
until uo.InJournal(backpack)
end sub
[/code:1>

Ссылка на тему: http://ultimaonline.mybb2.ru/viewtopic.php?t=8



Внимание! Если вы считаете, что темы с вашего форума не должны присутствовать в карусели тем или в карусели присутствует содержимое, нарушающее нормы общепринятой морали, либо действующего законодательства - напишите нам на abusereport@mybb2.ru
 

создать форум