Power level assist package

[Higamorph]

There is two macros in this post. The first one throws a stone on the power leveled character to inflict the 1pt of damage need to use the damage shield power level method.

|Written by Higamorph for Red Guides
|Written 4 of 2007
|Purpose - To automate the throw stone abilty to powerlevel a alt with the point blank damage shield method.
|The macro as written requires mq2eqbc to be loaded.   
|I suggest binding the start command to a key on the powerleveler, as it will only work with mobs in a 50 loc radius.
|Thanks to Pugs for helping me being to learn macrowriting

Sub main
/bc ********************   
/bc ***Hit it started***
/bc ********************

/if (!${SpawnCount[npc radius 50]}) {
	   /bc **********************
	/bc ***No Mobs in Range***
	/bc **********************
   /return
}
   
   /keypress CYCLENPCTARGETS
   /declare start int outer ${Target.ID}
   /declare cnt int outer 1
   /delay 1s
   /disc Throw Stone
   /delay 10s
   /keypress CYCLENPCTARGETS

:loop

/if (${Target.ID}==${start}) {
	/goto :end
 } else {
   /delay 1s
   /varcalc cnt ${cnt}+1
   /disc Throw Stone
   /delay 10s
   /keypress CYCLENPCTARGETS
   /goto :loop
 }

:end
/bc *****************************
/bc *I hit ${cnt} mobs		  *
/bc *****************************
/bc ***Finished ~ Ready for DS***
/bc *****************************
/end
/return

 

[Higamorph]

|Written by Higamorph for Red Guides
|Written 4 of 2007
|Purpose - To provide out of group healing.
|  
|
|Thanks to Pugs for helping me being to learn macrowriting
|Usage notes follow:
|Sytax
|/mac ooghealer healptc numberOfPeople NAME NAME2 NAME3


#include spell_routines.inc
#turbo

Sub main
/declare personToHeal[${Param2}] string outer
/declare healpct int local ${Param1}
/declare bigheal string outer "Pious Light"
/declare gem int outer 1
/declare i int local 1
/declare cnt int local 1


/echo ${Param1} #1#
/echo $${Param2} #2#

/echo this is i ${i}
/echo this is cnt ${cnt}
/echo this is heal pct ${healpct}
/echo this is big heal ${bigheal}
/echo this is gem ${gem}

/for i 1 to ${Param2}
	/varset personToHeal[${i}] #${i+1}#
/next i
/echo we are healing ${personToHeal[1]}

:healloop
/for cnt 1 to #1#
	/tar ${personToHeal[${cnt}]}
	/delay 1s
	/if (${Target.PctHPs}<${healpct}) /call heal
/next cnt
/goto :healloop


Sub Heal
/delay 1s
/call cast "${bigheal}" gem${gem}
/tt BE HEALED!!!

 

[someoneorsomething]

This also uses /bc. Just so peeps know

 

[Pugs]

|Written by Higamorph for Red Guides
|cleaned up a bit by Pugs 
|Written 4 of 2007
|Purpose - To provide out of group healing.
|  
|Sytax
|/mac ooghealer healptc numberOfPeople NAME NAME2 NAME3
| healpct = what pct you want to start healing at
| numberofPeople= how mnay people you are healing
| followed by the names of the people you are healing.

#include spell_routines.inc


Sub main

/declare personToHeal[${Param2}] string outer
/declare healpct int local ${Param1}
/declare bigheal string outer "Pious Light"
/declare gem int outer 1
/declare i int local 1
/declare cnt int local 1

/echo healing started

/for i 1 to ${Param2}
	/varset personToHeal[${i}] #${i+1}#
/next i

:healLoop
/for cnt 1 to #1#
	/tar ${personToHeal[${cnt}]}
	/delay 1s
	/if (${Target.PctHPs}<${healpct}) /call heal
/next cnt
/goto :healLoop


Sub Heal
    /delay 1s
    /call cast "${bigheal}" gem${gem}
    /tt BE HEALED!!!
/return