forked from Jaysyn/PRC8
5914ed2ab5
Updated Release Archive. Fixed Mage-killer prereqs. Removed old LETO & ConvoCC related files. Added organized spell scroll store. Fixed Gloura spellbook. Various TLK fixes. Reorganized Repo. Removed invalid user folders. Added DocGen back in.
55 lines
1.9 KiB
Plaintext
55 lines
1.9 KiB
Plaintext
//:://////////////////////////////////////////////
|
|
//:: FileName: "run_all_martyr"
|
|
/* Purpose: For "Allied Martyr" spell - This is the actual functional body of
|
|
the spell, but needs to be called seperately due to the need of a
|
|
player's permission.
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Boneshank
|
|
//:: Last Updated On: March 12, 2004
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "prc_alterations"
|
|
#include "inc_dispel"
|
|
|
|
void RunMyMartyrdom(object oAlly, int nDuration, object oMartyr = OBJECT_SELF);
|
|
|
|
void main()
|
|
{
|
|
// Who is my ally that I am helping?
|
|
object oAlly = GetLocalObject(OBJECT_SELF, "oAllyForMyMartyrdom");
|
|
// How long do I have to do this for?
|
|
int nDuration = GetLocalInt(OBJECT_SELF,
|
|
"nTimeForMartyrdomFor");
|
|
// Begin the martyrdom.
|
|
RunMyMartyrdom(oAlly, nDuration, OBJECT_SELF);
|
|
}
|
|
|
|
void RunMyMartyrdom(object oAlly, int nDuration, object oMartyr = OBJECT_SELF)
|
|
{
|
|
int nAllyCurrentHP = GetCurrentHitPoints(oAlly);
|
|
int nAllyMaxHP = GetMaxHitPoints(oAlly);
|
|
int nMyHP = GetCurrentHitPoints(OBJECT_SELF);
|
|
int nTransfer = nAllyMaxHP - nAllyCurrentHP;
|
|
effect eVisDown = EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY);
|
|
effect eVisUp = EffectVisualEffect(VFX_IMP_HEALING_L);
|
|
effect eHPLoss = EffectDamage(nTransfer);
|
|
effect eHPGain = EffectHeal(nTransfer);
|
|
effect eLink1 = EffectLinkEffects(eVisDown, eHPLoss);
|
|
effect eLink2 = EffectLinkEffects(eVisUp, eHPGain);
|
|
// If the spell's duration has not expired yet.
|
|
if (!GetIsDead(OBJECT_SELF) &&
|
|
!GetIsDead(oAlly) &&
|
|
GetIsObjectValid(oAlly) &&
|
|
nTransfer > 0 )
|
|
{
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, eLink1, OBJECT_SELF);
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, eLink2, oAlly);
|
|
}
|
|
if (nDuration > 0)
|
|
{
|
|
nDuration -= 1;
|
|
DelayCommand(3.0, RunMyMartyrdom(oAlly, nDuration, OBJECT_SELF));
|
|
}
|
|
}
|