angler.mac - Fisher

[Feonix762]

This code is pretty self explainatory, grab yourself 8 empty backpacks, buy about 5 or 6 fishing poles, load up a couple backpacks with bait, and go stand by some water.

Code: Select all

See below

Can anyone help me out with a PC radius detection? I'm at work right now so I can't test some things. How would I go about doing it? So far I've seen /target nopcnear but it has no description of what exactly this does.

[wassup]

You could make this simpler by changing

Code: Select all

/if "$cursor(name)"=="Tattered Cloth Sandal" /destroy 
  /if "$cursor(name)"=="Rusty Dagger" /destroy 
  /if "$cursor(name)"=="Fish Scales" /destroy 
  /if "$cursor(name)"=="Fresh Fish" /destroy 
  /if "$cursor(name)"=="Crawdad" /destroy 
  /if "$cursor(name)"=="Waterleaf Scale" /destroy 
  /if "$cursor(name)"~~"Saltwater" /autoinventory

to

Code: Select all

/if "$cursor(name)"!~"Saltwater" /destroy
/autoinv

[Virtuoso65]

You could make this simpler by changing

Code: Select all

/if "$cursor(name)"=="Tattered Cloth Sandal" /destroy 
  /if "$cursor(name)"=="Rusty Dagger" /destroy 
  /if "$cursor(name)"=="Fish Scales" /destroy 
  /if "$cursor(name)"=="Fresh Fish" /destroy 
  /if "$cursor(name)"=="Crawdad" /destroy 
  /if "$cursor(name)"=="Waterleaf Scale" /destroy 
  /if "$cursor(name)"~~"Saltwater" /autoinventory

to

Code: Select all

/if "$cursor(name)"!~"Saltwater" /destroy
/autoinv

And then you accidently pick up your uberswordofslashing and poof....

[Feonix762]

Changed it, and I wouldn't worry about your ubersword poofing, the only thing the entire macro does is /autoinv so unless you were grabbing your equipment while the Macro was running you'd be ok.

[wassup]

You could make this simpler by changing

Code: Select all

/if "$cursor(name)"=="Tattered Cloth Sandal" /destroy 
  /if "$cursor(name)"=="Rusty Dagger" /destroy 
  /if "$cursor(name)"=="Fish Scales" /destroy 
  /if "$cursor(name)"=="Fresh Fish" /destroy 
  /if "$cursor(name)"=="Crawdad" /destroy 
  /if "$cursor(name)"=="Waterleaf Scale" /destroy 
  /if "$cursor(name)"~~"Saltwater" /autoinventory

to

Code: Select all

/if "$cursor(name)"!~"Saltwater" /destroy
/autoinv

And then you accidently pick up your uberswordofslashing and poof....

Yes, that is a possibility, but you have to be careful.

You could put in some code to prevent that from happening fairly easily.

[Mckorr]

Hey, I'm happy to see someone updating the fishing macros for use without a summoned pole :)

Thanks for the work.

[Elric]

Mckorr, you fool! Half the fun of fishing is the drinking involved!

[dont_know_at_all]

That was so bad, I had to rewrite it:

Code: Select all

| - angler.mac -

sub main

| guarantee we are standing
/if "$char(state)"=="SIT" /stand

| guarantee the inv window is closed
/if $invpanel!=FALSE /press i

:Again

    |
    | if we are in trouble, gate out
    |
    /if n $char(hp,pct)<75 {
        /cast Gate
        /delay 3s
        /cast Gate
        /delay 3s
        /sit
        /camp desktop
        /quit
        /endm
    }
    
    |
    | if gm around, quit
    |
    /if $gm==TRUE { 
        /sit
        /camp desktop
        /quit
        /endm
    }

    |
    | we don't have a pole in the primary
    |
    /if "$equip(primary,name)"!="Fishing Pole" {
        | open inv
        /press i
        /delay 2

        | can we find a pole?
        |
        | note: this may not work if pole is not in inv slot
        | finditem is bugged in that it will not wait for the pack
        | to open if the pole is in a pack.  to fix this, open all 
        | the packs at the beginning of the macro
        |
        /finditem "Fishing Pole"
        /delay 1s
        /if $find()==FALSE {
            /echo no pole found 
            /endm
        }

        | equip the pole
        /click left primary
        /delay 5
        
        | autoinv whatever was in primary
        /autoinv
        /press i
    }
    |
    | actually do some fishing
    |
    /doability Fishing
    /delay 65

    | if the item we caught does not have Saltwater in the
    | name, destroy it else autoinventory it  
    |
    | note: fast destroy should be turned on
    |
    /if "$cursor(name)"!~"Saltwater" /destroy
    /autoinv

    /goto :Again

/return

[Ketamine]

If I remove the sub help it will still work right? Was trying to FD fish in PoN and as soon as I started the macro it automaticly tried to gate me and camp =p

I guess when FD it assumes my hp are low?