Tinker!!!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
DarkAngel
Posts: 9
Joined: 2005-07-18 15:39:22

Tinker!!!

Post by DarkAngel »

Нужен скрипт на тикер чтобы делал шестеренки и потом ее плавил....
DarkAngel
Posts: 9
Joined: 2005-07-18 15:39:22

Post by DarkAngel »

Люди ну ПЖАЛУСТА помогите со скриптом!!!Очень просим!!!
Leo
Expert!
Posts: 791
Joined: 2005-01-15 19:15:05
Location: Dragon World
Contact:

Post 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
DarkAngel
Posts: 9
Joined: 2005-07-18 15:39:22

Post by DarkAngel »

ПАСИБА люди добрые....
Post Reply