вот скриптик, но почему то он не фурычит! Указываю сундук, герой берёт 500 ингов и просто стоит. Подскажите пожалуйста в чём узкое место?
Code:
sub tinker()
uo.print('Покажи сундук с ингами')
uo.addobject('sunduk')
while uo.targeting()
wait(300)
wend
uo.useobject('sunduk')
wait(1000)
checklag()
VAR Ingi = '0x1BEF' ; Тип ингов
VAR Instrum = '0x1EBC' ; Тип инструмента тинкера
VAR Clock = '0x104F' ; Тип итема который будем изготовлять
zagruzka:
if not uo.count('0x1BEF','0x0000') then
UO.FindType( Ingi,'0x0000', 'sunduk' ) ; Ищем инги в сундуке
If UO.FindCount() Then
uo.moveitem('finditem','500','backpack')
wait(1000)
checklag()
else
uo.print('Инготы закончились!!!')
return
Endif
While UO.Count(Ingi,'0x0000') and uo.count(Instrum,'0x0000')
; Пока в паке есть инги
UO.Print('Ostalos ' + Str( UO.Count( Ingi,'0x0000' ) ) + ' ingots' )
UO.DeleteJournal()
UO.WaitMenu ('Tinkering', 'Tools', 'Tools', 'clock parts' )
UO.UseType( Instrum,'0x0000' )
repeat
wait(300)
until uo.injournal('You put|fail')
while uo.count(Clock,'0x0000')
UO.FindType( Clock,'0x0000','backpack' )
UO.MoveItem( 'finditem', '0', 'sunduk' )
wait( 1000 )
checklag()
UO.Print( 'Clock moved' )
wend
Wend
goto zagruzka
end sub
Sub Checklag()
deljournal('a backpack')
uo.click('backpack')
repeat
wait(50)
until uo.injournal('a backpack')
endsub
Sub deljournal(msg)
while uo.injournal(msg)
uo.setjournalline(uo.injournal(msg)-1,"")
wend
endsub