Further file organization

Further file organization

nwn/nwnprc/trunk/spells/sp_rain_roseC.nss

@@ -0,0 +1,63 @@
+//::///////////////////////////////////////////////
+//:: Name      Rain of Roses: HB
+//:: FileName  sp_rain_roseC.nss
+//:://////////////////////////////////////////////
+/**@file Rain of Roses 
+Evocation [Good] 
+Level: Drd 7 
+Components: V, S, M 
+Casting Time: 1 standard action 
+Range: Long (400 ft. + 40 ft./level) 
+Area: Cylinder (80-ft. radius, 80 ft. high)
+Duration: 1 round/level (D)
+Saving Throw: None (ability damage) and Fortitude 
+negates (sickening) 
+Spell Resistance: Yes
+
+Red roses fall from the sky. Their sharp thorns 
+graze the flesh of evil creatures, dealing 1d4 
+points of temporary Wisdom damage per round. A 
+creature reduced to 0 Wisdom falls unconscious as
+its mind succumbs to horrible nightmares. In 
+addition, the beautiful rose petals sicken evil 
+creatures touched by them; those that fail a 
+Fortitude save are sickened (-2 penalty on attack
+rolls, weapon damage rolls, saving throws, 
+ability checks, and skill checks) until they
+leave the spell's area. A successful Fortitude 
+save renders a creature immune to the sickening 
+effect of the roses, but not the ability damage 
+caused by their thorns.
+
+Material Component: A red rose. 
+
+Author:    Tenjac
+Created:   7/17/06
+*/
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+
+#include "prc_inc_spells"
+
+void main()
+{
+	object oCreator = GetAreaOfEffectCreator();
+	object oTarget = GetFirstInPersistentObject();
+	int nCasterLvl = PRCGetCasterLevel(oCreator);
+	
+	while(GetIsObjectValid(oTarget))
+	{
+		if(GetAlignmentGoodEvil(oTarget) == ALIGNMENT_EVIL)
+		{			
+			//Check Spell Resistance
+			if(!PRCDoResistSpell(oCreator, oTarget, nCasterLvl + SPGetPenetr()))
+			{
+				ApplyAbilityDamage(oTarget, ABILITY_WISDOM, d4(1), DURATION_TYPE_TEMPORARY, TRUE, -1.0f);
+			}
+		}
+		oTarget = GetNextInPersistentObject();
+	}
+}
+				
+				
+