Further file organization

Further file organization

nwn/nwnprc/trunk/psionics/psi_pow_gamorpha.nss

@@ -0,0 +1,74 @@
+/*
+   ----------------
+   Greater Concealing Amorpha
+
+   psi_pow_gamorpha
+   ----------------
+
+   22/10/04 by Stratovarius
+*/ /**
+
+    Concealing Amorpha, Greater
+
+    Metacreativity (Creation)
+    Level: Shaper 3, psychic warrior 3
+    Manifesting Time: 1 standard action
+    Range: Personal
+    Target: You
+    Duration: 1 round/level
+    Power Points: 5
+    Metapsionics: Extend
+
+    Using concealing amorpha, you weave a quasi-real membrane around yourself.
+    You remain visible within the translucent, amorphous enclosure. This
+    distortion grants you total concealment (opponents have a 50% miss chance), thanks
+    to the rippling membrane encasing your form. You can pick up or drop objects,
+    easily reaching through the film. Anything you hold is enveloped by the
+    amorpha. Likewise, you can engage in melee, make ranged attacks, and manifest
+    powers without hindrance.
+*/
+
+#include "psi_inc_psifunc"
+#include "psi_inc_pwresist"
+#include "psi_spellhook"
+#include "prc_alterations"
+
+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_EXTEND
+                              );
+
+    if(manif.bCanManifest)
+    {
+    	effect eVis     = EffectVisualEffect(VFX_DUR_INVISIBILITY);
+        effect eConceal = EffectConcealment(50);
+        effect eDur     = EffectVisualEffect(VFX_DUR_GHOSTLY_VISAGE);
+        effect eLink    = EffectLinkEffects(eDur, eConceal);
+
+        float fDuration = 6.0f * manif.nManifesterLevel;
+        if(manif.bExtend) fDuration *= 2;
+
+        SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, fDuration, TRUE, -1, manif.nManifesterLevel);
+        SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+    }
+}