Further file organization

Further file organization

nwn/nwnprc/trunk/psionics/psi_pow_dispel.nss

@@ -0,0 +1,130 @@
+/*
+    ----------------
+    Dispel Psionics
+
+    psi_pow_dispel
+    ----------------
+
+    26/3/05 by Stratovarius
+*/ /** @file
+
+    Dispel Psionics
+
+    Psychokinesis
+    Level: Psion/wilder 3
+    Manifesting Time: 1 standard action
+    Range: Medium (100 ft. + 10 ft./level)
+    Target or Area: One creature; or 20-ft.-radius burst
+    Duration: Instantaneous
+    Saving Throw: None
+    Power Resistance: No
+    Power Points: 5
+    Metapsionics: Twin, Widen
+
+    This power attempts to strip all magical effects from a single target. It can also target a group of creatures,
+    attempting to remove the most powerful spell effect from each creature. To remove an effect, the manifester makes a dispel
+    check of 1d20 +1 per manifester level (to a maximum of +10) against a DC of 11 + the power effect's manifester level.
+
+    Augment: For every additional power point spent, the manifester level limit
+             on your dispel check increases by 2 (to a maximum bonus of +20 for
+             a 5-point expenditure).
+*/
+
+#include "psi_inc_psifunc"
+#include "psi_inc_pwresist"
+#include "psi_spellhook"
+#include "inc_dispel"
+
+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(PRC_NO_GENERIC_AUGMENTS,
+                                                       1, 5
+                                                       ),
+                              METAPSIONIC_TWIN | METAPSIONIC_WIDEN
+                              );
+
+    if(manif.bCanManifest)
+    {
+        int bIsBioDispel = GetLocalInt(GetModule(),"BIODispel");
+        int nMLCap       = min(10 + (2 * manif.nTimesAugOptUsed_1), manif.nManifesterLevel);
+        effect eVis      = EffectVisualEffect(VFX_IMP_BREACH);
+        effect eImpact   = EffectVisualEffect(VFX_FNF_DISPEL);
+        location lTarget = PRCGetSpellTargetLocation();
+        float fRadius    = EvaluateWidenPower(manif, FeetToMeters(20.0f));
+
+        // Handle Twin Power
+        int nRepeats = manif.bTwin ? 2 : 1;
+        for(; nRepeats > 0; nRepeats--)
+        {
+            // Targeted dispel - Remove all effects
+            if(GetIsObjectValid(oTarget))
+            {
+                if(bIsBioDispel)
+                    spellsDispelMagic(oTarget, manif.nManifesterLevel, eVis, eImpact);
+                else
+                    spellsDispelMagicMod(oTarget, manif.nManifesterLevel, eVis, eImpact);
+            }
+            // Dispel in an area - Only remove single effect from each target
+            else
+            {
+                // Do area VFX
+                ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImpact, lTarget);
+
+                // Target loop
+                oTarget = MyFirstObjectInShape(SHAPE_SPHERE, fRadius, lTarget, FALSE,
+                                               OBJECT_TYPE_CREATURE | OBJECT_TYPE_AREA_OF_EFFECT | OBJECT_TYPE_PLACEABLE
+                                               );
+                while(GetIsObjectValid(oTarget))
+                {
+                    // Area of Effects are handled using a separate function
+                    if(GetObjectType(oTarget) == OBJECT_TYPE_AREA_OF_EFFECT)
+                    {
+                        if(bIsBioDispel)
+                            spellsDispelAoE(oTarget, oManifester, manif.nManifesterLevel);
+                        else
+                            spellsDispelAoEMod(oTarget, oManifester, manif.nManifesterLevel);
+                    }
+                    // Placeables just have their AI informed
+                    // Why? - Ornedan
+                    else if(GetObjectType(oTarget) == OBJECT_TYPE_PLACEABLE)
+                    {
+                        SignalEvent(oTarget, EventSpellCastAt(oManifester, SPELL_DISPEL_MAGIC));//PRCGetSpellId()));
+                    }
+                    // It's a creature, take out the highest caster/manifester level effect on it
+                    else
+                    {
+                        if(bIsBioDispel)
+                            spellsDispelMagic(oTarget, manif.nManifesterLevel, eVis, eImpact, FALSE);
+                        else
+                            spellsDispelMagicMod(oTarget, manif.nManifesterLevel, eVis, eImpact, FALSE);
+                    }
+
+                    // Get next target
+                    oTarget = MyNextObjectInShape(SHAPE_SPHERE, fRadius, lTarget, FALSE,
+                                                  OBJECT_TYPE_CREATURE | OBJECT_TYPE_AREA_OF_EFFECT | OBJECT_TYPE_PLACEABLE
+                                                  );
+                }// end while - Target loop
+            }// end else - Area dispel
+        }// end for - Twin Power
+    }// end if - Successfull manifestation
+}