[UOSteam] Taming Script

If you make a Client-side script you can publish it here for other players to use
Locked
Esk
Novice Scribe
Posts: 6
Joined: Wed Dec 21, 2016 11:02 pm

[UOSteam] Taming Script

Post by Esk »

This script works, I still may update this post later, as it stand, get close to the animal you'd like to tame.

Code: Select all

//Get next to a tameable, press your associated button, and enjoy.
if not listexists 'tameables'
  createlist 'tameables'
  pushlist 'tameables' 0x84 //Ki-Rin
  pushlist 'tameables' 0x7t //Hellcat (Large)
  pushlist 'tameables' 0x62 //Hellhound
  pushlist 'tameables' 0xbc //Savage Ridgeback
  pushlist 'tameables' 0xbb //Ridgeback
  pushlist 'tameables' 0x17 //Dire Wolf
  pushlist 'tameables' 0xce //Lava Lizard
  pushlist 'tameables' 0x14 //Frost spider
  pushlist 'tameables' 0xc9 //Hellcat (Small)
  pushlist 'tameables' 0xda //Frenzied Ostard
  pushlist 'tameables' 0x50 //Giant Toad
  pushlist 'tameables' 0xe8 //Bull
  pushlist 'tameables' 0xe9 //Bull2
  pushlist 'tameables' 0x22 //White Wolf
  pushlist 'tameables' 0x25 //White Wolf2
  pushlist 'tameables' 0x1c //Giant Spider
  pushlist 'tameables' 0xd4 //Grizzly Bear
  pushlist 'tameables' 0xea //Great Hart
  pushlist 'tameables' 0x41 //Snow leopard
  pushlist 'tameables' 0x40 //Snow leopard
  pushlist 'tameables' 0x19 //Gray wolf
  pushlist 'tameables' 0x1b //Gray wolf2
  pushlist 'tameables' 0x30 //Scorpion
  pushlist 'tameables' 0xca //Alligator
  pushlist 'tameables' 0x3f //Cougar
  pushlist 'tameables' 0xd6 //Panther
  pushlist 'tameables' 0xa7 //Brown Bear
  pushlist 'tameables' 0xdd //Walrus
  pushlist 'tameables' 0xd5 //Polar Bear
  pushlist 'tameables' 0xd3 //Black Bear
  pushlist 'tameables' 0xdc //Llama
  pushlist 'tameables' 0x124 //Pack Llama
  pushlist 'tameables' 0x123 //Pack Horse
  pushlist 'tameables' 0xc8 //Horse
  pushlist 'tameables' 0xe2 //Horse2
  pushlist 'tameables' 0xcc //Horse3
  pushlist 'tameables' 0xed //Giant Rat
  pushlist 'tameables' 0xdb //Forest Ostard
  pushlist 'tameables' 0xd2 //Desert Ostard
  pushlist 'tameables' 0x122 //Boar
  pushlist 'tameables' 0xe1 //Timber Wolf
  pushlist 'tameables' 0xed //Hind
  pushlist 'tameables' 0x51 //Bullfrog
endif
if not @inrange 'tobetamed' 2
  @unsetalias 'tobetamed'
  for 0 in 'tameables'
    if @findtype tameables[] 'any' 'ground' 1 2
      @setalias 'tobetamed' 'found'
      break
    endif
  endfor
endif
if not @inrange 'tobetamed' 10
  headmsg 'No new creatures near you!'
  stop
endif
useskill 'animal taming'
waitfortarget 15000
target! 'tobetamed'
headmsg "I'm being tamed!" 34 'tobetamed'
clearjournal
while not dead
  if @injournal 'It seems to accept you as master.' or @injournal 't even challenging'
    @rename 'tobetamed' 'Krimpd'
    waitforcontext 'tobetamed' 9 20000
    waitforgump 2426193729 15000
    replygump 0x909cc741 2
    @ignoreobject 'tobetamed'
    @unsetalias 'tobetamed'
    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
  else
    pause 400
    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
    endif
  endif
endwhile


Bennander
Passer by
Posts: 1
Joined: Mon Jan 16, 2017 11:36 am

Re: [UOSteam] Taming Script

Post by Bennander »

Works like a charm! Thanks!
Argyle
Apprentice Scribe
Posts: 13
Joined: Sun Jun 01, 2014 3:36 am

Re: [UOSteam] Taming Script

Post by Argyle »

could you maybe change this so that rather than changing the name of the mob it kills it? A killed mob will respawn, whereas a renamed one is useless to bod fillers.
Ingame char name is microcline
Esk
Novice Scribe
Posts: 6
Joined: Wed Dec 21, 2016 11:02 pm

Re: [UOSteam] Taming Script

Post by Esk »

It's easy enough to change, my thought regarding this script is to tame a single animal. I didn't want to automate it so that you could tame without being around. Changing the name signifies it's been tamed, and what you do after that. If more people would like this added, i can definitely do it or you are more than welcome to modify it.
Locked