-
You've discovered RedGuides, an EverQuest multi-boxing and scripting community 🧙♀️⚙️. We want you to play several EQ characters at once, come join us and say hello! 👋
Forgotten Halls Afk Macro Gets New Expedition
- Thread starter Pugs
- Start date
| Thanks to Cade for the help ,Jumjum5,
|Infernal, Soultaker Siddin Red and the rest of the brilliant minds
|here at red Guides.
|AFKHALLS.mac
|This was Hacked up by Pugs ~,~
|This could be made much better but this works.
|To use this macro Make a hotkey that says
|
|/echo You have entered Nedaria's Landing
|
|Then start the macro and press your hotkey in Nedaria's.
|You must have warp for this to work correctly
|Soultakers is what i use if you use other you
|will have to change the command to your warp's syntax.
| also /echo end will shut down the macro and zone you out of the halls.
#turbo
#event dzadd "personyouwanttoadd tells you, 'CODEWORD'"
#event invite "#*#invites you to join#*#"
#event Zoned "#*#You have entered Guild Lobby#*#"
#event dzquit "#*#You have entered Nedaria's Landing#*#"
#event PoK "You have entered The Plane of Knowledge."
|Change this to the ^^^^^^^^^^^^^^
|zone you are bound in
Sub Main
|We are waiting for the hotkey to start the macro
:waitforit
/doevents
/doevents
/goto :waitforit
/return
| We have the extra long delay to account for zoneing Time.
| You may set the delay to what you want.
| You also need to change the twist to your line up.
| We then Clear our target so we don't cast on anything.
Sub indz
:begin
/delay 30s
/twist off
/face heading 270
/delay 2s
/warp loc -573.50 162.80 2.15
/circle on 20
/keypress forward hold
/twist 2 3 3
/target clear
/target clear
|This loop calls the events to be redone along with a GM check.
|It checks to insure that the mobs it targets are not over
| level 67(a left over from the vxed mac i think)
|It then check the range of the target if it over 220 it clears it
|The 3rd If command targets an NPC if you do not have a target
|The final Line Watches your health and succor you when you hit 30%
| you could change the command to gate if you like.
| ex /if (${Me.PctHPs}<=30) /gate
:loopstart
/doevents
/call GMcheck
/if (${Target.Level}>67) /tar npc next
/if (${Target.Distance}>220) /keypress esc
/if (${Target.ID}==FALSE) /tar NPC radius 220 rat
/if (${Me.PctHPs}<=30) /call succor
/doevents
/delay 10
/goto :loopstart
/return
|I never had this one called while i was in zone.
| but it warps you to that loc turn circle off
| and twists selos and heal song then when you reach
| 80% health you go back to killing
Sub succor
/warp loc 245 -33 0
/circle off
/twist 1 5
/delay 60
:loopheal
/if (${Me.PctHPs}>80) {
/face heading 270
/warp loc -573.50 162.80 2.15
/circle on 21
/keypress forward hold
/twist 2 3 3
/return
}
/delay 60
/goto :loopheal
/return
| This is the GM check it is called about every 10 seconds.
| It beeps at you then /quits the game.
Sub GMcheck
/if (${Spawn[gm].ID}) {
/echo Gm detected
/beep
/beep
/beep
/q
/endmac
/unload
/q
}
/return
|need to change the name of this to the person you want
|added to the adventure
Sub event_dzadd
/dzadd PERSONYOUWANTTOADD
/return
| This sub follows a group invite.
Sub event_invite
/invite
/return
|This next bit removes you from the expdition if you still have it after
| you zone out
|Targets Eldros Danmor warps to him gets the adventure window then it
| warps back to Nideno and says forgotten halls allowing you to zone in.
|You then warp closer to the rock look at point behind the rock and
| press use or u, also you click with the mouse so you mouse needs to be
| in the center of the screen.
Sub event_dzquit
/dzremove gretchenn
/twist off
/delay 2s
/target Eldros Danmor
/warp target
/delay 2s
/say interested in visiting
/delay 3s
/target Nideno Eliagy
/warp target
/delay 2s
/say Forgotten halls
/delay 2s
/warp loc 1544 -665 94
/face loc 1540, -675
/look 0
/doortarget
/delay 10s
/click left
/delay 2s
/keypress u
/delay 1s
/click left
/keypress u
/delay 10s
/target clear
/call indz
/return
|In the event of a water landing....
| This camps you out.
Sub Event_PoK
/echo sorry i don't know how or why but you died.
/keypress forward
/circle off
/twist off
/delay 45s
/sit on
/camp desktop
/q
/endmacro
/return
other than that I run nostun , moveutils, and mq2twist
|Infernal, Soultaker Siddin Red and the rest of the brilliant minds
|here at red Guides.
|AFKHALLS.mac
|This was Hacked up by Pugs ~,~
|This could be made much better but this works.
|To use this macro Make a hotkey that says
|
|/echo You have entered Nedaria's Landing
|
|Then start the macro and press your hotkey in Nedaria's.
|You must have warp for this to work correctly
|Soultakers is what i use if you use other you
|will have to change the command to your warp's syntax.
| also /echo end will shut down the macro and zone you out of the halls.
#turbo
#event dzadd "personyouwanttoadd tells you, 'CODEWORD'"
#event invite "#*#invites you to join#*#"
#event Zoned "#*#You have entered Guild Lobby#*#"
#event dzquit "#*#You have entered Nedaria's Landing#*#"
#event PoK "You have entered The Plane of Knowledge."
|Change this to the ^^^^^^^^^^^^^^
|zone you are bound in
Sub Main
|We are waiting for the hotkey to start the macro
:waitforit
/doevents
/doevents
/goto :waitforit
/return
| We have the extra long delay to account for zoneing Time.
| You may set the delay to what you want.
| You also need to change the twist to your line up.
| We then Clear our target so we don't cast on anything.
Sub indz
:begin
/delay 30s
/twist off
/face heading 270
/delay 2s
/warp loc -573.50 162.80 2.15
/circle on 20
/keypress forward hold
/twist 2 3 3
/target clear
/target clear
|This loop calls the events to be redone along with a GM check.
|It checks to insure that the mobs it targets are not over
| level 67(a left over from the vxed mac i think)
|It then check the range of the target if it over 220 it clears it
|The 3rd If command targets an NPC if you do not have a target
|The final Line Watches your health and succor you when you hit 30%
| you could change the command to gate if you like.
| ex /if (${Me.PctHPs}<=30) /gate
:loopstart
/doevents
/call GMcheck
/if (${Target.Level}>67) /tar npc next
/if (${Target.Distance}>220) /keypress esc
/if (${Target.ID}==FALSE) /tar NPC radius 220 rat
/if (${Me.PctHPs}<=30) /call succor
/doevents
/delay 10
/goto :loopstart
/return
|I never had this one called while i was in zone.
| but it warps you to that loc turn circle off
| and twists selos and heal song then when you reach
| 80% health you go back to killing
Sub succor
/warp loc 245 -33 0
/circle off
/twist 1 5
/delay 60
:loopheal
/if (${Me.PctHPs}>80) {
/face heading 270
/warp loc -573.50 162.80 2.15
/circle on 21
/keypress forward hold
/twist 2 3 3
/return
}
/delay 60
/goto :loopheal
/return
| This is the GM check it is called about every 10 seconds.
| It beeps at you then /quits the game.
Sub GMcheck
/if (${Spawn[gm].ID}) {
/echo Gm detected
/beep
/beep
/beep
/q
/endmac
/unload
/q
}
/return
|need to change the name of this to the person you want
|added to the adventure
Sub event_dzadd
/dzadd PERSONYOUWANTTOADD
/return
| This sub follows a group invite.
Sub event_invite
/invite
/return
|This next bit removes you from the expdition if you still have it after
| you zone out
|Targets Eldros Danmor warps to him gets the adventure window then it
| warps back to Nideno and says forgotten halls allowing you to zone in.
|You then warp closer to the rock look at point behind the rock and
| press use or u, also you click with the mouse so you mouse needs to be
| in the center of the screen.
Sub event_dzquit
/dzremove gretchenn
/twist off
/delay 2s
/target Eldros Danmor
/warp target
/delay 2s
/say interested in visiting
/delay 3s
/target Nideno Eliagy
/warp target
/delay 2s
/say Forgotten halls
/delay 2s
/warp loc 1544 -665 94
/face loc 1540, -675
/look 0
/doortarget
/delay 10s
/click left
/delay 2s
/keypress u
/delay 1s
/click left
/keypress u
/delay 10s
/target clear
/call indz
/return
|In the event of a water landing....
| This camps you out.
Sub Event_PoK
/echo sorry i don't know how or why but you died.
/keypress forward
/circle off
/twist off
/delay 45s
/sit on
/camp desktop
/q
/endmacro
/return
other than that I run nostun , moveutils, and mq2twist
ss44
Active member
- Joined
- Sep 13, 2005
- RedCents
- 31¢
Also, I would recommend using my macro, its much more streamlined, plus u can get up to 500pp per round, which isnt bad. Pays for songs and such. Unless of course you dont need the cash. Another reason I recommend mine is because it will keep you from dying. When you die you dont gain exp, you lose it. Mine /gate's you at 20% because succoring will not help you because 5 seconds after you succor the rat is getting fresh with you. Gating and camping saves you the exp, and buffs (if you have them). Not to mention mine has the potionbelt enabled in it, to delay death lol. Delay.
I don't like the part of the mac where it goes to get the mission when I'm not there.
ss44
Active member
- Joined
- Sep 13, 2005
- RedCents
- 31¢
all you could have to do is remove the part in red....
and replace it with...
so that it looks like....
also, u said the only potions you could find were for lvl 40? were you checking the vendors in PoK, next to Odano's? the vendors are vah shirs.
Rich (BB code):
Sub event_dzquit
/doevents
/call gmcheck
/disband
/dzremove UberSuperGnome
/dzremove UberSuperGnome
/twist off
/delay 2s
/target Eldros Danmor
/warp target
/delay 2s
/say interested in visiting
/delay 3s
/target Nideno Eliagy
/warp target
/delay 2s
/say Forgotten halls
/delay 2s
/doevents
/warp loc 1544 -665 94
/face loc 1540, -675
/look 0
/doortarget
/delay 10s
/keypress u
/keypress u
/delay 1s
/target clear
/call destroysilver
/call indz
/returnand replace it with...
Rich (BB code):
/circle off
/twist off
/delay 45s
/sit on
/camp desktop
/q
/endmacro
/returnso that it looks like....
Rich (BB code):
Sub event_dzquit
/doevents
/call gmcheck
/disband
/dzremove UberSuperGnome
/dzremove UberSuperGnome
/twist off
/circle off
/delay 2s
/target Eldros Danmor
/warp target
/delay 2s
/delay 45s
/sit on
/camp desktop
/q
/endmacro
/returnalso, u said the only potions you could find were for lvl 40? were you checking the vendors in PoK, next to Odano's? the vendors are vah shirs.
Last edited:
armysoldier
Well-known member
- Joined
- Jun 26, 2005
- RedCents
- 101¢
lol whole point of camping out is so your not Warping all over nedaria's landing
take out
/target Eldros Danmor
/warp target
also
I am working another version of no warp FHBard .. with FHhealer and FHDPS...i posted a code for one with pet... i think in this thread.. but if not... FHPet will be coming also
take out
/target Eldros Danmor
/warp target
also
I am working another version of no warp FHBard .. with FHhealer and FHDPS...i posted a code for one with pet... i think in this thread.. but if not... FHPet will be coming also
ss44
Active member
- Joined
- Sep 13, 2005
- RedCents
- 31¢
I too am working on a new macro, but its for my necro. Right now I am using a tweaked FH.mac on my bard, to twist songs on the pet's target, then when it dies, go to corpse, loot, go back to the healer, twist songs on pet while playing mana song. Should be up this week, FH mac for necromancer, with healer in group. Could do without healer, just add a healing line for pet, but healer makes it easier/safer lol.
looks like they patched something. I was getting hit by mobs when I would warp out of the map to heal. Tried several different distances and was still being hit by a mob. When I would come back in the zone to get my corpse. It was in the spot where I had used warp to go off the map. Evidentaly there is a a packet checking your loc and if it is an invalid loc. It keeps your postion at the last vailid location server side.
armysoldier
Well-known member
- Joined
- Jun 26, 2005
- RedCents
- 101¢
just a suggestion .. but if your gonna warp out to heal..
why not warp to harindu .. say i am ready to leave
zone out. heal up then reenter?
little bit o code to make it happen
8-)
on the reworked code.. i can put it in.. but with healer there... no need for me to have it 8-)
why not warp to harindu .. say i am ready to leave
zone out. heal up then reenter?
little bit o code to make it happen
8-)
on the reworked code.. i can put it in.. but with healer there... no need for me to have it 8-)
ss44
Active member
- Joined
- Sep 13, 2005
- RedCents
- 31¢
This will keep you from dying. It warps to the Guide, then /fades. When it zones back in it will go to the regen sub and when u get to 90% it will restart killing rats.
Rich (BB code):
|Original Code by Pugs
|Changed by SS44 to include, /fade, /potionbelt, /loot.
| Thanks to Cade for the help ,Jumjum5,
|Infernal, Soultaker Siddin Red and the rest of the brilliant minds
|here at red Guides.
|AFKHALLS.mac
|This was Hacked up by Pugs ~,~
|This could be made much better but this works.
|To use this macro Make a hotkey that says
|
|/echo You have entered Nedaria's Landing
|
|Then start the macro and press your hotkey in Nedaria's.
|You must have warp for this to work correctly
|Soultakers is what i use if you use other you
|will have to change the command to your warp's syntax.
| also /echo end will shut down the macro and zone you out of the halls.
#turbo
#Event MobDied "#*#You have slain#*#"
#event ding "#*#have gained a level! Welcome to level#*#"
#event end "Shutdown12345"
#event dzadd "PERSONYOUWANTTOADD tells you, 'CODEWORD'"
#event invite "#*#invites you to join#*#"
#event Zoned "#*#You have entered Guild Lobby#*#"
#event dzquit "#*#You have entered Nedaria's Landing#*#"
#event PoK "You have entered Guild Lobby."
|Change this to the ^^^^^^^^^^^^^^
|zone you are bound in
|-- Destroys Silver if you have more than the given amount! 0=disable
#define DESTROY_SILVER_IF_ABOVE 1
|-- Destroys Copper if you have more than the given amount! 0=disable
#define DESTROY_COPPER_IF_ABOVE 1
Sub Main
/declare LootAllItems int outer 1
/declare LootSlot int outer 0
|We are waiting for the hotkey to start the macro
:waitforit
/doevents
/doevents
/goto :waitforit
/return
| We have the extra long delay to account for zoneing Time.
| You may set the delay to what you want.
| You also need to change the twist to your line up.
| We then Clear our target so we don't cast on anything.
Sub indz
:begin
/delay 1s
/twist off
/face heading 270
/delay 1s
/warp loc -573.50 162.80 2.15
/circle on 21
/keypress forward hold
/twist 1 2 3 1 4 5
/target clear
/target clear
|This loop calls the events to be redone along with a GM check.
|It checks to insure that the mobs it targets are not over
| level 67(a left over from the vxed mac i think)
|It then check the range of the target if it over 220 it clears it
|The 3rd If command targets an NPC if you do not have a target
|The final Line Watches your health and succor you when you hit 30%
| you could change the command to gate if you like.
| ex /if (${Me.PctHPs}<=30) /gate
:loopstart
/delay 1s
/call GMcheck
/if (${Target.Level}>67) /tar npc next
/if (${Target.Distance}>220) /keypress esc
/if (${Target.ID}==FALSE) /tar NPC radius 220 rat
/if (${Me.PctHPs}<=20) /call succor
/if (${Me.PctHPs}<=80) /potionbelt activate 1
/if (${Me.PctHPs}<=40) /potionbelt activate 2
/doevents
/delay 10
/goto :loopstart
/return
|I dont like to drop too low on hp so i just change to twist in regen
|with my dots
Sub regen
/twist 1 6
:regenloop
/doevents
/if (${Me.PctHPs}<=20) /call succor
/if (${Me.PctHPs}>=90) {
/twist 1 2 3 1 4 5
/return
}
/goto :regenloop
/return
|I never had this one called while i was in zone.
| but it warps you to that loc turn circle off
| and twists selos and heal song then when you reach
| 80% health you go back to killing
Sub succor
/warp loc 245 -33 0
/circle off
/twist 1 5
/delay 1s
/fade
/delay 120s
/return
/delay 60
/call regen
/return
| This is the GM check it is called about every 10 seconds.
| It beeps at you then /quits the game.
Sub GMcheck
/if (${Spawn[gm].ID}) {
/echo Gm detected
/beep
/beep
/beep
/q
/endmac
/unload
/q
}
/return
|This next bit removes you from the expdition if you still have it after
| you zone out
|Targets Eldros Danmor warps to him gets the adventure window then it
| warps back to Nideno and says forgotten halls allowing you to zone in.
|You then warp closer to the rock look at point behind the rock and
| press use or u, also you click with the mouse so you mouse needs to be
| in the center of the screen.
Sub event_dzquit
/doevents
/call gmcheck
/disband
/dzremove UberSuperGnome
/dzremove UberSuperGnome
/twist off
/delay 2s
/target Eldros Danmor
/warp target
/delay 2s
/say interested in visiting
/delay 3s
/target Nideno Eliagy
/warp target
/delay 2s
/say Forgotten halls
/delay 2s
/doevents
/warp loc 1544 -665 94
/face loc 1540, -675
/look 0
/doortarget
/delay 10s
/keypress u
/keypress u
/delay 1s
/target clear
/call destroysilver
/call indz
/return
|In the event of a water landing....
| This camps you out.
Sub Event_PoK
/echo sorry i don't know how or why but you died.
/circle off
/twist off
/delay 45s
/sit on
/camp desktop
/q
/endmacro
/return
Sub Event_MobDied
/doevents
/twist off
/call GMcheck
/circle off
/keypress forward
/delay 1s
/squelch /declare LootSlot int inner 0
/declare LootCheck int inner 0
/declare LootTotal int inner 0
/target npc corpse radius 200
:MovementLoop
/face fast nolook
/if (${Int[${Target.Distance}]}>13) {
/keypress forward hold
}
/if (${Int[${Target.Distance}]}<13&&${Int[${Target.Distance}]}>11) {
/keypress forward
}
/if (${Int[${Target.Distance}]}<9) {
/keypress back
}
/if (${Int[${Target.Distance}]}>13) {
/goto :MovementLoop
}
/keypress forward
/keypress back
/delay 5
/loot
/delay 5
/if (!${Corpse.Items}) {
/echo NO LOOT!
/notify LootWnd DoneButton leftmouseup
/call DestroyCopper
/delay 1s
/call checkanchor
/face heading 270
/circle on 21
/keypress forward hold
/return
}
/varset LootTotal ${Corpse.Items}
/for LootSlot 1 to ${LootTotal}
/itemnotify loot${LootSlot} leftmouseup
/delay 5
/if (${LootAllItems}) {
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/autoinventory
/delay 5
} else {
/for LootCheck 1 to ${ItemsToLoot.Size}
/if (${Cursor.Name.Find[${ItemsToLoot[${LootCheck}]}]}) {
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/autoinventory
/delay 5
}
/next LootCheck
}
/if (${Cursor.ID}) {
/echo Destroying a ${Cursor.Name}...
/destroy
/destroy
/delay 5
}
/next LootSlot
/delay 5
/notify LootWnd DoneButton leftmouseup
/delay 2
/call checkanchor
/face heading 270
/circle on 21
/keypress forward hold
/return
Sub CheckAnchor
/if (${Math.Distance[${AnchorY},${AnchorX}]}>12) /call MoveToAnchor
/return
Sub MoveToAnchor
/call indz
/return
|----------------------------------------------------------------------------
|SUB: DestroyCopper - Destroy all the copper
|----------------------------------------------------------------------------
Sub DestroyCopper
/squelch /windowstate InventoryWindow open
/shift /notify InventoryWindow IW_Money3 leftmouseup
/delay 1s ${Cursor.ID}>0
/destroy
/cleanup
/return
|----------------------------------------------------------------------------
|SUB: DestroySilver - Destroy all the silver
|----------------------------------------------------------------------------
Sub DestroySilver
/squelch /windowstate InventoryWindow open
/shift /notify InventoryWindow IW_Money2 leftmouseup
/delay 1s ${Cursor.ID}>0
/destroy
/cleanup
/returnHi all I edited the macro to include zoning and healing by a healer bot using the mastermind plugin.
Before running make sure you have mastermind running between your bard and healer. I coulda just set the macro up to include this but it would require the password to your bot being in the macro. Didn't think most would like that.
Your bot will zone in with you each time you get a new expedition and even add itself to the expidition.
One thing i would like to do that I haven't figured out yet though is too have my cleric bot cast temperence when it wears off my bard.
Anyway here is the code. just replace clericbot with the name of your healer and replace yourtoon with the name of your bard. Also on my healer i'm having it cast superior heal from the 3rd slot so just put whatever heal you want in the 3rd slot and it will cast it twice.
WARNING Don't use this if you are soloing FH you will die I took out the regen loop and instead it's using bot heals to keep going.
EDITED CODE was Broken Check new post for code
Before running make sure you have mastermind running between your bard and healer. I coulda just set the macro up to include this but it would require the password to your bot being in the macro. Didn't think most would like that.
Your bot will zone in with you each time you get a new expedition and even add itself to the expidition.
One thing i would like to do that I haven't figured out yet though is too have my cleric bot cast temperence when it wears off my bard.
Anyway here is the code. just replace clericbot with the name of your healer and replace yourtoon with the name of your bard. Also on my healer i'm having it cast superior heal from the 3rd slot so just put whatever heal you want in the 3rd slot and it will cast it twice.
WARNING Don't use this if you are soloing FH you will die I took out the regen loop and instead it's using bot heals to keep going.
EDITED CODE was Broken Check new post for code
Last edited:
Jumjum5
New member
- Joined
- Dec 18, 2004
- RedCents
- 20¢
To make it so you recast temperance just do this in your code for healer
In your Sub Main, but not your loop put this
/declare temptimer timer outer
In your loop put this
/if (!${temptimer}) {
/target Bardsnamehere
/cast 2
/cast 2
/cast 2
/varset temptimer <amount of time you want to wait>
}
In your Sub Main, but not your loop put this
/declare temptimer timer outer
In your loop put this
/if (!${temptimer}) {
/target Bardsnamehere
/cast 2
/cast 2
/cast 2
/varset temptimer <amount of time you want to wait>
}
ss44
Active member
- Joined
- Sep 13, 2005
- RedCents
- 31¢
Also, howadays since upgrades with EQ and all, when the Castee's buff where's off and the caster is still in the zone it says 'Your #*# spell(s) have worn off of <name>'. so you could also add an event into the macro.
#Event tempnewb "#*#Your Temperance spell has worn off of#*#"
/declare temp outer "Temperance"
/declare <shortname for spell it deletes> outer "real spell name it deletes"
Sub tempnewb
/target Newbtotemp
/memspell 6 ${temp}
/call cast ${temp} gem6
/memspell 6 ${whateverspellitdeletedtomakeroomfortemp}
/delay 5
/return
#Event tempnewb "#*#Your Temperance spell has worn off of#*#"
/declare temp outer "Temperance"
/declare <shortname for spell it deletes> outer "real spell name it deletes"
Sub tempnewb
/target Newbtotemp
/memspell 6 ${temp}
/call cast ${temp} gem6
/memspell 6 ${whateverspellitdeletedtomakeroomfortemp}
/delay 5
/return
Sorry all there were a few issues with the earlier code i posted took it out. Here's the correct code.
just replace clericbot with the name of your healer and replace yourtoon with the name of your bard. Put the heal you want to use in your bot's 3rd slot and should work fine. Will cast the heal you use twice when health on your bard is below 20%.
Working on adding buffs.
WARNING: Don't use if soloing you will die there is no regen loop.
just replace clericbot with the name of your healer and replace yourtoon with the name of your bard. Put the heal you want to use in your bot's 3rd slot and should work fine. Will cast the heal you use twice when health on your bard is below 20%.
Working on adding buffs.
WARNING: Don't use if soloing you will die there is no regen loop.
Code:
|Original Code by Pugs
|Changed by SS44 to include, /fade, /potionbelt, /loot.
|Changed by Cybris to include Healer Bot
| Thanks to Cade for the help ,Jumjum5,
|Infernal, Soultaker Siddin Red and the rest of the brilliant minds
|here at red Guides.
|AFKHALLS.mac
|This was Hacked up by Pugs ~,~
|This could be made much better but this works.
|To use this macro Make a hotkey that says
|
|/echo You have entered Nedaria's Landing
|
|Then start the macro and press your hotkey in Nedaria's.
|You must have warp for this to work correctly
|Soultakers is what i use if you use other you
|will have to change the command to your warp's syntax.
| also /echo end will shut down the macro and zone you out of the halls.
#turbo
#Event MobDied "#*#You have slain#*#"
#event ding "#*#have gained a level! Welcome to level#*#"
#event end "Shutdown12345"
#event invite "#*#invites you to join#*#"
#event Zoned "#*#You have entered Guild Lobby#*#"
#event dzquit "#*#You have entered Nedaria's Landing#*#"
#event PoK "You have entered Guild Lobby."
|Change this to the ^^^^^^^^^^^^^^
|zone you are bound in
|-- Destroys Silver if you have more than the given amount! 0=disable
#define DESTROY_SILVER_IF_ABOVE 1
|-- Destroys Copper if you have more than the given amount! 0=disable
#define DESTROY_COPPER_IF_ABOVE 1
Sub Main
/declare LootAllItems int outer 1
/declare LootSlot int outer 0
|We are waiting for the hotkey to start the macro
:waitforit
/doevents
/doevents
/goto :waitforit
/return
| We have the extra long delay to account for zoneing Time.
| You may set the delay to what you want.
| You also need to change the twist to your line up.
| We then Clear our target so we don't cast on anything.
Sub indz
:begin
/delay 1s
/twist off
/face heading 270
/delay 1s
/warp loc -573.50 162.80 2.15
/tell clericbot /warp loc -573.50 162.80 2.15
/delay 10s
/tell clericbot /target yourtoon
/delay 10s
/tell clericbot /sit
/circle on 21
/keypress forward hold
/twist 1 2 3 1 4 5
/target clear
|This loop calls the events to be redone along with a GM check.
|It checks to insure that the mobs it targets are not over
| level 67(a left over from the vxed mac i think)
|It then check the range of the target if it over 220 it clears it
|The 3rd If command targets an NPC if you do not have a target
|The final Line Watches your health and succor you when you hit 30%
| you could change the command to gate if you like.
| ex /if (${Me.PctHPs}<=30) /gate
:loopstart
/delay 1s
/call GMcheck
/if (${Target.Level}>67) /tar npc next
/if (${Target.Distance}>220) /keypress esc
/if (${Target.ID}==FALSE) /tar NPC radius 220 rat
/if (${Me.PctHPs}<=20) /call succor
/if (${Me.PctHPs}<=80) /potionbelt activate 1
/if (${Me.PctHPs}<=40) /potionbelt activate 2
/doevents
/delay 10
/goto :loopstart
/return
|I dont like to drop too low on hp so i just change to twist in regen
|with my dots
Sub regen
:regenloop
/doevents
/if (${Me.PctHPs}<=20)
/if (${Me.PctHPs}>=90) {
/twist 1 2 3 1 4 5
/return
}
/goto :regenloop
/return
|I never had this one called while i was in zone.
| but it warps you to that loc turn circle off
| and twists selos and heal song then when you reach
| 80% health you go back to killing
Sub succor
/tell clericbot /cast 3
/delay 10s
/tell clericbot /cast 3
/delay 10s
/tell clericbot /sit
/return
/delay 60s
/call regen
/return
| This is the GM check it is called about every 10 seconds.
| It beeps at you then /quits the game.
Sub GMcheck
/if (${Spawn[gm].ID}) {
/echo Gm detected
/beep
/beep
/beep
/q
/endmac
/unload
/q
}
/return
|This next bit removes you from the expdition if you still have it after
| you zone out
|Targets Eldros Danmor warps to him gets the adventure window then it
| warps back to Nideno and says forgotten halls allowing you to zone in.
|You then warp closer to the rock look at point behind the rock and
| press use or u, also you click with the mouse so you mouse needs to be
| in the center of the screen.
Sub event_dzquit
/doevents
/call gmcheck
/disband
/twist off
/delay 2s
/target Eldros Danmor
/warp target
/delay 2s
/say interested in visiting
/delay 3s
/target Nideno Eliagy
/warp target
/delay 2s
/say Forgotten halls
/delay 2s
/doevents
/delay 2s
/warp loc 1544 -665 94
/delay 2s
/face loc 1540, -675
/delay 2s
/look 0
/delay 2s
/doortarget
/delay 2s
/keypress u
/delay 60s
/tell clericbot /warp loc 1544 -665 94
/delay 10s
/tell clericbot /face loc 1540, -675
/delay 10s
/tell clericbot /look 0
/delay 10s
/tell clericbot /doortarget
/delay 10s
/dzadd clericbot
/tell clericbot /notify ConfirmationDialogBox CD_Yes_Button leftmouseup
/delay 10s
/tell clericbot /keypress u
/delay 60s
/delay 1s
/target clear
/call destroysilver
/call indz
/return
|In the event of a water landing....
| This camps you out.
Sub Event_PoK
/echo sorry i don't know how or why but you died.
/circle off
/twist off
/delay 45s
/sit on
/camp desktop
/q
/endmacro
/return
Sub Event_MobDied
/doevents
/twist off
/call GMcheck
/circle off
/keypress forward
/delay 1s
/squelch /declare LootSlot int inner 0
/declare LootCheck int inner 0
/declare LootTotal int inner 0
/target npc corpse radius 200
:MovementLoop
/face fast nolook
/if (${Int[${Target.Distance}]}>13) {
/keypress forward hold
}
/if (${Int[${Target.Distance}]}<13&&${Int[${Target.Distance}]}>11) {
/keypress forward
}
/if (${Int[${Target.Distance}]}<9) {
/keypress back
}
/if (${Int[${Target.Distance}]}>13) {
/goto :MovementLoop
}
/keypress forward
/keypress back
/delay 5
/loot
/delay 5
/if (!${Corpse.Items}) {
/echo NO LOOT!
/notify LootWnd DoneButton leftmouseup
/call DestroyCopper
/delay 1s
/call checkanchor
/face heading 270
/circle on 21
/keypress forward hold
/return
}
/varset LootTotal ${Corpse.Items}
/for LootSlot 1 to ${LootTotal}
/itemnotify loot${LootSlot} leftmouseup
/delay 5
/if (${LootAllItems}) {
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/autoinventory
/delay 5
} else {
/for LootCheck 1 to ${ItemsToLoot.Size}
/if (${Cursor.Name.Find[${ItemsToLoot[${LootCheck}]}]}) {
/echo Keeping a ${Cursor.Name}... WOOT!
/autoinventory
/autoinventory
/delay 5
}
/next LootCheck
}
/if (${Cursor.ID}) {
/echo Destroying a ${Cursor.Name}...
/destroy
/destroy
/delay 5
}
/next LootSlot
/delay 5
/notify LootWnd DoneButton leftmouseup
/delay 2
/call checkanchor
/face heading 270
/circle on 21
/keypress forward hold
/return
Sub CheckAnchor
/if (${Math.Distance[${AnchorY},${AnchorX}]}>12) /call MoveToAnchor
/return
Sub MoveToAnchor
/call indz
/return
|----------------------------------------------------------------------------
|SUB: DestroyCopper - Destroy all the copper
|----------------------------------------------------------------------------
Sub DestroyCopper
/squelch /windowstate InventoryWindow open
/shift /notify InventoryWindow IW_Money3 leftmouseup
/delay 1s ${Cursor.ID}>0
/destroy
/cleanup
/return
|----------------------------------------------------------------------------
|SUB: DestroySilver - Destroy all the silver
|----------------------------------------------------------------------------
Sub DestroySilver
/squelch /windowstate InventoryWindow open
/shift /notify InventoryWindow IW_Money2 leftmouseup
/delay 1s ${Cursor.ID}>0
/destroy
/cleanup
/returnarmysoldier
Well-known member
- Joined
- Jun 26, 2005
- RedCents
- 101¢
on my bard with run 5.. i never use selos..
on my other bard.. now 62 .. i cast selo every 3 song.. it works fine.. mobs don't die as fast as other bard.. but oh well...
8-)
on my other bard.. now 62 .. i cast selo every 3 song.. it works fine.. mobs don't die as fast as other bard.. but oh well...
8-)
- Joined
- Oct 6, 2005
- RedCents
- 120¢
I have been working on perfecting my bard macro for my particular needs. Question: Is there a way to have it call a check to see if anyone is in zone, kind of like the GM call? That way if there is, i can just delay-do call-rinse-repeat. Then I wont be using /warp while anyone else is in zone.
*edit* Why do you see the typo exactly at the same time you press submit..
*edit* Why do you see the typo exactly at the same time you press submit..
armysoldier
Well-known member
- Joined
- Jun 26, 2005
- RedCents
- 101¢
( @ )( @ ) said:I have been working on perfecting my bard macro for my particular needs. Question: Is there a way to have it call a check to see if anyone is in zone, kind of like the GM call? That way if there is, i can just delay-do call-rinse-repeat. Then I wont be using /warp while anyone else is in zone.
*edit* Why do you see the typo exactly at the same time you press submit..
yes .. i gotta find where in here but its player check
do a quick search and you will see it.. RED posted it..
I asked about it the other day and saw the post 8-)
- Joined
- Oct 6, 2005
- RedCents
- 120¢
Thanks Army, I will find it tomorrow . Gettin late and my eyes are burning.. LOL
. Gettin late and my eyes are burning.. LOL
This first example is player detection with a range. The second example is if there are specific people that you want to end mac if they in zone, useful on zek if you have some one that likes to hunt you while you macro.
Example2:
Rich (BB code):
Sub Main
/declare PcRange float outer ${Param0}
| or change Param0 to whatever # you want if you don't want to do /mac macname <Pcrange>
/alert add 1 ${Me}
/alert add 1 someone that is ok to be in range
:loop
/doevents
/if (${Spawn[pc noalert 1 radius ${PcRange}].ID}) /call Wait
/goto :loop
/return
Sub Wait
:pcinrange
/if (${Spawn[pc noalert1 radius ${PcRange}].ID}) {
/goto :pcinrange
} else {
/do some commands here
}
/returnExample2:
Rich (BB code):
Sub Main
:loop
/doevents
/call CheckPlayers
/goto :loop
Sub CheckPlayers
/if (${Spawn[pc PlayerName].ID}) {
/do some stuff here
}
/return