Fish.mac

[Imperfect]

This is the one I use. Basically it is setup in such a way as you practice skills also while you are fishing.

Code: Select all

| - Fish.mac -
|
#include routines.mac

Sub Main
	/cleanup
	/target npc peasant
	:Fish
	/call CheckPole
	/if $return==1 /return
	/if n $t0==0 /call Fish
	/if n $t1==0 /call Beg
	/if n $t2==0 /call Sneak
	/if n $t3==0 /call Mend
	/if n $t4==0 /call Feign
	/if "$cursor(name)"~~"scales" /click left destroy
	/if "$cursor(name)"~~"Tattered cloth" /click left destroy
	/if "$cursor(name)"~~"rusty" /click left destroy
	/if "$cursor()"!="NULL" /click left auto
	/if n $freeinv(space)<2 /call Junkcheck
	/goto :Fish
/return

Sub CheckPole
	/if "$equip(primary,name)"~~"Fishing Pole" /return 0
	/finditem "Fishing Pole"
	/if "$cursor()"=="NULL" /return 1
	/click left primary
	/if "$cursor()"!="NULL" /click left auto
/return

Sub Fish
	/doability 4
	/varset t0 55
/return

Sub Beg
	/doability 3
	/varset t1 10s
/return

Sub Sneak
	/doability 5
	/varset t2 45
/return

Sub Mend
	/doability 8
	/varset t3 5s
/return

Sub Feign
	/doability 9
	/delay 3
	/stand
	/delay 1
	/stand
	/varset t4 9s
/return

Sub Junkcheck
	
	/sendkey down shift
	/finditem "Tattered Cloth Sandal"
	/delay 3
	/if "$cursor()"!="TRUE" /click left destroy
	/delay 3
	/finditem "Rusty Dagger"
	/delay 3
	/if "$cursor()"!="TRUE" /click left destroy
	/delay 3
	/finditem "Fish scales"
	/delay 3
	/if "$cursor()"!="TRUE" /click left destroy
	/delay 3
	/sendkey up shift

/return