UOGamers Community

This is a sample guest message. Register a free account today to become a member! Once signed in, you'll be able to participate on this site by adding your own topics and posts, as well as connect with other members through your own private inbox!

  • To obtain new Razor updates, please reinstall Razor from our new website.

UOsteam Fishing Macro.

kolbycrouch

Knight
Hello everyone. I used this a few months ago. It works pretty well, but I'll be testing it again to fix any minor issues.

This was modified from a polish script written by a friend.

You will need a knife, something like a skinning knife should do.

You will need GM magery and GM fishing.

This will keep pearls in your backpack. I'll change it soon to use a bag of sending.

Code:
if not @findobject 'knife'
  promptalias 'knife'
endif
if not listexists 'Fish'
  createlist 'Fish'
endif
if list 'Fish' == 0
  @pushlist 'Fish' 0x9cc
  @pushlist 'Fish' 0x9cd
  @pushlist 'Fish' 0x9ce
  @pushlist 'Fish' 0x9cf
endif
if not listexists 'Boots'
  createlist 'Boots'
endif
if list 'Boots' == 0
  @pushlist 'Boots' 0x170f
  @pushlist 'Boots' 0x170b
  @pushlist 'Boots' 0x1711
  @pushlist 'Boots' 0x170d
endif
if not listexists 'mobs'
  createlist 'mobs'
endif
if list 'mobs' == 0
  @pushlist 'mobs' 0x96
  @pushlist 'mobs' 0x4d
  @pushlist 'mobs' 0x10
endif
//////////////////////start
@clearjournal
msg 'forward'
pause 500
if @injournal 'is not moving' or @injournal 'stopped'
  pause 1000
  clearjournal
  msg 'backwards'
  pause 4000
  msg 'stop'
  pause 1000
  msg 'turn right'
  pause 1000
  msg 'turn right'
  pause 1000
  msg 'forward'
  pause 4000
  msg 'stop'
  pause 1000
  @clearjournal
endif
msg 'stop'
pause 500
clearjournal
while not @injournal 'biting here'
  ///////////////////Prepare Elemental
  if not @findtype 0x2006 'any' 'ground' 1 2
    clearignorelist
    while not followers > 1
      cast "Summon Earth Elemental"
      pause 4000
    endwhile
    if @findtype 0xe 'any' 'ground'
      @setalias 'tank' 'found'
    endif
  endif
  if @hits 'self' < maxhits 'self'
    cast "Greater Heal" 'self'
    pause 1000
  endif
  ///////////////////Adjust corpse alias
  if @findtype 0x2006 'any' 'ground' 1 2
    @setalias 'corpse' 'found'
  endif
  ///////////////////////////////////mobs
  for 0 to 'mobs'
    if @findtype mobs[] 'any' 'ground' 'any' 10
      pause 100
      @setalias 'serpent' 'found'
      msg 'stop'
      while not followers > 0
        while not mana == maxmana
        endwhile
        cast "Summon Earth Elemental"
        pause 3000
      endwhile
      if @findtype 0xe 'any' 'ground'
        @setalias 'tank' 'found'
      endif
      msg 'all guard me'
      while @findobject 'serpent'
        @canceltarget
        while not followers > 0
          while not mana == maxmana
          endwhile
          cast "Summon Earth Elemental"
          pause 3000
        endwhile
        if @hits 'tank' < maxhits 'tank'
          cast "Greater Heal" 'tank'
          pause 1000
        endif
        if @hits 'self' < maxhits 'self'
          cast "Greater Heal" 'self'
          pause 1000
        endif
      endwhile
    endif
  endfor
  ///////////////////Cast fishing pole
  turn 'east'
  @canceltarget
  @usetype 0xdbf 'any' 'backpack'
  waitfortarget 1500
  targettilerelative 'self' 3
  pause 9000
  /////////////Cut Fish
  if @findtype 0x9cc 'any' 'backpack'
    @useobject 'knife'
    waitfortarget 1500
    target! 'found'
    pause 600
  endif
  if @findtype 0x9cd 'any' 'backpack'
    @useobject 'knife'
    waitfortarget 1500
    target! 'found'
    pause 600
  endif
  if @findtype 0x9ce 'any' 'backpack'
    @useobject 'knife'
    waitfortarget 1500
    target! 'found'
    pause 600
  endif
  if @findtype 0x9cf 'any' 'backpack'
    @useobject 'knife'
    waitfortarget 1500
    target! 'found'
    pause 600
  endif
  /////////////Trash Steaks
  if @findobject 'corpse'
    @movetype 0x97a 'backpack' 'corpse'
    pause 800
  endif
  //////////////////Handle footwear
  if @findobject 'corpse'
    if @findtype 0x170f 0 'backpack'
      @movetype 0x170f 'backpack' 'corpse'
      pause 800
    endif
  endif
  if @findobject 'corpse'
    if @findtype 0x170d 0 'backpack'
      @movetype 0x170d 'backpack' 'corpse'
      pause 800
    endif
  endif
  if @findobject 'corpse'
    if @findtype 0x170b 0 'backpack'
      @movetype 0x170b 'backpack' 'corpse'
      pause 800
    endif
  endif
  if @findobject 'corpse'
    if @findtype 0x1711 0 'backpack'
      @movetype 0x1711 'backpack' 'corpse'
      pause 800
    endif
  endif
  //////////////////// Eat prized fish
  if @findtype 0xdd6 'any' 'backpack'
    @usetype 0xdd6 'any' 'backpack'
    pause 800
  endif
  //////////////////// Maintain health
  if @hits 'tank' < maxhits 'tank'
    cast "Greater Heal" 'tank'
    pause 1000
  endif
  if @hits 'self' < maxhits 'self'
    cast "Greater Heal" 'self'
    pause 1000
  endif
endwhile
@clearjournal
//////////////////forward
msg 'forward'
pause 1000
if @injournal 'is not moving' or @injournal 'stopped'
  pause 1000
  clearjournal
  msg 'backwards'
  pause 4000
  msg 'stop'
  pause 1000
  msg 'turn right'
  pause 1000
  msg 'turn right'
  pause 1000
  msg 'forward'
  pause 4000
  @clearjournal
endif
pause 7000
msg 'stop'
 

kolbycrouch

Knight
Thank you! Really appreciated.
If anyone uses it and the macro doesn't attempt fishing, check the item ID on the fishing pole, mine was different.
Was yours an npc bought pole?

Or was it crafted? I think the one I was using here was a crafted one.
 

suiris

Sorceror
Was yours an npc bought pole?

Or was it crafted? I think the one I was using here was a crafted one.
I don't really remember, this char was not used for more than a year and it had the pole in the backpack, i think it is the one you are given when creating a char with fishing.
 

Moltar

Traveler
FYI same issue here I started w a crafted fishing pole. To fix the issue I just placed the normal fishing pole I had in my bank into my backpack I had it from when I created this character and it worked great since. I did however try to replace w my id # from my fishing pole but wouldn't work and I wasn't sure if serial iD
Or the graphic Id is the one used is needed to be changed
 
Last edited:
Top