Перестает работать скрипт

[стимул]

Просто перестает работать и все тут... То есть функция запущена, а чар просто стоит и ничего не делает... Иногда через час, иногда через 10 минут. Помогите плиз.

Code: Select all

sub DarkTree() 
repeat 
UO.FindType('0x1BDD','0x047C','backpack') 
put: 
If UO.GetQuantity('finditem')<1 then 
UO.FindType('0x1BDD','0x096B','0x40223450') ;serial sunduka 
UO.Grab('1','finditem') 
wait(1000) 
Endif 
UO.FindType('0x1BDD','0x096B','backpack') 
If UO.GetQuantity('finditem')<1 then 
goto put
end if 
UO.WaittargetType('0x1BDD') 
UO.Usetype('0x0F51') 
UO.WaitMenu('What do you want to carve the wood into?','Dark Tree Items','Dark Tree Items','torch') 
wait (1000) 
UO.DeleteJournal() 
while not (UO.InJournal("You put") or UO.InJournal("You fail")) 
wait(300) 
wend 
UO.UnSetReceivingContainer() 
wait(200) 
until UO.Dead() 
end sub