[UOSTEAM] Quick Taming Macro

If you make a Client-side script you can publish it here for other players to use
Post Reply
Ghurdo
Apprentice Scribe
Posts: 10
Joined: Fri Aug 03, 2018 10:36 pm

[UOSTEAM] Quick Taming Macro

Post by Ghurdo »

This is a simple animal taming macro... simple target cursor, then it follows that creature attempting to tame it until it's tamed. No need to loop this one.

UPDATE: ...
I originally posted this macro immediately after making a small change and ended up "breaking" it. I was having an issue with it not allowing me to target the next mob after cancelling it. The idea with the change was to "fix" that. It ended up breaking the taming of Dragons and other Hostile creatures. I reverted that change and made a wrapper macro to call it. Let me post the updated code. Simply call the shorter macro and it will properly call the larger one. It once again works to tame dragons and other hostile creatures.

Code: Select all

// Tame
// wrapper for "Tame and Keep"
//
headmsg 'Tame What?' 48
promptalias 'tobetamed'
//
playmacro "Tame and Keep"

Code: Select all

// Tame and keep
//
if not findalias 'tobetamed'
  headmsg 'Tame What?' 48
  promptalias 'tobetamed'
endif
//
//
//
//
@clearjournal
@useskill 'animal taming'
waitfortarget 15000
target! 'tobetamed'
headmsg "I'm being tamed!" 34 "tobetamed"
while not dead
  if not @inrange 'tobetamed' 1
    if @x 'tobetamed' > x 'self' and @y 'tobetamed' > y 'self'
      walk 'Southeast'
    elseif @x 'tobetamed' < x 'self' and @y 'tobetamed' > y 'self'
      walk 'Southwest'
    elseif @x 'tobetamed' > x 'self' and @y 'tobetamed' < y 'self'
      walk 'Northeast'
    elseif @x 'tobetamed' < x 'self' and @y 'tobetamed' < y 'self'
      walk 'Northwest'
    elseif @x 'tobetamed' > x 'self' and @y 'tobetamed' == y 'self'
      walk 'East'
    elseif @x 'tobetamed' < x 'self' and @y 'tobetamed' == y 'self'
      walk 'West'
    elseif @x 'tobetamed' == x 'self' and @y 'tobetamed' > y 'self'
      walk 'South'
    elseif @x 'tobetamed' == x 'self' and @y 'tobetamed' < y 'self'
      walk 'North'
    endif
  elseif @injournal 'It seems to accept you as master.' or @injournal 't even challenging'
    pause 1000
    msg 'all follow me'
    @unsetalias 'tobetamed'
    stop
  elseif @injournal 'You seem to anger the beast'
    replay
  elseif @injournal 'too angry'
    // peace it
    headmsg 'peace it'
    replay
  elseif @injournal 'You must wait to perform another action'
    replay
  elseif @injournal 'You fail to tame the creature' or @injournal 'too far away'
    replay
  elseif @injournal 'You have no chance of taming this creature' or @injournal 'do not have a clear path to the animal'
    replay
  elseif @injournal 'This animal has had too many owners' or @injournal 'That animal looks tame already'
    @ignoreobject 'tobetamed'
    @unsetalias 'tobetamed'
    replay
  endif
endwhile
Post Reply