Razor:Autotaming/en

This script will tame an animal until you own it.

Requirements

• Be close to animal
• The best is to follow it with ALT + click

Script

sysmsg 'Select creature you want to tame'
setvar! 'taming-target'

clearjournal 
unsetvar! 'taming-exit'
while not varexist 'taming-exit'
    say '.useskill animaltaming'
    waitfortarget 
    target 'taming-target'

    unsetvar! 'taming-waitexit'
    while not varexist! 'taming-waitexit'
        if insysmsg 'You successfully tame'
            setvar! 'taming-waitexit' 1
            setvar! 'taming-exit' 1
        endif
        if insysmsg 'That creature is too angry to continue taming'
            setvar! 'taming-waitexit' 1
            setvar! 'taming-exit' 1
        endif
        if insysmsg 'You seem to have upset the beast'
            setvar! 'taming-waitexit' 1
        endif
        if insysmsg 'You failed to tame the creature'
            setvar! 'taming-waitexit' 1
        endif
        wait 50
    endwhile
endwhile