Further file organization

Further file organization

nwn/nwnprc/trunk/newspellbook/inv_entrpward.nss

@@ -0,0 +1,49 @@
+//::///////////////////////////////////////////////
+//:: Entropic Warding
+//:://////////////////////////////////////////////
+/*
+    20% concealment to ranged attacks including
+    ranged spell attacks
+
+    Duration: 1 turn/level
+
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Brent Knowles
+//:: Created On: July 18, 2002
+//:://////////////////////////////////////////////
+//:: VFX Pass By:
+
+#include "prc_inc_spells"
+#include "inv_inc_invfunc"
+#include "inv_invokehook"
+
+void main()
+{
+
+    if (!PreInvocationCastCode())
+    {
+    // If code within the PreSpellCastHook (i.e. UMD) reports FALSE, do not run this spell
+        return;
+    }
+
+     //Declare major variables
+    object oTarget = OBJECT_SELF;
+    int CasterLvl = GetInvokerLevel(OBJECT_SELF, GetInvokingClass());
+    int nDuration = CasterLvl;
+    effect eVis = EffectVisualEffect(VFX_IMP_AC_BONUS);
+    //Fire cast spell at event for the specified target
+    SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, INVOKE_ENTROPIC_WARDING, FALSE));
+    
+    //Set the four unique armor bonuses
+    effect eShield =  EffectConcealment(20, MISS_CHANCE_TYPE_VS_RANGED);
+    effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
+
+    effect eLink = EffectLinkEffects(eShield, eDur);
+
+    //Apply the armor bonuses and the VFX impact
+    SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, TurnsToSeconds(nDuration),TRUE,-1,CasterLvl);
+    SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+
+}
+