2
« on: January 01, 2011, 02:54:13 PM »
---------Casca's Coasting Fisherman v1.3--------------------
Made it for Trailmyx's site, didn't put it on easyuo.
*Please note I changed it a few times today, added somethings, fixed an issue.
This script will fish with the new orc boat, drop the fish into the hull, cut up the regular "fish", dump boots and fish steaks in the garbage at the bank and walk a rail on your boat to get back into position. It will also put scales, white pearls, mibs and maps into the hull.
What you need:
A butcher Knife (Player Crafted)
A rune to a bank with a garbage two tiles from the garbage (name it Trash). Make sure the trash is a chest, if it's not you will have to add the trash TYPE to the script (%garbage_cont)
A runebook (you can only have one in the back pack). Set the default rune to your boat.
Setup:
You need to move your tillerman to the far back wall.
stand next to the tillermen over the hull.
Press play.
It will autodetect the bank trash bin, your tillermen, your butcher knife.
It will fish in one spot and then when there is no more fish biting it will move forward for a random period of time, then stop and fish. Then it will move back and do the same thing and then forward... it makes a slow progression forward that way.
[Things I'm adding]
Menu with Stats
Auto fill fisher quests and turn them in
; You have Casca to thank for this script.
; I made this for Trailmyx's website. If I see it on another site I'll pee on you IRL.
; It's not a full unattended script
; I wrote it for training from 70 up and for
; just fishing for fish to stock up
; You'll need to use something else to get to 70
set %hull_type JDUB_LKTB_IEGD_XQSB ; add your hull type if you use something other than orc boat
set %fish UYZ_GQD_DQD_WYZ_NMZ_FQD_OMZ_EQD_RMZ_SMZ_zyz_tyz_
set %pole XHF
set %shoes PVI_TVI_AWI_NVI_OVI_ZVI_CWI_QVI
set %special YDF_
set %garbage_cont BUD
set %boot_count 25 ; Set this to a low number if you want to clear your pack
set %knife_type GMH ;butcher knife
set %goods wws_UDHB_xvh_HTD
; setup variables
finditem %knife_type c_ , #backpackid
if #findkind = -1
{
display Click on the knife/sword you are going to cut fish with
set #targcurs 1
while #targcurs = 1
{
wait 1
}
set %knife #ltargetid
goto polesetup
}
set %knife #findid
polesetup:
finditem %pole c_ , #backpackid
if #findkind = -1
{
finditem %pole c_ , #charid
if #findkind = -1
{
display you need a pole tardo!
halt
}
set %poleID #findid
goto jump
}
set %poleID #findid
jump:
finditem ZBN c_ , #backpackid
if #findkind = -1
{
display you need a rune book with default set to ship
halt
}
set %runebook #findid
finditem %hull_type G_2
if #findkind = -1
{
display you need to be 2 tiles from the hull
halt
}
set %hull #findid
tillermen5:
finditem HS G_2
if #findrep < 7
{
ignoreitem #findid
goto tillermen5
}
set %tillermen #findid
rune_trash:
finditem QWL c_ , #backpackid
if #findkind = -1
{
display You don't have a trash rune in your pack
}
event property #findid
if trash notin #property
{
ignoreitem #findid
goto rune_trash
}
if insured notin #property
{
display your trash rune isn't insured
}
set %trash_rune #findid
gosub check_pack
start:
event macro 8 7
wait 1s
gosub set_hook
gosub fish
gosub move
goto start
sub move
if %forward = n/a
set %forward 1
if %forward = 1
set %forward forward
if %forward = 0
set %forward back
msg %forward $
set %num #random % 9
wait %num , s
msg stop $
return
wait #random
sub fish
fish:
set #lobjectID %poleID
event macro 17 0
;target
;event macro 22 0
click 470 388
wait 8s
set %end #jindex
gosub journal
if #result = #true
return
gosub check_pack
goto fish
sub journal
for %i %start %end
{
scanjournal %i
if biting in #journal
return #true
}
return #false
sub check_pack
goods:
finditem %goods c_ , #backpackid
if #findkind = -1
goto reg_fish
exevent drag #findid #findstack
exevent dropc %hull
wait 1s
goto goods
reg_fish:
finditem %fish c_ , #backpackid
if #findkind = -1
goto how_many
set %fishID #findid
event property %fishID
if fish notin #property || cat in #property || sun in #property || blue in #property || gill in #property || trout in #property || bone in #property || big in #property
{
exevent drag #findid #findstack
exevent dropc %hull
wait 1s
ignoreitem %fishID
goto reg_fish
}
set #lobjectID %knife
event macro 17 0
target
set #ltargetID %fishID
set #ltargetkind 1
event macro 22 0
wait 2s
goto reg_fish
how_many:
finditem %special c_ , #backpackid
if #findkind <> -1
{
set #LobjectID #findid
event macro 17 0
wait 2s
}
finditem %shoes c_ , #backpackid
if #findcnt > %boot_count
gosub dump_stuff
finditem IND c_ , #backpackid
if #findcnt > %boot_count
gosub dump_stuff
return
sub dump_stuff
; recall to bank
event macro 15 31
target
set #ltargetid %trash_rune
set #ltargetkind 1
event macro 22 0
wait 8s
; dump stuff
trash_bin:
finditem %garbage_cont G_2
if #findkind = -1
{
display you are either not near a bank trash bin or it's the wrong type, add the type up top
halt
}
event property #findid
if trash notin #property
{
ignoreitem #findid
goto trash_bin
}
set %trashID #findid
dump_fish:
finditem IND c_ , #backpackid
if #findkind = -1
goto dump_shoes
exevent drag #findid
exevent dropc %trashID
wait 2s
goto dump_fish
dump_shoes:
finditem %shoes c_ , #backpackid
if #findkind = -1
goto back_ship
exevent drag #findid
exevent dropc %trashID
wait 2s
goto dump_shoes
back_ship:
event macro 15 31
target
set #ltargetid %runebook
set #ltargetkind 1
event macro 22 0
wait 6s
lala:
finditem %tillermen G
if #finddist < 2
goto lala2
event pathfind #findx #findy #findz
wait 2s
goto lala
lala2:
set #lobjectid %hull
event macro 17 0
wait 1s
gosub set_hook
return
sub set_hook
set #lobjectid %hull
event macro 17 0
wait 1s
set #lobjectID %poleID
event macro 17 0
target
set #ltargetkind 3
click 337 445
wait 8s
return
to give a poster a reputation bump!
Show Posts
