• You've discovered RedGuides 📕 an EverQuest multi-boxing community 🛡️🧙🗡️. We want you to play several EQ characters at once, come join us and say hello! 👋
  • IS THIS SITE UGLY? Click "RG3" at the very bottom-left of this page to change it. To dismiss this notice, click the X --->

Request - I was searching for a Macro (1 Viewer)

elanda

New member
Joined
Sep 13, 2012
RedCents
But didn't seem to come across one on this site to pick up the mushrooms in Kaladim for the hell that my brewing is becoming. Does anyone know where I could find a working one? I seem to remember having one a few years back a friend had given to me but I'm not sure where they found it.
 

Maskoi

So old and salty he grew scales
Joined
Sep 28, 2005
RedCents
71,414¢
The ones we have all used the active hacks which will now get you banned. Give me a few days and I will see if there is any way to revive it without using active hacks.
 
Joined
Sep 20, 2005
RedCents
1,073¢
Here's one I used several months ago, not in kaladim though so it may need modifying. You have to be in first person mode and have the center of your screen empty (no windows, bags, etc in the way). /itemtarget and change the listed drop to the value it says you targeted.

Rich (BB code):
Sub main
    /e Pickitem starting...
    /declare ItemToPick string outer Drop11205
    :loop
    /doevents
    /delay 1s
    /squelch /itemtarget ${ItemToPick}
    /delay 2s
    /if ( ${ItemTarget.Name.Length} ) {
        /squelch /face item
        /delay 5
        /call GotoItem
        /squelch /face item fast
        /call GetItem
        /delay 1s ${Cursor.ID}
        /delay 2s
        /if (${Cursor.ID}) /autoinv
    }
    /goto :loop
/return

Sub GotoItem
    :loop
    /if (${ItemTarget.Distance}>20) {
        /if (${Me.State.Equal[DUCK]}) /keypress DUCK
    } else {
        /if (${Me.State.NotEqual[DUCK]}) /keypress DUCK
    }
   
    /if (${ItemTarget.Distance}>0.8) {
        /squelch /face item fast
        /keypress forward hold
        /delay 1
        /keypress forward
        /goto :loop
   }
/return

Sub GetItem
    /declare lookangle int
    /click left center
    /if (!${MacroQuest.LClickedObject} || ${Target.ID}) {
        /look -128
        :loop
        /click left center
        /if (${Target.ID}) /squelch /target clear
        /if (!${MacroQuest.LClickedObject} && ${Me.Look}<0) {
            /varcalc lookangle ${Me.Look}+2
            /look ${lookangle}
            /goto :loop
        }
    }   
/return
 

Maskoi

So old and salty he grew scales
Joined
Sep 28, 2005
RedCents
71,414¢
You can put in the name of the item as like Purple Mushroom if that is what you are looking for.

Rich (BB code):
/declare ItemToPick string outer Purple Mushroom
 
Joined
Sep 20, 2005
RedCents
1,073¢
I had issues with using the name. Sometimes the items would respawn as random item names such as cloth hat, silk gloves, etc. This was in Oceangreen however so maybe Kaladim won't do that.
 

wild_rose1

Active member
Joined
Jun 17, 2011
RedCents
108¢
Here's one I used several months ago, not in kaladim though so it may need modifying. You have to be in first person mode and have the center of your screen empty (no windows, bags, etc in the way). /itemtarget and change the listed drop to the value it says you targeted.

Rich (BB code):
Sub main
    /e Pickitem starting...
    /declare ItemToPick string outer Drop11205
    :loop
    /doevents
    /delay 1s
    /squelch /itemtarget ${ItemToPick}
    /delay 2s
    /if ( ${ItemTarget.Name.Length} ) {
        /squelch /face item
        /delay 5
        /call GotoItem
        /squelch /face item fast
        /call GetItem
        /delay 1s ${Cursor.ID}
        /delay 2s
        /if (${Cursor.ID}) /autoinv
    }
    /goto :loop
/return

Sub GotoItem
    :loop
    /if (${ItemTarget.Distance}>20) {
        /if (${Me.State.Equal[DUCK]}) /keypress DUCK
    } else {
        /if (${Me.State.NotEqual[DUCK]}) /keypress DUCK
    }
   
    /if (${ItemTarget.Distance}>0.8) {
        /squelch /face item fast
        /keypress forward hold
        /delay 1
        /keypress forward
        /goto :loop
   }
/return

Sub GetItem
    /declare lookangle int
    /click left center
    /if (!${MacroQuest.LClickedObject} || ${Target.ID}) {
        /look -128
        :loop
        /click left center
        /if (${Target.ID}) /squelch /target clear
        /if (!${MacroQuest.LClickedObject} && ${Me.Look}<0) {
            /varcalc lookangle ${Me.Look}+2
            /look ${lookangle}
            /goto :loop
        }
    }   
/return
With very small changes (so small I even could figure it out) - this can be modified to work for the new collection grodunspawns. Running around EW atm and picking up stuff. Just have to monitor to avoid getting stuck in geomery or stuck on an unreachable spawn

Wont try to take credit for the new version, but if you just remove tha Kaladim specific parts and replace with /itemtarget drop , then you're good to go :-)
 

wackawacka

Active member
Joined
Jun 18, 2006
RedCents
881¢
i don't know how to add wild card and radius but that's what i would do tell it to pick up a spawn within 100 radius of any kind but brew barrel. The kalidim ground spawns changes names at random you use to be able to use *red and *blue but not anymore.
 

Maskoi

So old and salty he grew scales
Joined
Sep 28, 2005
RedCents
71,414¢
With very small changes (so small I even could figure it out) - this can be modified to work for the new collection grodunspawns. Running around EW atm and picking up stuff. Just have to monitor to avoid getting stuck in geomery or stuck on an unreachable spawn

Wont try to take credit for the new version, but if you just remove tha Kaladim specific parts and replace with /itemtarget drop , then you're good to go :-)
Please post your version
 

wild_rose1

Active member
Joined
Jun 17, 2011
RedCents
108¢
Please post your version
Im sure theres unneeded lines etc, but I basically just removed the line I could see targeting Kaladim muchroom and inserted another itemtarget. Then I tried adding the moveto command that someone posted in another thread and also left the other stuff in just in case one of them didnt work

Its ugly, sloppy and I have no idea how to write macros....but this change just worked for me fine in EW and collected the groundspawns fine. I just didnt 100% afk cause it would sometimes target a bugged spawn or get stuck on a wall

but you can semi afk :-)

Rich (BB code):
Sub main
    /e Pickitem starting...
        :loop
    /doevents
    /delay 1s
    /itemtarget drop
/moveto ${ItemTarget.Y} ${ItemTarget.X}
    /delay 2s
    /face item
        /delay 5
        /call GotoItem
        /squelch /face item fast
        /call GetItem
        /delay 1s ${Cursor.ID}
        /delay 2s
        /if (${Cursor.ID}) /autoinv
    /goto :loop
/return

Sub GotoItem
    :loop
    /if (${ItemTarget.Distance}>20) {
        /if (${Me.State.Equal[DUCK]}) /keypress DUCK
    } else {
        /if (${Me.State.NotEqual[DUCK]}) /keypress DUCK
    }
   
    /if (${ItemTarget.Distance}>0.8) {
        /squelch /face item fast
        /keypress forward hold
        /delay 1
        /keypress forward
        /goto :loop
   }
/return

Sub GetItem
    /declare lookangle int
    /click left center
    /if (!${MacroQuest.LClickedObject} || ${Target.ID}) {
        /look -128
        :loop
        /click left center
        /if (${Target.ID}) /squelch /target clear
        /if (!${MacroQuest.LClickedObject} && ${Me.Look}<0) {
            /varcalc lookangle ${Me.Look}+2
            /look ${lookangle}
            /goto :loop
        }
    }   
/return
 

Users Who Are Viewing This Thread (Users: 0, Guests: 1)

Top