|----------------------------------------------------------
|hitandbind.mac
|Simple practice macro to raise Bind Wound skill
|
|Usage: /mac hitandbind
|
|Effect: Casts DD on self to 20% then binds wounds to max,
|rinse and repeat. Uses spellcast.inc for simplicity/uniformity
|
|By Dragonfire
|Date: 05/11/2007
|----------------------------------------------------------
#include Spell_Routines.inc
#event max "You cannot bandage your target past 70#*#"
#event out "You can't bandage without bandages,#*#"
|------------------------------------------------------------|
| EXAMPLE
|------------------------------------------------------------|
|#event invis "Your Invisibility spell has worn off of #1#."
|------------------------------------------------------------|
Sub Main
/echo Hit and Bind started.
/declare Maxxed bool outer
:loop
/if (${Me.Standing} && !${Me.Mount.ID}) /sit
/call MedBreak
/IF (${Target.ID} == NULL) /target ${Me}
/varset Maxxed False
:hitloop
/if (${Me.PctHPs}<20) {
/goto :bindwound
}
/call cast "Summer's Dew Rk. II" gem3 4s
/goto :hitloop
:bindwound
/keypress hot2_6
/delay 10s
/doevents
/if (${Maxxed}) {
/goto :loop
}
/goto :bindwound
/return
sub MedBreak
/Echo Med Break!!!!
:Medup
/if (!${Me.Sitting}) /sit
:KeepMedding
/if (${Me.CurrentMana} < ${Me.MaxMana}) {
/delay 5s
/goto :KeepMedding
}
/return
|------------------------------------------------------|
| EXAMPLE
|------------------------------------------------------|
|Sub Event_invis(string, playername)
| /echo ${playername} has lost invisibility
| /target ${playername}
| /delay 1s
| /call cast "Invisibility" gem8 4s
|/return
|------------------------------------------------------|
Sub Event_max(string)
/echo I am HEALED!.
/varset Maxxed True
/return
Sub Event_out
/Echo Oops! Need bandages. Where is that Mage?
/endmacro
/return