Initial upload.

Adding base PRC 4.19a files to repository.

trunk/users/Tenjac/spells/sp_axio_stormA.nss

@@ -0,0 +1,60 @@
+//:://////////////////////////////////////////////
+//:: Name     Axiomatic Storm On Enter
+//:: FileName   sp_axio_stormA.nss
+//:://////////////////////////////////////////////
+/** @file
+Conjuration (Creation)
+Level: Cleric 3, Paladin 3,
+Components: V, S, M, DF,
+Casting Time: 1 standard action
+Area: Cylinder (20-ft. radius, 20 ft. high)
+Duration: 1 round/level (D)
+Saving Throw: None
+Spell Resistance: No
+
+You call upon the forces of law and a heavy rain 
+begins to fall around you, its raindrops harsh and 
+metallic. Above you, a jet of caustic acid lances 
+down from the heavens.
+
+A driving rain falls around you. It falls in a fixed
+area once created. The storm reduces hearing and
+visibility, resulting in a <20>4 penalty on Listen, Spot,
+and Search checks. It also applies a <20>4 penalty on ranged
+attacks made into, out of, or through the storm. Finally, 
+it automatically extinguishes any unprotected flames and 
+has a 50% chance to extinguish protected flames (such as 
+those of lanterns).
+
+The rain damages chaotic creatures, dealing 2d6 points
+of damage per round (chaotic outsiders take double damage).
+In addition, each round, a gout of acid strikes a randomly 
+selected chaotic outsider within the spell's area, dealing
+5d6 points of acid damage. 
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Tenjac
+//:: Created On: 1/28/21
+//:://////////////////////////////////////////////
+
+#include "prc_sp_func"
+#include "prc_add_spell_dc"
+
+void main()
+{
+	object oTarget = GetEnteringObject();
+	object oItem = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oTarget);
+	effect eLink = EffectLinkEffects(EffectSkillDecrease(SKILL_LISTEN, 4), EffectSkillDecrease(SKILL_SPOT, 4));
+	eLink = EffectLinkEffects(eLink, EffectSkillDecrease(SKILL_SEARCH, 4));
+	
+	//Apply permanently, AoE exit will remove
+	SPApplyEffectToObject(DURATION_TYPE_PERMANENT, eLink, oTarget);
+	
+	if GetWeaponRanged(oItem)
+	{
+		SPApplyEffectToObject(DURAITON_TYPE_TEMPORARY, EffectAttackDecrease(4), oTarget, 6.0f)
+	}
+	
+	//Can't do hit penalty to ranged, approximate with hit chance
+	SPApplyEffectToObject(DURATION_TYPE_PERMANENT, EffectConcealment(20, MISS_CHANCE_TYPE_VS_RANGED), oTarget);
+}