Further file organization

Further file organization

nwn/nwnprc/trunk/psionics/psi_pow_decerebr.nss

@@ -0,0 +1,121 @@
+/*
+    ----------------
+    Decerebrate
+
+    psi_pow_decerebr
+    ----------------
+
+    25/2/05 by Stratovarius
+*/ /** @file
+
+    Decerebrate
+
+    Psychoportation [Teleportation]
+    Level: Psion/wilder 7
+    Manifesting Time: 1 standard action
+    Range: Close (25 ft. + 5 ft./level)
+    Target: One living creature
+    Duration: Instantaneous
+    Saving Throw: Fortitude negates
+    Power Resistance: Yes
+    Power Points: 13
+    Metapsionics: Twin
+
+    With decerebrate, you selectively remove a portion of the creatures brain stem. The creature loses all cerebral functions,
+    vision, hearing, and the ability to move. If greater restoration is cast on the target within 1 hour, the target lives.
+    Otherwise, the target will die from the brain damage.
+*/
+
+#include "psi_inc_psifunc"
+#include "psi_inc_pwresist"
+#include "psi_spellhook"
+#include "prc_inc_spells"
+#include "prc_inc_teleport"
+
+void DieMaggot(int nSpellID, object oManifester, object oTarget)
+{
+    // If the target hasn't been hit with restorative effects by now, kill it
+    if(!(PRCGetDelayedSpellEffectsExpired(nSpellID, oTarget, oManifester) &&
+         GetLocalInt(oTarget, "WasRestored")
+         )
+       )
+    {
+        DeathlessFrenzyCheck(oTarget);
+        effect eVis   = EffectVisualEffect(VFX_IMP_DEATH_L);
+        effect eVis2  = EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY);
+        effect eDeath = EffectDeath();
+        effect eLink2 = EffectLinkEffects(eVis, eVis2);
+        eLink2 = EffectLinkEffects(eLink2, eDeath);
+        SPApplyEffectToObject(DURATION_TYPE_INSTANT, eLink2, oTarget);
+    }
+}
+
+void main()
+{
+/*
+  Spellcast Hook Code
+  Added 2004-11-02 by Stratovarius
+  If you want to make changes to all powers,
+  check psi_spellhook to find out more
+
+*/
+
+    if (!PsiPrePowerCastCode())
+    {
+    // If code within the PrePowerCastHook (i.e. UMD) reports FALSE, do not run this spell
+        return;
+    }
+
+// End of Spell Cast Hook
+
+    object oManifester = OBJECT_SELF;
+    object oTarget     = PRCGetSpellTargetObject();
+    struct manifestation manif =
+        EvaluateManifestation(oManifester, oTarget,
+                              PowerAugmentationProfile(),
+                              METAPSIONIC_TWIN
+                              );
+
+    if(manif.bCanManifest)
+    {
+        int nDC      = GetManifesterDC(oManifester);
+        int nPen     = GetPsiPenetration(oManifester);
+
+        // Create effects
+        effect eLink = GetIsImmune(oTarget, IMMUNITY_TYPE_PARALYSIS) ?  // If the target is immune to normal paralysis
+                         EffectCutsceneParalyze() :                      // use cutscene paralysis
+                         EffectParalyze();                               // Otherwise, normal paralysis
+        eLink = EffectLinkEffects(eLink, EffectBlindness());
+        eLink = EffectLinkEffects(eLink, EffectDeaf());
+        eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_IMP_BLIND_DEAF_M));
+        eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_DUR_PARALYZE_HOLD));
+        eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE));
+        eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_DUR_PARALYZED));
+        eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_DUR_PARALYZE_HOLD));
+
+
+        // Let the AI know
+        PRCSignalSpellEvent(oTarget, TRUE, manif.nSpellID, oManifester);
+
+        // Handle Twin Power
+        int nRepeats = manif.bTwin ? 2 : 1;
+        for(; nRepeats > 0; nRepeats--)
+        {
+            //Check for Power Resistance
+            if(PRCMyResistPower(oManifester, oTarget, nPen))
+            {
+                if(!GetIsImmune(oTarget, IMMUNITY_TYPE_MIND_SPELLS) &&   // Check if the target has a brain to mess with
+                   GetCanTeleport(oTarget, GetLocation(oTarget), FALSE)  // And that the target can be teleported at all
+                   )
+                {
+                    // Fort negates
+                    if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_NONE))
+                    {
+                        SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, HoursToSeconds(1), TRUE, manif.nSpellID, manif.nManifesterLevel);
+                        DelayCommand((HoursToSeconds(1) + 1.0), DieMaggot(manif.nSpellID, oManifester, oTarget));
+                    }// end if - Failed save
+                }// end if - Has a brain, and can be teleported
+            }// end if - SR check
+        }// end for - Twin Power
+    }// end if - Successfull manifestation
+}