durDom wrote:интересует скрипт на Item ID
смысл скрипта таков:
1 чар берёт один бинт из кучки
2 индефицирует его
3 убирает в другую кучу
(вроде нет ошибок)
Code: Select all
UO.UseObject(<ИД сумки, в которой есть свежие бинты>);
UO.UseObject(<ИД сумки для поюзанных бинтов>);
UO.FindType('0x1183',-1,'<ИД сумки, в которой есть свежие бинты>);
while UO.FindCount()
UO.MoveItem('finditem',1);
CheckLag()
UO.FindType('0x1183');
repeat
UO.DeleteJournal()
UO.UseSkill('ItemIdentification','finditem');
repeat
wait(100)
until UO.InJournal('***'); <- Сюда вставить ВСЕ сообщения, которые бывают после юзания ИтемИД
until UO.InJournal('***'); <- Сюда встаивть то сообщение, которое появляется после удачной идентификации
UO.MoveItem('finditem',0,'<ИД сумки для поюзанных бинтов>');
CheckLag();
UO.FindType('0x1183',-1,'<ИД сумки, в которой есть свежие бинты>);
wend
Code: Select all
sub Item()
UO.UseObject('0x7E0091E9')
VAR Sunduk = '0x7ECC0F4C'
VAR bint = '0x0E21'
VAR Kolvo = 1
UO.FindType( bint, -1, 1 )
UO.Grab( Str( Kolvo ), 'finditem' )
wait( 2000 )
If UO.FindCount() == 0 Then
UO.Print("нет бынтов )=")
return
Endif
uo.waittargettype('0x0E21')
uo.UseSkill('Item Identification')
wait (4000)
UO.MoveItem('finditem',0,'0x7E0091E9')
wend
end sub
.http://ultimasoft.ru/tools/codesweeper.php
durDom wrote:Code: Select all
sub Item()
UO.UseObject('0x7E0091E9')
VAR Sunduk = '0x7ECC0F4C'
VAR bint = '0x0E21'
VAR Kolvo = 1
UO.FindType( bint, -1, 1 )
UO.Grab( Str( Kolvo ), 'finditem' )
wait( 2000 )
If UO.FindCount() == 0 Then
UO.Print("нет бынтов )=")
return
Endif
uo.waittargettype('0x0E21')
uo.UseSkill('Item Identification')
wait (4000)
UO.MoveItem('finditem',0,'0x7E0091E9')
wend
end sub
всё вроде работает в этом скрипте но в конце выдаёт ошибку
Unhandled exception in parser
