unknown405
Active member
- Joined
- Nov 17, 2006
- RedCents
- 100¢
I had my druid and alt on the same account before they were switched and I remember how much I wanted to PL myself... this was before I was using MacroQuest. I was thinking it would just be so easy to just send a tell saying heal and INSTANTLY it would heal me, and the same for any buff. So I made a macro for it.
Thanks LOADS to timbuktu, he helped me a lot and I couldn't have done it without him. Took a couple of snippets from some other druid macros as I'm still new at this. Anyway here's the macro and look on the next post for instructions on how to use it.
Easy Druid PL.mac
Thanks LOADS to timbuktu, he helped me a lot and I couldn't have done it without him. Took a couple of snippets from some other druid macros as I'm still new at this. Anyway here's the macro and look on the next post for instructions on how to use it.
Easy Druid PL.mac
Rich (BB code):
| EaSy DruiD MaCrO [Version 1.0]
| Designed by UnkNowN
|
| ::INSTRUCTIONS::
|
| This macro is easy as pie to use. You just simply get in the same zone
| as your alt, and type /mac easydruidmac and that's it you're done
| with your druid. Now get on your alt and use one of the many commands to
| completely control your druid without switching windows once. Make sure
| you change "YOURTOONNAMEHERE" under Declares to your alts name.
|
| ::COMMANDS::
|
| The following commands must be sent in a tell to your druid. They will
| instantly cast the spell you request, or any other command you
| request and send you a tell saying their doing it. The commands are as
| follows...
|
| "Follow" - Tells your druid to auto-follow you, don't need to be in a group.
| "StopFollow" - Stops your druid from auto-following you.
| "Heal" - Casts your highest healing spell.
| "Thorns" - Casts your highest thorns spell.
| "Regen" - Casts your highest regeneration spell.
| "Strength" - Casts your highest strength spell.
| "Health" - Casts your highest HP Buff.
| "Resist" - Still under construction, casts whatever resist you have loaded.
| "Speed" - Casts Spirit of Wolf/Spirit of Eagle.
| "Buffage" - Casts all the spells above
|
| ::DETAILS::
|
| When you give your druid instructions to cast any of these spells, they will
| automatically stop following you, cast the spell, and re-follow you if you
| already told them "follow." This macro is still under construction, so send
| me a PM on RedGuides if you want anything added, username is unknown405. I'm
| currently working on more commands, such as "horse" , to tell your druid to summon
| a horse ; "HELP" , to tell your druid to send you an invite, wait until you have
| joined and cast group succor, and more.
|
| ::CREDITS::
|
| The only person I'd really like to thanks is timbuktu as I could never have done this
| without him. He helped me on every little error I had, and read through my macro to
| make sure it was working order, thanks. I also would like to thanks everyone who sent
| a druid/cleric macro to RedGuides, you might find a couple of your snippets in here ;p
|
| ::DISCLAIMER::
|
| This macro was designed for RedGuides, free of charge. If you paid anything for this, please
| contact "unknown405" on RedGuides right away. If you want to use this on another site, ask
| me before sticking it up there without my permission.
|
|
|
|
|
#chat group
#chat tell
#Event OutDoor "#*#outdoors#*#"
#Event OutDoor "You can not summon a mount here."
#Event Zoning "You have entered#*#"
#Event ImDead "You have been slain by#*#"
#include Spell_Routines.inc
Sub Main
|+++++++++++++++++++++++++++
| Declares +
|+++++++++++++++++++++++++++
/declare plingtoon string outer YOURTOONNAMEHERE
/declare following int outer 0
/declare follname string outer NULL
|+++++++++++++++++++++++++++
| Summon Mount +
|+++++++++++++++++++++++++++
/declare Mount outer "Black Chain Bridle"
|+++++++++++++++++++++++++++
| Re-Buff Alt Spells +
|+++++++++++++++++++++++++++
/declare SpellSingleBuff[6] string outer
/varset SpellSingleBuff[1] string outer "${Me.Gem[2]}"
/varset SpellSingleBuff[2] string outer "${Me.Gem[3]}"
/varset SpellSingleBuff[3] string outer "${Me.Gem[4]}"
/varset SpellSingleBuff[4] string outer "${Me.Gem[5]}"
/varset SpellSingleBuff[5] string outer "${Me.Gem[6]}"
/varset SpellSingleBuff[6] string outer "${Me.Gem[7]}"
|+++++++++++++++++++++++++++
| Check Mana Level +
|+++++++++++++++++++++++++++
:Main_Loop
/doevents
|+| Check if you're standing, if
|+| less than 30% than sit down.
/if ( ${Me.State.Equal[Stand]} && ${Me.PctMana}<${SitAt} && !${Me.Moving}) /sit
/goto :Main_Loop
/return
|++++++++++++++++++++++++++++++++++++++++++++
| Stop all commands, unless a tell +
|++++++++++++++++++++++++++++++++++++++++++++
Sub Event_Chat(string ChatType,string ChatSender,string ChatText)
/if (!${ChatType.Equal[TELL]}) /return
|+++++++++++++++++++++++++++
| Heal Request +
|+++++++++++++++++++++++++++
/if (!${ChatSender.Equal[${plingtoon}]}) /return
/if (${ChatText.Find[heal]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[1]} please stay in radius!!
/call cast "${Me.Gem[1]}" gem1
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| Thorns Request +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[thorns]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[2]} please stay in radius!!
/call cast "${Me.Gem[2]}" gem2
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| Regen Request +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[regen]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[3]} please stay in radius!!
/call cast "${Me.Gem[3]}" gem3
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| Strength Request +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[strength]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[4]} please stay in radius!!
/call cast "${Me.Gem[4]}" gem4
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| HP Buff Request +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[health]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[5]} please stay in radius!!
/call cast "${Me.Gem[5]}" gem5
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| Resist Request +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[resist]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[6]} please stay in radius!!
/call cast "${Me.Gem[6]}" gem6
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| Speed Request +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[speed]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]} && ${Target.Distance}<=100) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} Incoming ${Me.Gem[7]} please stay in radius!!
/call cast "${Me.Gem[7]}" gem7
/stick unpause
}
/return
}
|+++++++++++++++++++++++++++
| Auto Follow +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[follow]}) {
/target pc ${ChatSender}
/delay 2s ${Target.ID}
/if (${Target.Type.Equal[PC]}) {
/stick hold
/tell ${ChatSender} I am now Auto-Following you, say stopfollow when you want me to stop.
}
/return
}
|+++++++++++++++++++++++++++
| Stop Follow +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[stopfollow]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]}) {
/stick off
/tell ${ChatSender} I am no longer Auto-Following you.
}
/return
}
|+++++++++++++++++++++++++++
| Full Buff +
|+++++++++++++++++++++++++++
/if (${ChatText.Find[Buffage]}) {
/target pc ${ChatSender}
/if (${Target.Type.Equal[PC]}) {
/stick pause
/delay 1s !${Me.Moving}
/tell ${ChatSender} You are now being MASS buffed... Stay in range!!
/delay 1s
/call cast "${Me.Gem[2]}" gem2
/delay 10s ${Me.SpellReady[${Me.Gem[3]}]}
/call cast "${Me.Gem[3]}" gem3
/delay 10s ${Me.SpellReady[${Me.Gem[4]}]}
/call cast "${Me.Gem[4]}" gem4
/delay 10s ${Me.SpellReady[${Me.Gem[5]}]}
/call cast "${Me.Gem[5]}" gem5
/delay 10s ${Me.SpellReady[${Me.Gem[6]}]}
/call cast "${Me.Gem[6]}" gem6
/delay 10s ${Me.SpellReady[${Me.Gem[7]}]}
/call cast "${Me.Gem[7]}" gem7
/stick unpause
}
/return
}
/return