Further file organization

2023-08-23 22:11:00 -04:00
parent 3062876237
commit d87fe14826
22364 changed files with 0 additions and 3253 deletions
--- a/nwn/nwnprc/trunk/spells/sp_heartclutch.nss
+++ b/nwn/nwnprc/trunk/spells/sp_heartclutch.nss
@@ -0,0 +1,131 @@
+//::///////////////////////////////////////////////
+//:: Name      Heartclutch
+//:: FileName  sp_heartclutch.nss
+//:://////////////////////////////////////////////
+/**@file Heartclutch
+Transmutation [Evil]
+Level: Clr 5
+Components: V, S, Disease
+Casting Time: 1 action
+Range: Close (25 ft. + 5 ft./2 levels)
+Target: The heart of one creature
+Duration: Instantaneous
+Saving Throw: Fortitude partial
+Spell Resistance: Yes
+
+The caster holds forth his empty hand, and the
+stillbeating heart of the subject appears within it.
+The subject dies in 1d3 rounds, and only a heal,
+regenerate, miracle, or wish spell will save it
+during this time. The target is entitled to a
+Fortitude saving throw to survive the attack. If the
+target succeeds at the save, it instead takes 3d6
+points of damage +1 point per caster level from
+general damage to the chest and internal organs.
+(The target might die from damage even if it
+succeeds at the saving throw.)
+
+A creature with no discernible anatomy is unaffected
+by this spell.
+
+Disease Component: Soul rot.
+
+Author:    Tenjac
+Created:
+*/
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+
+void ClutchLoop(object oTarget, int nDelay, object oPC);
+int GetHasSoulRot(object oPC);
+
+#include "prc_inc_spells"
+#include "prc_add_spell_dc"
+
+void main()
+{
+    object oPC = OBJECT_SELF;
+    object oTarget = PRCGetSpellTargetObject();
+    int nCasterLvl = PRCGetCasterLevel(oPC);
+    int nDelay = d3(1);
+    int nType = MyPRCGetRacialType(oTarget);
+    int nDC = PRCGetSaveDC(oTarget, oPC);
+
+    //Spellhook
+    if(!X2PreSpellCastCode()) return;
+
+    PRCSetSchool(SPELL_SCHOOL_TRANSMUTATION);
+
+    PRCSignalSpellEvent(oTarget,TRUE, SPELL_HEARTCLUTCH, oPC);
+
+    if(nType != RACIAL_TYPE_OOZE &&
+       nType != RACIAL_TYPE_UNDEAD &&
+       nType != RACIAL_TYPE_CONSTRUCT &&
+       nType != RACIAL_TYPE_ELEMENTAL)
+
+    {
+        //Check for Soul rot
+
+        if(GetHasSoulRot(oPC))
+        {
+            //Check for Spell resistance
+            if(!PRCDoResistSpell(oPC, oTarget, nCasterLvl + SPGetPenetr()))
+            {
+            //Save
+            if(PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_MIND_SPELLS))
+            {
+            if(!GetHasMettle(oTarget, SAVING_THROW_FORT))
+            {
+            	int nDam = SpellDamagePerDice(oPC, 3) + d6(3) + nCasterLvl;
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, PRCEffectDamage(oTarget, nDam, DAMAGE_TYPE_MAGICAL), oTarget);
+            }
+
+            }
+            else
+            {
+                    //Clutching loop
+                    ClutchLoop(oTarget, nDelay, oPC);
+            }
+            }
+        }
+    }
+    //SPEvilShift(oPC);
+    PRCSetSchool();
+}
+
+void ClutchLoop(object oTarget, int nDelay, object oPC)
+{
+    if(nDelay < 1)
+    {
+            DeathlessFrenzyCheck(oTarget);
+            SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDeath(), oTarget);
+    }
+
+    nDelay--;
+
+    //Round we go...
+    ClutchLoop(oTarget, nDelay, oPC);
+}
+
+int GetHasSoulRot(object oPC)
+{
+    int bHasDisease = FALSE;
+    effect eTest = GetFirstEffect(oPC);
+    effect eDisease = EffectDisease(DISEASE_SOUL_ROT);
+
+    if (PRCGetHasEffect(EFFECT_TYPE_DISEASE, oPC))
+    {
+        while (GetIsEffectValid(eTest))
+        {
+            if(eTest == eDisease)
+            {
+                bHasDisease = TRUE;
+
+            }
+            eTest = GetNextEffect(oPC);
+        }
+    }
+    return bHasDisease;
+}
+
+