odd request :-)

Have a macro idea but not sure where to start? Ask here.

Moderator: MacroQuest Developers

JoeyChuck
decaying skeleton
decaying skeleton
Posts: 9
Joined: Sun Oct 17, 2004 5:38 pm

odd request :-)

Post by JoeyChuck » Wed Oct 20, 2004 2:31 pm

I 2 box a mage cleric. I was wondering if someone could whip up a little macro with a cleric that just nukes for when i have my mage in tables group! I would like it to use reproach maybe 4-5 times. I looked at the wizard macro and was initially going to try and edit it but its way over my head :-) any help is apreciated.

User avatar
blueninja
a grimling bloodguard
a grimling bloodguard
Posts: 541
Joined: Thu Aug 28, 2003 7:03 am
Location: Göteborg, Sweden

Post by blueninja » Wed Oct 20, 2004 3:06 pm

This is a simple macro I did while playing a wizard alt. Took out some wizard specific stuff like snare and harvest and whatnot. You should be able to make it do what you want easily..

Code: Select all

#include spell_routines.inc

#event HitMe "#*# YOU for #*# points of damage."
Sub Event_HitMe
	/varset SitTimer 100
	/varset NukeTimer 100
/return

Sub Main
	/if (!${Target.ID} || ${Target.Type.NotEqual[pc]}) {
		/echo Target the player you want to assist before starting the macro.
		/beep
		/endm
	}

	/declare NukeWait int outer 50
	/declare NukeTimer timer outer
	/declare NukeSpell string outer lightning shock
	/declare MainAssist string outer ${Target.CleanName}
	/declare AssistTimer timer outer
	/declare SitTimer timer outer
	/declare AssistRadius int outer 100
	
	:endlessloop
		/doevents
		/if (!${Target.ID} || ${Target.Type.NotEqual[npc]} || ${Target.Distance}>100) {
			/if (${Spawn[pc ${MainAssist}].Distance}<${AssistRadius} && ${SpawnCount[npc radius ${AssistRadius}]} && !${AssistTimer} && ${Spawn[pc ${MainAssist}].LineOfSight}) {
				/echo /assist ${MainAssist}
				/assist ${MainAssist}
				/varset AssistTimer ${Math.Calc[40+${Math.Rand[40]}]}
			}
		} else {
			/if (${Me.PctMana}>65 && !${NukeTimer} && !${Me.Stunned} && !${Me.Casting.ID} && ${Target.PctHPs}>15 && ${Target.PctHPs}<95 && ${Target.LineOfSight}) {
				/if (!${Me.Standing}) /stand
				/call Cast "${NukeSpell}" gem5
				/if (${Macro.Return.Equal[CAST_SUCCESS]} || ${Macro.Return.Equal[CAST_RESISTED]}) {
					/varset NukeTimer ${NukeWait}
					/varset SitTimer ${Math.Calc[${NukeWait}+20]}
				}
			}
		}
		/if (!${Me.Casting.ID} && !${SitTimer} && !${Me.Sitting} && ${Me.PctMana}<97) {
			/sit
		} else {
			/if (!${Me.Standing} && ${Me.PctMana}>=99) /stand
		}
	/goto :endlessloop

/return

JoeyChuck
decaying skeleton
decaying skeleton
Posts: 9
Joined: Sun Oct 17, 2004 5:38 pm

Post by JoeyChuck » Wed Oct 20, 2004 8:09 pm

thanks :-)