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
sub ir()
uo.ignorereset()
end sub