Page 1 of 1

Tinker!!!

Posted: 2005-08-22 01:45:10
by DarkAngel
Нужен скрипт на тикер чтобы делал шестеренки и потом ее плавил....

Posted: 2005-08-22 18:41:29
by DarkAngel
Люди ну ПЖАЛУСТА помогите со скриптом!!!Очень просим!!!

Posted: 2005-08-22 18:44:59
by Leo

Code: Select all

sub Bottles() 
VAR eda = 0x097B
repeat
UO.UseSkill('Spirit')
wait (600)
uo.usetype(eda)
wait (300)
CheckLag()
UO.FindType('0x1BEF','0x0000','backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0000','0x400B29CD') ;serial sunduka s iron
UO.Grab('100','finditem')
wait(300)
Endif
CheckLag()
UO.Usetype('0x1EBC')
UO.WaitMenu('Tinkering','Tools','Tools','lockpick') #тут что делать будешь
wait (1000)
CheckLag()
UO.DeleteJournal()
while not (UO.InJournal("You put") or UO.InJournal("Tinkering failed"))
wait(300)
wend
UO.FindType('0x0F51',-1,'backpack') #Тип вещи, которую делаем (для плавки)
wait(500)
If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x402A765A) #форжа
Endif
wait(200)
until UO.Dead()
end sub

sub CheckLag()
   UO.DeleteJournal()
   UO.Click('backpack')
   repeat
      wait(50)
   until UO.InJournal('backpack')
   UO.DeleteJournal()
end sub

Posted: 2005-08-23 02:44:31
by DarkAngel
ПАСИБА люди добрые....