sub Taming() var shrink='0x0F09' ; тип шринка (+) var Exit=0, i=0 DIM hr[3]
hr[0]='0x2121' ;тут я ввел тип зашринкованных лошадей hr[1]='0x20F6' hr[2]='0x00CC'
uo.print('Тотем') uo.exec('addobject TOT') while uo.targeting() wait(100) wend while Exit<>1 UO.DeleteJournal() UO.WaitTargetObject('TOT') UO.UseSkill('Animal Taming') repeat wait(1000) until UO.InJournal('You fail') OR UO.InJournal('It seems') If Uo.InJournal('It seems') Then wait(5000) ; пусть педали подбегут UO.FindType(shrink,'0x0388','backpack') ; где 0x0388-цвет шринка uo.moveitem('finditem',1,'TOT') wait(500)
for i=0 to 2 uo.findtype(hr[i],-1,'ground') if uo.findcount() then uo.grab('all','finditem') endif next uo.cast('Recall','0x40164DD0') ; runa Exit=1 wait(2000) ; На всякий случай, можно попробовать убрать Endif wend end sub
sub Taming() var shrink='0x0F09' ; тип шринка (+) var Exit=0, i=0 DIM hr[3]
hr[0]='0x2121' ;тут я ввел тип зашринкованных лошадей hr[1]='0x20F6' hr[2]='0x00CC'
uo.print('Тотем') uo.exec('addobject TOT') while uo.targeting() wait(100) wend while Exit<>1 UO.DeleteJournal() UO.WaitTargetObject('TOT') UO.UseSkill('Animal Taming') repeat wait(1000) until UO.InJournal('You fail') OR UO.InJournal('It seems') If Uo.InJournal('It seems') Then wait(5000) ; пусть педали подбегут uo.waittargetobject('TOT') UO.UseType(shrink,'0x0388') CheckLag() repeat wait(500)
for i=0 to 2 uo.findtype(hr[i],-1,'ground') if uo.findcount() then uo.moveitem('finditem',-1,'backpack') endif next uo.cast('Recall','0x40164DD0') ; runa Exit=1 wait(2000) ; На всякий случай, можно попробовать убрать Endif wend end sub
sub CheckLag() uo.DeleteJournal() uo.Click('backpack') repeat wait(50) until UO.InJournal('backpack') end sub