"/tell cleric01 h person01" = heal over time cast on the person01, etc.
Code: Select all
| 2boxHeal.mac
#Event HealL "#1# tells you, 'l #2#'"
#Event HealR "#1# tells you, 'r #2#'"
#Event HealC "#1# tells you, 'c #2#'"
#Event HealH "#1# tells you, 'h #2#'"
#Event HealG "#1# tells you, 'g'"
#Event HealP "#1# tells you, 'p #2#'"
#Event DI "#1# tells you, 'di #2#'"
#event Fizzle "Your spell fizzles#*#"
Sub Main
/declare FizzleSlot int outer
/declare FizzleTimer timer outer 2s
/declare LightSpell string outer "Solemn Light Rk. II"
/declare RemedySpell string outer "Solemn Remedy Rk. II"
/declare CompleteSpell string outer "Complete Heal"
/declare HoTSpell string outer "Solemn Elixir"
/declare PromiseSpell string outer "Promised Restoration"
/declare GroupSpell string outer "Word of Vivacity"
/declare DISpell string outer "Divine Intervention"
/echo 2BoxHeal Activated
:MainLoop
/doevents
/goto :MainLoop
/return
Sub Event_Fizzle(Textstuff)
/if (${FizzleTimer}>0) {
/cast ${FizzleSlot}
/varset FizzleTimer 2s
}
/return
Sub Event_HealL(Line,Teller,Who)
/if (${Who.NotEqual[target]}) {
/tar pc ${Who}
} else {
/assist ${Teller}
}
/cast ${LightSpell}
/varset FizzleSlot ${Me.Gem[${LightSpell}]}
/varset FizzleTimer 2s
/return
Sub Event_HealR(Line,Teller,Who)
/if (${Who.NotEqual[target]}) {
/tar pc ${Who}
} else {
/assist ${Teller}
}
/cast ${RemedySpell}
/varset FizzleSlot ${Me.Gem[${RemedySpell}]}
/varset FizzleTimer 2s
/return
Sub Event_HealC(Line,Teller,Who)
/if (${Who.NotEqual[target]}) {
/tar pc ${Who}
} else {
/assist ${Teller}
}
/cast ${CompleteSpell}
/varset FizzleSlot ${Me.Gem[${CompleteSpell}]}
/varset FizzleTimer 2s
/return
Sub Event_HealH(Line,Teller,Who)
/if (${Who.NotEqual[target]}) {
/tar pc ${Who}
} else {
/assist ${Teller}
}
/cast ${HoTSpell}
/varset FizzleSlot ${Me.Gem[${HoTSpell}]}
/varset FizzleTimer 2s
/return
Sub Event_HealG(Line,Teller,Who)
/cast ${GroupSpell}
/varset FizzleSlot ${Me.Gem[${GroupSpell}]}
/varset FizzleTimer 2s
/return
Sub Event_HealP(Line,Teller,Who)
/if (${Who.NotEqual[target]}) {
/tar pc ${Who}
} else {
/assist ${Teller}
}
/cast ${PromiseSpell}
/varset FizzleSlot ${Me.Gem[${PromiseSpell}]}
/varset FizzleTimer 2s
/return
Sub Event_DI(Line,Teller,Who)
/if (${Who.NotEqual[target]}) {
/tar pc ${Who}
} else {
/assist ${Teller}
}
/cast ${DISpell}
/varset FizzleSlot ${Me.Gem[${DISpell}]}
/varset FizzleTimer 2s
/return


