Further file organization

Further file organization

nwn/nwnprc/trunk/spells/nw_s0_wallfirec.nss

@@ -0,0 +1,98 @@
+//::///////////////////////////////////////////////
+//:: Wall of Fire: Heartbeat
+//:: NW_S0_WallFireA.nss
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    Person within the AoE take 4d6 fire damage
+    per round.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Preston Watamaniuk
+//:: Created On: May 17, 2001
+//:://////////////////////////////////////////////
+
+//:: modified by mr_bumpkin  Dec 4, 2003
+#include "prc_inc_spells"
+#include "prc_add_spell_dc"
+
+
+
+void main()
+{
+
+DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
+SetLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR", SPELL_SCHOOL_EVOCATION);
+
+    //Declare major variables
+    int nMetaMagic = PRCGetMetaMagicFeat();
+    int nDamage;
+    effect eDam;
+    object oTarget;
+    //Declare and assign personal impact visual effect.
+    effect eVis = EffectVisualEffect(VFX_IMP_FLAME_M);
+    //Capture the first target object in the shape.
+
+    //--------------------------------------------------------------------------
+    // GZ 2003-Oct-15
+    // When the caster is no longer there, all functions calling
+    // GetAreaOfEffectCreator will fail. Its better to remove the barrier then
+    //--------------------------------------------------------------------------
+    if (!GetIsObjectValid(GetAreaOfEffectCreator()))
+    {
+        DestroyObject(OBJECT_SELF);
+        return;
+    }
+
+    int CasterLvl = PRCGetCasterLevel(GetAreaOfEffectCreator());
+    
+    int nPenetr = SPGetPenetrAOE(GetAreaOfEffectCreator(),CasterLvl);
+    int EleDmg = GetLocalInt(OBJECT_SELF, "Wall_Fire_Damage");
+
+    oTarget = GetFirstInPersistentObject(OBJECT_SELF,OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE);
+    //Declare the spell shape, size and the location.
+    while(GetIsObjectValid(oTarget))
+    {
+        if (spellsIsTarget(oTarget, SPELL_TARGET_STANDARDHOSTILE, GetAreaOfEffectCreator()))
+        {
+            //Fire cast spell at event for the specified target
+            SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_WALL_OF_FIRE));
+            //Make SR check, and appropriate saving throw(s).
+            if(!PRCDoResistSpell(GetAreaOfEffectCreator(), oTarget,nPenetr))
+            {
+                //Roll damage.
+                nDamage = d6(4);
+                //Enter Metamagic conditions
+                if ((nMetaMagic & METAMAGIC_MAXIMIZE))
+                {
+                   nDamage = 24;//Damage is at max
+                }
+                if ((nMetaMagic & METAMAGIC_EMPOWER))
+                {
+                     nDamage = nDamage + (nDamage/2); //Damage/Healing is +50%
+                }
+                
+                nDamage += SpellDamagePerDice(GetAreaOfEffectCreator(), 4);
+                
+                int nDC = PRCGetSaveDC(oTarget,GetAreaOfEffectCreator());
+
+                nDamage = PRCGetReflexAdjustedDamage(nDamage, oTarget, (nDC), SAVING_THROW_TYPE_FIRE);
+                if(nDamage > 0)
+                {
+                    // Apply effects to the currently selected target.
+                    eDam = PRCEffectDamage(oTarget, nDamage, EleDmg);
+                    SPApplyEffectToObject(DURATION_TYPE_INSTANT, eDam, oTarget);
+                    PRCBonusDamage(oTarget);
+                    SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eVis, oTarget, 1.0,FALSE);
+                }
+            }
+        }
+        //Select the next target within the spell shape.
+        oTarget = GetNextInPersistentObject(OBJECT_SELF,OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE);
+    }
+    
+
+
+DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
+// Getting rid of the integer used to hold the spells spell school
+}