Semi-AFK Fishing On Boat or Docks

//////////////////////////////////////////////////
//Attempts to fish in any nearby water. Face your//
//character towards the water and begin the macro.//
//This must be done on a boat, or britain docks!//
//////////////////////////////////////////////////
//You must set up an organizer for this to work. Be careful not to allow
//it to trash anything important. Organizer doesn't always descriminate
//between awesome boots and trash boots. remove '//'s to enable this feature.
//if counttype 0x170f 0 'backpack' >= 1
 // organizer 'Trash'
 // while organizing
 // endwhile
 // waitforcontext 0x40c87654 0 15000
//endif
//Chops up any fishies in your bag using a dagger
while counttype 0x9cc 'any' 'backpack' >= 1
  usetype 0xf52 'any'
  waitfortarget 500
  targettype 0x9cc
  pause 500
endwhile
while counttype 0x9cf 'any' 'backpack' >= 1
  usetype 0xf52 'any'
  waitfortarget 500
  targettype 0x9cf
  pause 500
endwhile
while counttype 0x9ce 'any' 'backpack' >= 1
  usetype 0xf52 'any'
  waitfortarget 500
  targettype 0x9ce
  pause 500
endwhile
while counttype 0x9cd 'any' 'backpack' >= 1
  usetype 0xf52 'any'
  waitfortarget 500
  targettype 0x9cd
  pause 500
endwhile
//Begin using fishing pole
usetype 0xdc0 'any'
waitfortarget 500
if direction == 0
  targettileoffset 0 -1 -3
elseif direction == 1
  targettileoffset 1 -1 -3
elseif direction == 2
  targettileoffset 1 0 -3
elseif direction == 3
  targettileoffset 1 1 -3
elseif direction == 4
  targettileoffset 0 1 -3
elseif direction == 5
  targettileoffset -1 1 -3
elseif direction == 6
  targettileoffset -1 0 -3
elseif direction == 7
  targettileoffset -1 -1 -3
endif
pause 9000
usetype 0xdc0 'any'
waitfortarget 500
if direction == 1
  targettileoffset 0 -1 -3
elseif direction == 2
  targettileoffset 1 -1 -3
elseif direction == 3
  targettileoffset 1 0 -3
elseif direction == 4
  targettileoffset 1 1 -3
elseif direction == 5
  targettileoffset 0 1 -3
elseif direction == 6
  targettileoffset -1 1 -3
elseif direction == 7
  targettileoffset -1 0 -3
elseif direction == 0
  targettileoffset -1 -1 -3
endif
pause 9000
usetype 0xdc0 'any'
waitfortarget 500
if direction == 7
  targettileoffset 0 -1 -3
elseif direction == 0
  targettileoffset 1 -1 -3
elseif direction == 1
  targettileoffset 1 0 -3
elseif direction == 2
  targettileoffset 1 1 -3
elseif direction == 3
  targettileoffset 0 1 -3
elseif direction == 4
  targettileoffset -1 1 -3
elseif direction == 5
  targettileoffset -1 0 -3
elseif direction == 6
  targettileoffset -1 -1 -3
endif
pause 9000