Discussion in   Coding Corner   started     9 years ago   July 28, 2015, 01:47:20 PM   by   Riversilk

[UOSteam] Script for easy taming dragons and other difficult pets

Riversilk
Offline
31 Posts
Topic :   [UOSteam] Script for easy taming dragons and other difficult pets
9 years ago  July 28, 2015, 01:47:20 PM

This script is for easier taming of those monsters that have the bad habit of "being angry at you" when you try to tame them!
Using this script and selecting the monster you start trying to tame and re-try very fast if the monster enrages, till you finally start the tame well!

Enjoy

Code: [Select]
// Tamer Helper
// Tries to tame target with very fast tries
// so you can tame easier those monsters who enrage
// Author: Kyramir (UO Evolution)
promptalias 'PetToTame'
while findalias 'PetToTame'
  if not inrange 'PetToTame' 2
    headmsg '>CLOSER<' 28 'PetToTame'
  else
    @autotargetobject 'PetToTame'
    useskill 'Animal Taming'
    pause 200
    if @injournal 'You start to tame the creature'
      sysmsg 'Start taming' 28
      clearjournal
      while findalias 'PetToTame'
        if @injournal 'You fail to tame'
          sysmsg 'Taming failed' 28
          clearjournal
        endif
        if @injournal 'even challenging'
          sysmsg 'Taming successful!' 28
          stop
        endif
        if @injournal 'It seems to accept you as a master'
          sysmsg 'Taming successful!' 28
          stop
        endif
      endwhile
    endif
  endif
  pause 200
endwhile

Leighton
Offline
117 Posts
#1 Re :   [UOSteam] Script for easy taming dragons and other difficult pets
9 years ago  July 29, 2015, 04:08:32 AM

very nice kyramir, i wished u had joined EVO one year before as i started, very helpful your macros.


ty swift