This script is for raising taming without all the hassle, walk up to the animal you wish to tame... Use the hot key you set for this script and target the animal. Script does the rest.. If it sees an enemy IE) if being used in fel it will simply recall away from any onscreen reds before they can attack you.
if not listexists 'alreadytamed'
createlist 'alreadytamed'
pushlist 'alreadytamed' '0x190'
endif
if not findalias 'tobetamed' or not @inrange 'tobetamed' 2
promptalias 'tobetamed' //this will later be automated
endif
for 0 in 'alreadytamed'
if serial alreadytamed[] == serial 'tobetamed' //Sorry, but silencing this breaks the script!
sysmsg "You've already tamed that sucker!"
playmacro 'RecallLikeTrammy'
endif
endfor
useskill 'animal taming'
waitfortarget 15000
target 'tobetamed'
clearjournal
while hits > 0
if @injournal 'It seems to accept you as master.' or @injournal "That wasn't even challenging"
waitforcontext 'tobetamed' 8 20000
waitforgump 0x909cc741 15000
@replygump 0x909cc741 2
pushlist 'alreadytamed' 'tobetamed'
@unsetalias 'tobetamed'
stop //playmacro 'RecallLikeTrammy'
elseif @injournal 'You fail to tame the creature' or @injournal 'That is too far way'
if @inrange 'tobetamed' 2
useskill 'animal taming'
waitfortarget 15000
target 'tobetamed'
clearjournal
else
playmacro 'RecallLikeTrammy'
endif
elseif @injournal 'You have no chance of taming this creature' or @injournal 'You are too far away to continue'
playmacro 'RecallLikeTrammy'
else
@getenemy 'criminal' 'enemy' 'gray' 'murderer' 'humanoid' 'random'
if @inrange 'enemy' 12
cast 'recall'
waitfortarget
target 'runebook'
unsetalias 'enemy'
else
pause 1000
endif
endwhile
