Official ScriptUO EasyUO Scripts > Inactive Submissions

Casca's Fisher and Trainer

(1/9) > >>

casca:
---------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




--- Code: ---; 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


--- End code ---

tgambit65:
Really want to try your script but, don't have an Orc ship. I am unsure exactly how to change my hull type. I know where to change it at but, I see you list several item types on that line. Will look more and see if I can figure it out but, any help would be greatly appreciated.

Thanks for writing the script though!

Outlaw Josey Wales:
if you read throught the script he points out were you can add your ship to it

tgambit65:

--- Quote from: Outlaw Josey Wales on April 09, 2011, 12:00:42 PM ---if you read throught the script he points out were you can add your ship to it

--- End quote ---

Looked again and only saw the same spot I mentioned in my first reply. Looks like there are several item types listed there. I haven't tried IDing a different boat though an see if it gives me an Item type that large. So that is why I said I am unsure.

I am an avid script user but, not a scripter at all. So my knowledge with scripts is very limited.

Outlaw Josey Wales:
This is the line your looking for:
Here is were you add in your hull type for example you would go behind XQSB and do this _abcde so it would look like this after complted XQSB_abcde   ;  not were abcde is u will need to find out what your hull code is you can do this a number of ways by opeing up easy uo and double clicking your hull and looking at last object id or run Massacre item id script

 set %hull_type JDUB_LKTB_IEGD_XQSB  ; add your hull type if you use something other than orc boat

Navigation

[0] Message Index

[#] Next page

Go to full version