FD Forage macro

offmyfeetplease · Post by **offmyfeetplease** » Wed Aug 18, 2004 1:59 am

Trying to make this so it will only fd once and after foraging never really done any programming just tinkering, got the idea from the kiss forage i think. Thanks.

Code: Select all

Sub Main 
  /sit
     :Loop 
     /if (${Cursor.ID}) /autoinventory 
     /if (${Me.AbilityReady[Forage]}) /sit
     /if (${Me.AbilityReady[Forage]}) /doability forage /doability 8 
/goto :Loop 
/return

Sparr · Post by **Sparr** » Wed Aug 18, 2004 2:22 am

who gets forage and FD?

offmyfeetplease · Post by **offmyfeetplease** » Wed Aug 18, 2004 2:29 am

Iksar Monk

Me.Name · Post by **Me.Name** » Wed Aug 18, 2004 2:39 am

Sparr wrote:who gets forage and FD?

Iksar Monks do.

btw - you can't forage while FD. Are you trying to FD, then stand/forage, then FD again?
How about this:

Code: Select all

Sub Main
    :loop
    /if (${Me.AbilityReady["Feign Death"]}) /doability "Feign Death"
    /if (${Me.AbilityReady["Mend"]}) /doability "Mend"
    /if (${Me.AbilityReady["Forage"]}) {
        /stand
        /doability "Forage"
    }
    /delay 2s
    /autoinv
    /goto :loop
/return

This should FD when ready, Mend when ready, then stand and forage when ready.

offmyfeetplease · Post by **offmyfeetplease** » Wed Aug 18, 2004 2:45 am

Ahh thanks, that's probably much better then what i got to "work", it has a 50% chance to fail though

Code: Select all

Sub Main 
  /sit
     :Loop 
     /if (${Cursor.ID}) /autoinventory 
     /if (${Me.AbilityReady[Forage]}) /sit
     /if (${Me.AbilityReady[Forage]}) {
/doability forage
/doability 8
}
/goto :Loop 
/return

EDIT: I only want it to FD in between forages so i can read a book at my comp while i forage, and still be safe. Is there any command like /if (${Me.Position[Feign Death]}......?

Stults · Post by **Stults** » Wed Aug 18, 2004 5:25 am

I am not a very good code writer but I think this might work...

Code: Select all

Sub Main 
    :loop 
    /if (${Me.AbilityReady["Forage"]}) { 
        /stand 
        /doability "Forage" 
    } 
    /delay 2s 
    /autoinv 
    /call FD
    /goto :loop
/return

Sub FD
    /if (${Me.AbilityReady["Feign Death"]}) /doability "Feign Death" 
/return

Mimatas · Post by **Mimatas** » Wed Aug 18, 2004 11:20 am

Code: Select all

Sub FD 
    /if (${Me.AbilityReady["Feign Death"]}) /doability "Feign Death" 
/return

may want to expand that if statement just a bit... otherwise you'll be /doability FD while already feigned.

Insipid · Post by **Insipid** » Wed Aug 18, 2004 6:59 pm

I think Mimatas is suggesting it look like this:

Code: Select all

Sub Main 
    :loop 
    /if (${Me.AbilityReady["Forage"]}) { 
        /stand 
        /doability "Forage" 
    } 
    /delay 2s 
    /autoinv 
    /if (!${Me.Feigning}) /call FD 
    /goto :loop 
/return 

Sub FD 
   	/if (${Me.AbilityReady["Feign Death"]}) /doability "Feign Death"
/return

Just stuck the feign check in before attempting to call FD.

offmyfeetplease · Post by **offmyfeetplease** » Wed Aug 18, 2004 7:03 pm

Thanks, i knew the logic, just not the commands.

blueninja · Post by **blueninja** » Fri Aug 20, 2004 9:52 am

You probably want to add an event for failed fd since ${Me.Feinging} will return true even if your fd failed.

Something as simple as this should do the trick:

Code: Select all

#event FDFail "#1# has fallen to the ground."

Sub Event_FDFail(string Line,string Failer)
   /if (${Failer.Equal[${Me.Name}]}) /stand
/return

Then put /doevents in your main loop.

FD Forage macro

FD Forage macro

Re: