Necro group macro

[ss44]

This is my macro for my necro, for when I am boxing other toons. It casts 3 dots, lifetap, direct damage, mind wrack, snare (triggered, comment out or change if you dont have.), a triggered dot (same thing, comment out if you dont have.) and feign death's between casts.(AA, if you dont have, change). If you have any questions, please reply.
This is not an AFK macro, its for grouping.

|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|~~~~~~~~~~~~~~~~~~~~~~FHNecro.mac~~~~~~~~~~~~~~~~~~~~~~~~
|~~~~~~~~~~~~~~~~~~~~~Written by SS44~~~~~~~~~~~~~~~~~~~~~
|~~~~~~~~~~~~~~~~~~~~~~For RedGuides~~~~~~~~~~~~~~~~~~~~~~
|~~~~~~~~~~~~~~~~~~~~~~Thanks Siddin~~~~~~~~~~~~~~~~~~~~~~
|~~~~~~~~~~~~~~~~~For Helping Clean it up~~~~~~~~~~~~~~~~~
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Spells:
|1:Magic DOT
|2:Fire Dot
|3:Fire Dot
|4:Disease Dot
|5:Nuke1
|6:Lich / Rune / Shielding
|7:Pet Haste
|8:Dis Dot 1  / Twitch 1
|9:Dis Dot 2  / Twitch 2
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|Target the main assist in the group then start the macro
|The person that you have targeted will be the assist in the
|Macro, so make sure its someone that will not be mezzing
|Targets and whatnot for best results.

#turbo
#include spell_routines.inc
#chat group 
#chat tell
#event Dzadd "PERSONYOUWANTTOADD tells you, 'CODEWORD'"
#event Invite "#*#invites you to join#*#"
#event Lich_Off "The dark spirit fades.#*#"
#event Guard_Off "The shadow fades away.#*#"
#event Pet_Haste "#*#Your pet's Glyph of Darkness spell has worn off#*#"
#event Zoned "#*#You have entered Guild Lobby#*#"
#event Dzquit "#*#You have entered Nedaria's Landing#*#" 
#event Rune_Off "You can feel pain again.#*#"
#event FD_fail "#*#has fallen to the ground.#*#"
#event PoK "You have entered Guild Lobby."
#Event Twitch_On "#*#TwitchOn#*#" 
#Event Twitch_Off "#*#TwitchOff#*#" 
#Event Twitch_Off "#*#Stop Twitching#*#"
#event Being_Hit "#*#your magical skin ABSORBES the blow#*#"
#event Being_Hit "#*#bites YOU for#*#"
#event Being_Hit "#*#bites YOU for#*#"
#event Being_Hit "#*#kicks YOU for#*#"
#event Being_Hit "#*#bashes YOU for#*#"
#event Dot1_Off "#*#Your Dark Nightmare spell has worn off of#*#"
#event Dot2_Off "#*#Your Ancient: Curse of Mori spell has worn off of#*#"
#event Dot3_Off "#*#Your Pyre of Mori spell has worn off of#*#"
#event Dot1_Resist "#*#resisted your Dark Nightmare spell.#*#"
#event Dot2_Resist "#*#resisted your Pyre of Mori spell.#*#"
#event Dot3_Resist "#*#resisted your Funeral Pyre of Kelador spell.#*#"
#event LifeTapRestist "#*#resisted your Ancient: Touch of Orshilak spell.#*#"
#Event MobDied "#*#been slain by#*#"
#Event MobDied "#*#You have slain#*#"
#Event MobDied "#*#experience#*#"
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Sub Main
|~~~~~~~~~~~~~~~~~~~~~~~~~Dots~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/declare MASTER			   string outer ${Target.Name}
/declare Dot1 outer "Dark Nightmare" 
/declare Dot2 outer "Ancient: Curse of Mori" 
/declare Dot3 outer "Pyre of Mori"
/declare Nuke1 outer "Acikin"
/declare LifeTap Outer "Ancient: Touch of Orshilak"
|~~~~~~~~~~~~~~~~~~~~~~~~~Buffs~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/declare Rune outer "Dull Pain"
/declare MW outer "Mind Wrack"
/declare Guard outer "Shadow Guard"
/declare Lich outer "Dark Possession"
/declare Twitch1 string outer "Sedulous Subversion" 
/declare Twitch2 string outer "Covetous Subversion"
/declare FD string outer "Death Peace"
|~~~~~~~~~~~~~~~~~~~~~~~Pet Spells~~~~~~~~~~~~~~~~~~~~~~~~~~
/declare Pet outer "Lost Soul"
/declare Pethaste outer "Glyph of Darkness" 
|~~~~~~~~~~~~~~~~~~~~~~~~Variables~~~~~~~~~~~~~~~~~~~~~~~~~~
 /declare diditresist int outer 0
 /declare gettarget int outer 0
 /declare Twitching int outer 0

 /declare LootAllItems int outer 1 
 /declare LootSlot int outer 0 
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|We are waiting for the hotkey to start the macro
	:waitforit
	/doevents
	/if (${gettarget}==1) {
	/call GetTarget
	/varset gettarget 0
	}
	/goto :waitforit
/return
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Twitch_On 
 	/rt
 	If (${Twisting}==0) {
 	/if (!${Target.ID}) { 
 	/echo is not in zone for me to Twitch! 
 	/r Im not even in the same zone as you! 
 	/return 
 } 
 	/delay 2 
 	/if (${Target.Distance}<100) {
 	/rt 
 	:Twitch_Loop 
 	/doevents 
 	If (${Twisting}==0) {
 	/call cast ${Twitch1} gem8 
 	/call cast ${Twitch2} gem9 
 	/delay 5 
 	/goto :Twitch_Loop
 	}
 	/goto :end
 }
 	}else{
 	/t ${ChatSender} Your oor sry.		   
 	} 
 }
 	:end
 	/varset Twitching 0
 	   /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Twitch_Off
 	/varset Twitching 1
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub GetTarget   
 	:loopstart
 	/call GM_Check  
 	/ASSIST ${MASTER}
 	/delay 5
 	/if (${Target.PctHPs}>=97) {
 /goto :loopstart
 }	
 	/if (${Me.PctMana}<=20) /call Med
 	/if (${Me.PctHPs}<=20) /fd_FAIL
 	/if (${Me.PctHPs}<=40) /potionbelt activate 1
 	/if (${Target.Distance}>220) /keypress esc
 	/if (!${Target.ID}) /goto :loopstart
 	/Pet Attack
 	/Call Attack
 	/doevents
 	/delay 5
 /return  
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Med
 	/echo Need mana, medding
 	/if (${Me.SpellReady[${Lich}]}) { 
 	/stand on
 	/call cast ${Lich} gem9
 	/delay 3s
 }
 	/sit on
 	:MedLoop
 	/if (${Me.PctMana}>=50) /return 
 	/goto :MedLoop
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Rune_Off
 	/if (${Me.SpellReady[${Rune}]}) { 
 	/stand on
 	/call cast ${Rune} gem8
 	/delay 4s
 }
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Regen
 	:regenloop
 	/potionbelt activate 1
 	/sit
 	/if (${Me.PctHPs} == 100) /return
 	/goto :regenloop
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub GM_Check  
 	/if (${Spawn[gm].ID}) {  
 	/echo Gm detected  
 	/beep 
 	/beep 
 	/beep  
 	/q 
 	/endmac 
 	 /unload 
 	/q  
 }  
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Nuke1
 	/if (${Me.SpellReady[${Nuke1}]}) { 
 	/stand on
 	/delay 1s
 	/call cast ${Nuke1} gem1 
 	/doevents
 }
 	/if (${diditresist}==1)  /goto :Main_Dot_Loop  
 	/varset diditresist 0
 	/echo ${Nuke1} LANDED, on to next spell! 
 	/call cast "Death Peace" alt
 	/delay 1s
 	/stand on
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Pet_Haste 
 	/if (${Me.Pet.ID}) { 
 	/if (!${Me.PetBuff[Glyph of Darkness]} { 
 	/stand on 
 	/call PBuffShieldHaste 
 	/assist
 } 
 	} else { 
 	/echo You dont have a pet!
 	/call cast ${Pet} Gem5 
 } 
 	/echo Shrinking pet twice!!! 
 	/call cast ${Shrink} Gem5
 	/delay 10 
 	/call cast ${Shrink} Gem5
 	/pet taunt on 
 /return 
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub PBuffShieldHaste 
 	:DoH
 	/if (${Me.Pet.ID}) { 
 	/stand on 
 	/delay 2s
 	/call Cast ${Pethaste} gem7 15s  
 } 
 	} else { 
 	/echo You dont have a pet!
 	/call cast ${Pet} Gem5
 	/goto :DoH 
 } 
 	/echo Shrinking pet twice!!! 
 	/call cast ${Shrink} Gem5
 	/delay 10 
 	/call cast ${Shrink} Gem5
 	/pet taunt on 
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Buffs
 	/if (!${Me.Buff[Seduction of Saryrn].ID}) {  
 	/stand on
 	/call cast ${Lich} gem6	 
 	/delay 5 
 } 
 	/if (!${Me.Buff[Force Shield].ID}) { 
 	/call cast ${Rune} gem6
 } 
 	/if (!${Me.Buff[Shadow Guard].ID}) { 
 	/call cast ${Shielding} gem6
 }
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot1_Off
 	/call Dot1
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot2_Off
 	/call Dot2
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot3_Off
 	/call Dot3
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot1
 	:Main_DoT_Loop
 	/if (${Me.SpellReady[${Dot1}]}) { 
 	/stand on
 	/delay 1s
 	/call cast ${Dot1} gem1 
 	/doevents
 }
 	/if (${diditresist}==1)  /goto :Main_Dot_Loop  
 	/varset diditresist 0
 	/echo ${Dot1} is going, on to next spell! 
 	/call cast "Death Peace" alt
 	/delay 1s
 	/stand on
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot2
 	:Main_DoT_Loop
 	/if (${Me.SpellReady[${Dot2}]}) { 
 	/stand on 
 	/delay 1s
 	/call cast ${Dot2} gem1 
 	/doevents
 }
 	/if (${diditresist}==1)  /goto :Main_Dot_Loop 
 	/varset diditresist 0
 	/echo ${Dot2} is going, on to next spell! 
 	/call cast "Death Peace" alt
 	/delay 1s
 	/stand on
 	/if (${gettarget}==1) {
 	/call GetTarget
 	/varset gettarget 0
 	}
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot3
 	:Main_DoT_Loop
 	/if (${Me.SpellReady[${Dot3}]}) {  
 	/stand on
 	/delay 1s
 	/call cast ${Dot3} gem1 
 	/doevents
 }
 	/if (${diditresist}==1)  /goto :Main_Dot_Loop 
 	/varset diditresist 0 
 	/echo ${Dot3} is going, on to next spell! 
 	/call cast "Death Peace" alt
 	/delay 1s
 	/stand on
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Attack
 	/delay 15
 	:attackstart

	/face
	/if (${Target.PctHPs}<=90 && ${Target.PctHPs}>=80 && ${Target.Type.NotEqual[PC]}) /call Dot1
	/face
	/if (${Target.PctHPs}<=80 && ${Target.PctHPs}>=70 && ${Target.Type.NotEqual[PC]}) /call Dot2
 	/face
	/if (${Target.PctHPs}<=70 && ${Target.PctHPs}>=60 && ${Target.Type.NotEqual[PC]}) /call Dot3  	
	/face
	/if (${Target.PctHPs}<=98 && ${Target.PctHPs}>=88 && ${Target.Type.NotEqual[PC]}) /call cast "Dagger of Death" item
	/face
|	/if (${Target.PctHPs}<=45 && ${Target.PctHPs}>=25 && ${Target.Type.NotEqual[PC]}) /call cast "Ossein of Limitless Time" item
 	/face
	/if (${Target.PctHPs}<=40 && ${Target.PctHPs}>=20 && ${Target.Type.NotEqual[PC]}) /call MW	
 	/face
	/if (${Target.PctHPs}<=60 && ${Target.PctHPs}>=50 && ${Target.Type.NotEqual[PC]}) /call LifeTap
	/face
	/if (${Target.PctHPs}<=25 && ${Target.PctHPs}>=15 && ${Target.Type.NotEqual[PC]}) /call Nuke1
 	/face
	/if (!${Target.ID}) /return
 	/goto :attackstart
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot1_Resist
 	/call Dot1
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot2_Resist
 	/call Dot2
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Dot3_Resist
 	/call Dot3
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub FD_Fail
 	/stand on
 	/if (${Me.SpellReady[${FD}]}) {  
 	/delay 10
 	/call cast "Death Peace" alt
 }
	/doevents
 	/delay 1s
 	/stand on
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Being_Hit
 	/call FD_Fail
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Lich_Off
 	/if (!${Me.Buff[Dark Possession].ID}) {  
 	/stand on
 	/call cast ${Lich} gem6	 
 	/delay 5
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Guard_Off
 	/if (!${Me.Buff[Dull Pain].ID}) {  
 	/stand on
 	/call cast ${Guard} gem6	 
 	/delay 5
 /return
 |~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Sub Event_MobDied
 /varset diditresist 0
 /varset gettarget 1
 /return

 Sub MW
 	/if (${Me.SpellReady[${MW}]}) { 
 	/stand on
 	/call cast ${MW} gem1 
 	/doevents
 }
 	/if (${diditresist}==1)  /goto :Main_Dot_Loop  
 	/varset diditresist 0
 	/echo ${MW} is going, on to next spell! 
 /return
 
Sub LifeTapResist
	/call LifeTap
/return

Sub LifeTap
 	:Main_DoT_Loop
 	/if (${Me.SpellReady[${LifeTap}]}) { 
 	/stand on
 	/call cast ${LifeTap} gem1 
 	/doevents
 }
 	/if (${diditresist}==1)  /goto :Main_Dot_Loop  
 	/varset diditresist 0
 	/echo ${LifeTap} LANDED, on to next spell! 
 	/call cast "Death Peace" alt
 	/delay 1s
 	/stand on
 /return

 

[Crypto]

This is my macro for my necro, for when I am boxing other toons. It casts 3 dots, lifetap, direct damage, mind wrack, snare (triggered, comment out or change if you dont have.), a triggered dot (same thing, comment out if you dont have.) and feign death's between casts.(AA, if you dont have, change). If you have any questions, please reply.
This is not an AFK macro, its for grouping.

Just a couple general questions. Was this written for a specific zone? I notice in the succor section you are succoring to a specific location. Is there a reason why you don't use /warp succor?

Secondly, if this is not an afk macro, why do you have him camping after a death?

I just like to see why folks do things certain ways.

Thanks,
Crypto

 

[shadowman33]

well, I assume(which is usually my first down fall) that he does not use /warp succor because this is a grouping macro. If you have enough accounts to box you group, then I guess the decision to use it is yours. I only 2 box on most times, and use them in full groups so /warp succor is not an option. Just guessing, but this might be the reason.

 

[ss44]

It was an AFK macro that I adjusted to grouping. I will take that out. Thanks.

 

[Crypto]

well, I assume(which is usually my first down fall) that he does not use /warp succor because this is a grouping macro. If you have enough accounts to box you group, then I guess the decision to use it is yours. I only 2 box on most times, and use them in full groups so /warp succor is not an option. Just guessing, but this might be the reason.

Yeah.. but I think the warp he has in there is just taking the place of a /warp succor... like another place he likes to succor to if it's not the actual succor point. So either way he would be warping somewhere

Wasn't a big deal as I said, I just like to see how other folks do things.

 

[Crypto]

It was an AFK macro that I adjusted to grouping. I will take that out. Thanks.

I'll give it a try tonight and see how it goes.. I use a modified version of the necro mac from MQ2 boards which works pretty well. But I like to try diff macros.

 

[ss44]

Understandable. I tried to clean it up as best I could so peeps would understand things. (Lol) and I wanted to have people use my work, because writing macros is a bitch for some people, and lots of peeps have bots so I want my shit to work correctly. But I have to have other peeps look at my code, because I am, after all, "The Writter of Shitty Code" lol.

 

[Crypto]

It was an AFK macro that I adjusted to grouping. I will take that out. Thanks.

Just read a bit more and saw a couple of other little things SS..

#event Being_Hit "#*#your magical skin ABSORBES the blow#*#" - Looks like absorbs is spelled wrong unless it's that way in the game. Not a real important event anyway.. But what the hey

Dark Possession seems to be misspelled in Buffs section.

Also, is there a reason for not checking to make sure you are hurt before you cast lifetap?

Crypto

 

[Crypto]

Understandable. I tried to clean it up as best I could so peeps would understand things. (Lol) and I wanted to have people use my work, because writing macros is a bitch for some people, and lots of peeps have bots so I want my shit to work correctly. But I have to have other peeps look at my code, because I am, after all, "The Writter of Shitty Code" lol.

Hey I think I have worked with several people with that same title..

But seriously, at least you write your own, which is cool.

 

[ss44]

Because its not really casting because you are getting hurt, its casting because of the damage and healing the little bit you lose from lich in case your regen isnt that high. Everything in the macro, event wise, is taken straight from the game hehe.

 

[ss44]

minus my spelling error on the lich lol

 

[Crypto]

Because its not really casting because you are getting hurt, its casting because of the damage and healing the little bit you lose from lich in case your regen isnt that high. Everything in the macro, event wise, is taken straight from the game hehe.

Hehe.. leave it to SoE to leave misspelled words in the game

 

[nyghteyes]

I'm almost tempted to move my necro to a new acct for this afk dps hehe Rock on SS44

 

[iceman_001]

When I start this macro it does nothing? Any clues here? Thx.

 

[ss44]

When you start it, have the main tank targeted. Make sure that you have the spells memmed, it will not mem them for you. Sometimes it takes a mob or 2 to get it working.