sub main() 
var food='0x097B' # type of food for animal 
#var animals = "0x00CF"
#var animals_length = 3 
DIM animals[3] 
  animals[0] = '0x00DC'   ;Liama 
  animals[1] = '0x00C8'   ;Sheep 
  animals[2] = '0x00CC'   ;Horce 
var current_animals 
var staf='0x0DF0' # ID your taming staf 
var ms1="You fail to tame the creature." 
var ms2="It seems to accept you as master." 
var ms3="Your target is too far away from you." 
var ms4="You put the fish steakss in your pack." 
var k 
while not uo.dead() 
for animals = 0 to 3 
 uo.findtype(animals[current_animals],'-1','ground') 
 if uo.findcount()>0 then 
 k=uo.getserial('finditem') 
 uo.ignore('finditem') 
 uo.deletejournal() 
while not uo.injournal(ms4) 
 uo.findtype(food,'-1','backpack') 
 uo.moveitem('finditem','1',k) 
 wait(750) 
wend 
 repeat 
 wait(1000) 
 uo.deletejournal() 
 while not uo.injournal(ms2)OR uo.injournal(ms3) 
  uo.waittargetobject(k) 
  wait(50) 
  uo.usetype(staf) 
  uo.deletejournal() 
  repeat 
  wait(500) 
  until uo.injournal(ms1) or uo.injournal(ms2) 
 wend 
 uo.say("all release") 
 else 
  uo.ignorereset() 
 endif 
next 
wend 
endsub