Further file organization

Further file organization

nwn/nwnprc/trunk/spells/nw_s0_cloudkilla.nss

@@ -0,0 +1,115 @@
+//::///////////////////////////////////////////////
+//:: Cloudkill: On Enter
+//:: NW_S0_CloudKillA.nss
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    All creatures with 3 or less HD die, those with
+    4 to 6 HD must make a save Fortitude Save or die.
+    Those with more than 6 HD take 1d10 Poison damage
+    every round.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Preston Watamaniuk
+//:: Created On: May 17, 2001
+//:://////////////////////////////////////////////
+
+
+//:: modified by mr_bumpkin Dec 4, 2003
+//:: modified by Ornedan Dec 22, 2004 to PnP rules
+#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_CONJURATION);
+
+
+    //Declare major variables
+    object oTarget  = GetEnteringObject();
+    int nHD         = GetHitDice(oTarget);
+    effect eDeath   = EffectDeath();
+    effect eVis     = EffectVisualEffect(VFX_IMP_DEATH);
+    effect eNeg     = EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY);
+    effect eConceal = EffectConcealment(20);
+    effect eVis2    = EffectVisualEffect(VFX_DUR_GHOST_TRANSPARENT);
+    effect eLink    = EffectLinkEffects(eConceal, eVis2);
+
+    //effect eDam;
+    int nDam = d4();
+    int nMetaMagic = PRCGetMetaMagicFeat();
+
+    object aoeCreator = GetAreaOfEffectCreator();
+    int CasterLvl = GetLocalInt(OBJECT_SELF, "X2_AoE_Caster_Level");
+
+    //int nPenetr = SPGetPenetrAOE(aoeCreator,CasterLvl);
+
+    //Enter Metamagic conditions
+    if(nMetaMagic & METAMAGIC_MAXIMIZE)
+    {
+        nDam = 4;//Damage is at max
+    }
+    if(nMetaMagic & METAMAGIC_EMPOWER)
+    {
+        nDam =  nDam + (nDam/2); //Damage/Healing is +50%
+    }
+
+    if(spellsIsTarget(oTarget, SPELL_TARGET_STANDARDHOSTILE, aoeCreator))
+    {
+        //Fire cast spell at event for the specified target
+        SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_CLOUDKILL));
+
+        //Concealement by fog happens no matter what
+        SPApplyEffectToObject(DURATION_TYPE_PERMANENT, eConceal, oTarget, 0.0f, FALSE);
+
+        //Determine spell effect based on the targets HD
+        if (nHD <= 3)
+        {
+            if(!GetIsImmune(oTarget, IMMUNITY_TYPE_DEATH))
+            {
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eDeath, oTarget);
+            }
+        }
+        else if (nHD >= 4 && nHD <= 6)
+        {
+            //Make a save or die
+            if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, PRCGetSaveDC(oTarget, aoeCreator), SAVING_THROW_TYPE_DEATH, OBJECT_SELF))
+            {
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eDeath, oTarget);
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+            }
+            else
+            {
+			if (GetHasMettle(oTarget, SAVING_THROW_FORT))
+			// This script does nothing if it has Mettle, bail
+				return;            
+                AssignCommand(aoeCreator, ApplyAbilityDamage(oTarget, ABILITY_CONSTITUTION, nDam, DURATION_TYPE_TEMPORARY, TRUE, -1.0f));
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eNeg, oTarget);
+            }
+        }
+        else
+        {
+            if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, PRCGetSaveDC(oTarget, aoeCreator), SAVING_THROW_TYPE_SPELL, OBJECT_SELF))
+            {
+                AssignCommand(aoeCreator, ApplyAbilityDamage(oTarget, ABILITY_CONSTITUTION, nDam, DURATION_TYPE_TEMPORARY, TRUE, -1.0f));
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eNeg, oTarget);
+            }
+            else
+            {
+			if (GetHasMettle(oTarget, SAVING_THROW_FORT))
+			// This script does nothing if it has Mettle, bail
+				return;            
+                // Halve the damage on succesfull save.
+                AssignCommand(aoeCreator, ApplyAbilityDamage(oTarget, ABILITY_CONSTITUTION, nDam / 2, DURATION_TYPE_TEMPORARY, TRUE, -1.0f));
+                SPApplyEffectToObject(DURATION_TYPE_INSTANT, eNeg, oTarget);
+            }
+        }
+    }
+
+DeleteLocalInt(OBJECT_SELF, "X2_L_LAST_SPELLSCHOOL_VAR");
+// Getting rid of the local integer storing the spellschool name
+}