KISS Forage

[MoonRaverX]

Ok, everyone has such elaborate forage macros, though I'd release a nice, simple one that you can run anytime, and it never loses anything. You're required only to have free inventory space.

Code: Select all

| Name: KISS Forage
| File: forage.mac
| Ver : 1.0 Final
| Date: 6/3/04
| Auth: MoonRaver
| Desc: forage, autoinventory. keep it simple ...

Sub Main
   :loop
   /if (${Me.AbilityReady["Forage"]}) { 
      /call CheckCursor
      /doability "Forage"
      /delay 20
      /call CheckCursor
   }
   /goto :loop
/endmacro

sub CheckCursor
   :checkcursor
   /if (${Cursor.ID}) { 
      /autoinventory
      /goto :checkcursor
   }
/return

[Fuergrissa]

Ok, everyone has such elaborate forage macros, though I'd release a nice, simple one that you can run anytime, and it never loses anything. You're required only to have free inventory space.

Code: Select all

| Name: KISS Forage
| File: forage.mac
| Ver : 1.0 Final
| Date: 6/3/04
| Auth: MoonRaver
| Desc: forage, autoinventory. keep it simple ...

Sub Main
   :loop
   /if (${Me.AbilityReady["Forage"]}) { 
    [color=red]  /call CheckCursor[/color]
      /doability "Forage"
      /delay 20
     [color=red] /call CheckCursor[/color]
   }
   /goto :loop
/endmacro

sub ClearCursor
   :checkcursor
   /if (${Cursor.ID}) { 
      /autoinventory
      /goto :checkcursor
   }
/return

Did you run this before you posted it ?

[Oid]

I am guessing..... no

[Glasscoin]

Code: Select all

| Name: KISS Forage 
| File: forage.mac 
| Ver : [color=red]1.0 Final[/color]
| Date: 6/3/04 
| Auth: MoonRaver 
| Desc: forage, autoinventory. keep it simple ... 

Now it'll never be fixed!

[Chill]

Guys wtf? I'm telling you:

Code: Select all

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

/sigh

I challenge anyone to break this code (before the next patch) or produce a dedicated forage macro that will produce more forages per hour.

If you want a KISS forage macro, why add the fluff?

[s16z]

Check this thread out for short forage macros, you might have to read down some: http://macroquest2.com/phpBB2/viewtopic.php?t=7326

[Fuergrissa]

i think you have missed the point here, i made a comment because someone had posted NON WORKING macros in a section without even bothering to test the code, fixing the macro is easy but thats not the point. If your going to post macros at least run them first to see if they work.

[MoonRaverX]

don't ask me what i did... i SWEAR they matched prior... not quite final i guess, final now

[MoonRaverX]

oh, and what heppens to you macro when you have multiple items on your cursor?

[Glasscoin]

It will go through the loop and /autoinventory until there's nothing left on the cursor.

[Chill]

oh, and what heppens to you macro when you have multiple items on your cursor?

Nothing. Foraging only ever finds 1 item. So if its running on its own, it will only ever get 1 item per cycle. You could have something on your cursor before you start, but my macro checks the cursor before it tries to forrage, so that takes care of that.

Of course there is the timing issue and there could be a bit of lag before the item appears, but the only time the cursor needs to be empty is immediately before you attempt to forage so that the forrage attempt is not wasted. Again, putting the /autoinventory just before the forage line takes care of that.

[NBarnes]

Guys wtf? I'm telling you:

Code: Select all

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

/sigh

I challenge anyone to break this code (before the next patch) or produce a dedicated forage macro that will produce more forages per hour.

If you want a KISS forage macro, why add the fluff?

I am not that familiar with the technicalities of this, but... won't this run in an uncontrolled loop? Would adding a /delay call to this be a good idea, to let the rest of the system catch a breath from running this loop? Again, I don't know, it's certainly possible that MQ2 takes care of that iteself and you know that and I don't so I'm being ignorant in my paranoia, but I am concerned.

[Fuergrissa]

Guys wtf? I'm telling you:

Code: Select all

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

/sigh

I challenge anyone to break this code (before the next patch) or produce a dedicated forage macro that will produce more forages per hour.

If you want a KISS forage macro, why add the fluff?

I am not that familiar with the technicalities of this, but... won't this run in an uncontrolled loop? Would adding a /delay call to this be a good idea, to let the rest of the system catch a breath from running this loop? Again, I don't know, it's certainly possible that MQ2 takes care of that iteself and you know that and I don't so I'm being ignorant in my paranoia, but I am concerned.

Not technically no, the code here:

Code: Select all

/if (${Me.AbilityReady[Forage]}) /doability Forage[/b]

will only do forage if it is available, it is a loop of course but not Uncontrolled.

[Noobalicious]

So I save this code in a file forage.mac and stick it in the macrs folder, right? But what do I do then?

[Fuergrissa]

So I save this code in a file forage.mac and stick it in the macrs folder, right? But what do I do then?

What you need to do then is Read and Inwardly Digest the manual.
We are not here to hand to you ON A PLATE ways for YOU to Cheat in Everquest. Learn Like every other person here has too, I don't mind helping but YOUR takin the piss.