Скрипт на Cooking!

[Danik15]

Люди дайте пожалуйста скрипт на Cooking.Чар готовит рыбные стэки которые у него в бэкпаке на форже.Благодарю заранее.

[Leo]

Code: Select all

sub Cook() 
VAR Exit=0, LastTimer, TryToPoison 
uo.print('Выбери СУНДУК С Жратвой:') 
uo.exec('addobject Container') 
while uo.targeting() 
wait(100) 
wend 
uo.print('Выбери Жаровню:') 
uo.exec('addobject Forge') 
while uo.targeting() 
wait(100) 
wend      
while Exit<>1 
UO.DeleteJournal() 
UO.FindType('0x097B','0x0000','backpack'); 
If UO.GetQuantity('finditem')>200 Then 
UO.SetReceivingContainer('Container'); 
wait(1000) 
UO.Grab('all','finditem') 
wait(1000) 
UO.UnSetReceivingContainer() 
Endif 
UO.FindType('0x097A',-1,'backpack') ; 
If UO.GetQuantity('finditem')<2 then 
UO.FindType('0x097A','0x0000','Container') ; 
wait(1000) 
UO.Grab('300','finditem') 
wait(1000) 
Endif 
LastTimer=UO.Timer() 
UO.DeleteJournal() 
UO.FindType('0x097A','0x0000','backpack') 
UO.WaitTargetObject('Forge') 
UO.UseObject('finditem') 
wait(4000) 
CheckLag() 
If UO.InJournal("You burn") then 
repeat 
wait(100) 
until UO.Timer()>=LastTimer+100 
Else 
EndIf 
wend    
end sub 

sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 

   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub

[Danik15]

ЛЕО спасибо тебе за скрипты которые ты даёшь мне.
Вот ссылка тоже на скрипт на кукинг который я нашёл на форуме
viewtopic.php?p=27216

[Leo]

Ну если бы ты сказал, что в скрипте должен быть реконнектор и спирит спик, то я бы несомненно дал тебе ссылку на скрипт Асканели

[Askaneli]

ЛЕО спасибо тебе за скрипты которые ты даёшь мне.
Вот ссылка тоже на скрипт на кукинг который я нашёл на форуме
viewtopic.php?p=27216

А чё мне тады спасибо не говоришь ?

[Danik15]

Ну конечно тебе Askaneli тоже большое спасибо! Мне твои скрипты ещё пригодятся