[UOSTEAM] Quick Taming Macro
Posted: Mon Sep 17, 2018 7:27 pm
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.
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