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.
65 lines
2.3 KiB
Plaintext
65 lines
2.3 KiB
Plaintext
//:://////////////////////////////////////////////
|
|
//:: FileName: "ss_ep_thewitheri"
|
|
/* Purpose: The Withering - over the course of 20 rounds (or unless saved vs),
|
|
the target will lose 40 total ability points from any of STR, DEX or CON
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Boneshank
|
|
//:: Last Updated On:
|
|
//:://////////////////////////////////////////////
|
|
#include "prc_alterations"
|
|
#include "inc_epicspells"
|
|
|
|
void DoWithering(object oTarget, int nDC, int nDuration);
|
|
|
|
void main()
|
|
{
|
|
DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
|
|
SetLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR", SPELL_SCHOOL_NECROMANCY);
|
|
|
|
if (!X2PreSpellCastCode())
|
|
{
|
|
DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
|
|
return;
|
|
}
|
|
if (GetCanCastSpell(OBJECT_SELF, SPELL_EPIC_THEWITH))
|
|
{
|
|
object oTarget = PRCGetSpellTargetObject();
|
|
int nDuration = 60; // Lasts 20 rounds, but fires thrice per round.
|
|
effect eVis = EffectVisualEffect(VFX_IMP_REDUCE_ABILITY_SCORE);
|
|
//Fire cast spell at event for the specified target
|
|
SignalEvent(oTarget,
|
|
EventSpellCastAt(OBJECT_SELF, SPELL_BESTOW_CURSE, FALSE));
|
|
//Make SR Check
|
|
if (!PRCDoResistSpell(OBJECT_SELF, oTarget, GetTotalCastingLevel(OBJECT_SELF)+SPGetPenetr(OBJECT_SELF)))
|
|
{
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
|
|
DoWithering(oTarget, GetEpicSpellSaveDC(OBJECT_SELF, oTarget)+10, nDuration);
|
|
}
|
|
}
|
|
DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
|
|
}
|
|
|
|
void DoWithering(object oTarget, int nDC, int nDuration)
|
|
{
|
|
int nX;
|
|
int nAbil;
|
|
effect eDown;
|
|
//Make a Fort Save each time
|
|
if (!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC))
|
|
{
|
|
// Lower one of either STR, DEX, or CON by 1 every 2 seconds
|
|
nX = d3();
|
|
if (nX == 1) nAbil = ABILITY_STRENGTH;
|
|
if (nX == 2) nAbil = ABILITY_DEXTERITY;
|
|
if (nX == 3) nAbil = ABILITY_CONSTITUTION;
|
|
eDown = EffectAbilityDecrease(nAbil, 1);
|
|
eDown = SupernaturalEffect(eDown);
|
|
if (GetAbilityScore(oTarget, nAbil) > 3)
|
|
SPApplyEffectToObject(DURATION_TYPE_PERMANENT, eDown, oTarget);
|
|
}
|
|
nDuration--;
|
|
if (nDuration >= 1)
|
|
DelayCommand(2.0, DoWithering(oTarget, nDC, nDuration));
|
|
}
|