Yoko

var fruit='0x0C77' ##Вид еды которую вы будете есть 
var food= '0x097B' ##Тип еды которой кормить живку
var Timer=UO.Timer() 
var Animal, Staff 

sub AnimalTaming() 
#¤Leo¤# 
UO.Msg('all release') 

UO.Print(Select Animal...') 
UO.Exec('addobject Animal') 
   while uo.Targeting() 
      wait(100) 
   wend 

UO.Print('Select Staff...') 
UO.Exec('addobject Staff') 
   while uo.Targeting() 
      wait(100) 
   wend 

UO.DeleteJournal() 
while not UO.InJournal('It seems') or not UO.InJournal('see the creature') 
   UO.DeleteJournal() 
   UO.WaitTargetObject('Animal')  
   UO.UseObject('Staff') 
      repeat
         wait(100) 
      until UO.InJournal('fail') or UO.InJournal('It seems') or UO.InJournal('see the creature') 
   if UO.Timer()>(Timer+1200) then 
      UO.SetReceivingContainer('Animal') 
         wait(500) 
      UO.FindType(fruit) 
         if UO.GetQuantity('finditem')>0 then 
            UO.Grab('5','finditem') 
               wait(500) 
         end if 
      UO.UnSetReceivingContainer('Animal') 
         wait(500) 
      UO.UseType(food) 
      Timer=UO.Timer() 
   end if 
UO.Msg('all release') 
wend
end sub 

   UO.DeleteJournal()
   UO.WaitTargetObject('Animal') 
   UO.UseObject('Staff') 

   UO.DeleteJournal()
   UO.WaitTargetObject('Animal') 
   UO.UseSkill('Anatomy') 
   UO.WaitTargetObject('Animal') 
   UO.UseObject('Staff') 

var fruit='0x0C77' ##Âèä åäû êîòîðóþ âû áóäåòå åñòü
var food= '0x097B' ##Òèï åäû êîòîðîé êîðìèòü æèâêó
var Timer=UO.Timer()
var Animal, Staff

sub AnimalTaming()
#¤Leo¤#
UO.Msg('all release')

UO.Print(Select Animal...')
UO.Exec('addobject Animal')
   while uo.Targeting()
      wait(100)
   wend

UO.Print('Select Staff...')
UO.Exec('addobject Staff')
   while uo.Targeting()
      wait(100)
   wend

UO.DeleteJournal()
while not UO.InJournal('It seems') or not UO.InJournal('see the creature')
 UO.DeleteJournal()
   UO.WaitTargetObject('Animal') 
   UO.UseSkill('Anatomy') 
   wait(2500) ;if anatomy dont fuck up taming then set wait(200) 
   UO.WaitTargetObject('Animal') 
   UO.UseObject('Staff')
      repeat
         wait(100)
      until UO.InJournal('fail') or UO.InJournal('It seems') or UO.InJournal('see the creature')
   if UO.Timer()>(Timer+1200) then
      UO.SetReceivingContainer('Animal')
         wait(500)
      UO.FindType(fruit)
         if UO.GetQuantity('finditem')>0 then
            UO.Grab('5','finditem')
               wait(500)
         end if
      UO.UnSetReceivingContainer('Animal')
         wait(500)
      UO.UseType(food)
      Timer=UO.Timer()
   end if
UO.Msg('all release')
wend
end sub