Need Taming Script

[aceyuo]

sorry if this is multiple post alrady for taming script but i do not understand other langguages..thanks no offense to others. can someone post a script for taming here =) thanks

[tEhfO]

Hi, this is a brazilian script for Taming with an item.
You can edit this to use the Skill or other itens, and you will have to edit the JOURNAL.

Code: Select all

sub Taming() 
 uo.usetype('0x20D1')
 uo.say("all Release")
 wait(500)
 uo.usetype('0x13F8')
 wait(1000)
uo.LClick(320,219)
 UO.DeleteJournal()
 While not UO.InJournal("aceitou") and not UO.InJournal("falhou") and not UO.InJournal("is already tame") 
   Wait(500) 
 If UO.InJournal("aceitou") then
wait(2000)
uo.say(",exec Taming")
  End If 
   If UO.InJournal("falhou") then
   uo.say(",exec TamingX")
End If   
 Wend 
End sub

sub TamingX()
    UO.WaitTargetLast()
    wait(700)
     uo.usetype('0x13F8')
      UO.DeleteJournal()
 While not UO.InJournal("aceitou") and not UO.InJournal("falhou") and not UO.InJournal("is already tame") 
   Wait(500) 
 If UO.InJournal("aceitou") then
wait(2000)
uo.say(",exec Taming")
  End If 
   If UO.InJournal("falhou") then
   uo.say(",exec TamingX")
End If   
 Wend 
End sub