Further file organization

Further file organization

nwn/nwnprc/trunk/scripts/prc_energz_ptn.nss

@@ -0,0 +1,73 @@
+//::///////////////////////////////////////////////
+//:: Name      Energized Potion Use Script
+//:: FileName  prc_energz_ptn.nss
+//:://////////////////////////////////////////////
+/**@file Energize Potion
+Transmutation
+Level: Cleric 3, druid 3, sorc/wizard 2, Wrath 2
+Components: V,S,M
+Casting Time: 1 standard action
+Range: Close
+Effect: 10ft radius
+Duration: Instantaneous
+Saving Throw: Reflex half
+Spell Resistance: Yes
+
+This spell transforms a magic potion into a volatile
+substance that can be hurled out to the specified 
+range. The spell destroys the potion and releases
+a 10-foot-radius burst of energy at the point of
+impact. The caster must specify the energy type
+(acid, cold, electricity, fire, or sonic) when the
+spell is cast.
+
+The potion deals 1d6 points of damage (of the
+appropriate energy type) per spell level of the 
+potion (maximum 3d6). For example, a potion of 
+displacement transformed by this spell deals 3d6
+points of damage. An energized potion set to deal
+fire damage ignites combustibles within the burst
+radius.
+
+Author:    Tenjac
+Created:   7/24/06
+*/
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+
+#include "prc_inc_spells"
+#include "prc_add_spell_dc"
+
+void main()
+{
+	location lLoc = GetSpellTargetLocation();
+	object oPotion = GetSpellCastItem();
+	int nDice = GetLocalInt(oPotion, "PRC_GrenadeLevel");
+	int nType = GetLocalInt(oPotion, "PRC_GrenadeDamageType");
+	int nCasterLvl = GetLocalInt(oPotion, "PRC_EnergizePotionCL");
+	int nSave = GetLocalInt(oPotion, "PRC_EnergizedPotionSave");
+	int nDC;	
+	int nDam;
+	
+	object oTarget = GetFirstObjectInShape(SHAPE_SPHERE, 3.05f, lLoc, TRUE, OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE);
+	
+	while(GetIsObjectValid(oTarget))
+	{
+		if(!PRCDoResistSpell(oPotion, oTarget, nCasterLvl + SPGetPenetr()))
+		{
+			nDC = PRCGetSaveDC(oPotion, oTarget);
+			nDam = d6(nDice);
+			
+			if(PRCMySavingThrow(SAVING_THROW_REFLEX, oTarget, nDC, nSave))
+			{
+				nDam = (nDam/2);
+			}
+			
+			SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(nDam, nType), oTarget);
+		}
+		oTarget = GetNextObjectInShape(SHAPE_SPHERE, 3.05f, lLoc, TRUE, OBJECT_TYPE_CREATURE | OBJECT_TYPE_DOOR | OBJECT_TYPE_PLACEABLE);
+	}
+}
+				
+				
+