sub AnimalTaming() VAR animal = '0x00DC' # тип животного var COLanimal = '0x0000' # цвет животного uo.Set('finddistance', 8) Repeat uo.FindType(animal, COLanimal, 'ground') if uo.FindCount()>0 then uo.warmode(0) wait(500) UO.DeleteJournal() while not UO.InJournal('It seems|see the creature|already|rememb') UO.DeleteJournal() UO.WaitTargetObject('finditem') UO.Useskill('Animal Taming') repeat wait(100) until UO.InJournal('fail|It seems|already|rememb') or uo.GetX('finditem')==0 wait(500) wend If Uo.InJournal('It seems|already') Then uo.say('all come') uo.attack('finditem') repeat wait(100) until uo.dead() or uo.GetX('finditem')==0 uo.warmode(0) wait(500) endif endif wait(500) Until uo.Dead() end sub
Хм...а почему я должен брезговать Вашими скриптами пользоваться?)) на Антаресе не когда не играл, но скрипты всегда брал лобо с Еко либо с форума Антареса.....
sub AnimalTaming() VAR animal = '0x00DC' # тип животного var COLanimal = '0x0000' # цвет животного var body = ' ' # тут тип трупа uo.Set('finddistance', 8) Repeat uo.FindType(animal, COLanimal, 'ground') if uo.FindCount()>0 then uo.warmode(0) wait(500) UO.DeleteJournal() while not UO.InJournal('It seems|see the creature|already|rememb') UO.DeleteJournal() UO.WaitTargetObject('finditem') UO.Useskill('Animal Taming') repeat wait(100) until UO.InJournal('fail|It seems|already|rememb') or uo.GetX('finditem')==0 wait(500) wend If Uo.InJournal('It seems|already') Then uo.say('all come') uo.attack('finditem') repeat wait(100) until uo.dead() or uo.GetX('finditem')==0 uo.warmode(0) forensic() wait(500) endif endif wait(500) Until uo.Dead() end sub
sub forensic() var n, p uo.warmode(0) uo.disarm('arm') p=0 for n=0 to 5 uo.deletejournal() uo.waittargetground(body) uo.useskill('Forensic Evaluation') while not uo.injournal('stop|This is the|You can tell') wait(200) if p<15 then p=p+1 else uo.sayu('stop') uo.waittargetground(body) uo.useskill('Forensic Evaluation') p=0 endif wend p=0 wait(1500) next ir() end sub