Further file organization

Further file organization

nwn/nwnprc/trunk/psionics/psi_pow_dismiss.nss

@@ -0,0 +1,90 @@
+/*
+   ----------------
+   Dismissal, Psionic
+
+   psi_pow_dismiss
+   ----------------
+
+   28/4/05 by Stratovarius
+*/ /** @file
+
+    Dismissal, Psionic
+
+    Psychoportation
+    Level: Nomad 4
+    Manifesting Time: 1 standard action
+    Range: Close (25 ft. + 5 ft./2 levels)
+    Target: One extraplanar creature
+    Duration: Instantaneous
+    Saving Throw: Will negates
+    Power Resistance: Yes
+    Power Points: 7
+    Metapsionics: Twin
+
+   This spell forces an extraplanar creature back to its home plane if it fails a save. Extraplanar creatures are outsiders and
+   elementals. This spell does not work on summons that are not of these races.
+*/
+
+#include "psi_inc_psifunc"
+#include "psi_inc_pwresist"
+#include "psi_spellhook"
+#include "prc_inc_spells"
+
+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);
+    	effect eVis = EffectVisualEffect(VFX_IMP_UNSUMMON);//VFX_IMP_DEATH_L);
+
+    	// Target type check
+    	if(MyPRCGetRacialType(oTarget) == RACIAL_TYPE_OUTSIDER  ||
+    	   MyPRCGetRacialType(oTarget) == RACIAL_TYPE_ELEMENTAL
+    	   )
+        {
+            // 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))
+                {
+                    // Will negates
+                    if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_NONE))
+                    {
+                        SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDeath(), oTarget);
+                        SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+                    }// end if - Failed save
+                }// end if - SR check
+            }// end for - Twin Power
+        }// end if - Target is of correct type
+    }// end if - Successfull manifestation
+}