Further file organization

Further file organization

nwn/nwnprc/trunk/newspellbook/inv_splweave.nss

@@ -0,0 +1,120 @@
+#include "inv_inc_invfunc"
+
+//internal function for delayed damage
+void DoDelayedBlast(object oTarget, int nDamageType = DAMAGE_TYPE_FIRE, int nVFX = VFX_IMP_FLAME_M)
+{
+    ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(d6(2), nDamageType), oTarget);
+    ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(nVFX), oTarget);
+}
+
+void main()
+{
+    object oCaster = OBJECT_SELF;
+    object oTarget = GetLocalObject(oCaster, "SPELLWEAVE_TARGET");
+    DeleteLocalObject(oCaster, "SPELLWEAVE_TARGET");
+
+    //check if target is valid
+    if(!GetIsObjectValid(oTarget))
+        return;
+
+    //At this point we know that we can apply essence effect
+    int nEssence = GetLocalInt(oCaster, "BlastEssence");
+    int nInvLevel = GetInvokerLevel(oCaster, CLASS_TYPE_WARLOCK);
+    int nDC = 10 + (GetLocalInt(oCaster, "EssenceData") & 0xF) + GetAbilityModifier(ABILITY_CHARISMA, oCaster);
+    effect eEssence;
+
+    int DmgType = GetLocalInt(oCaster, "archmage_mastery_elements");
+    // Eldritch Disciple/Theurge and Archmage class combo is not possible in NWN
+    // so delete damage info in case we've changed it
+    DeleteLocalInt(oCaster, "archmage_mastery_elements");
+
+    if(nEssence == INVOKE_PENETRATING_BLAST)
+    {
+        eEssence = EffectSpellResistanceDecrease(5);
+        if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_SPELL))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, TurnsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_HINDERING_BLAST)
+    {
+        eEssence = EffectSlow();
+        if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_MIND_SPELLS))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, RoundsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_BINDING_BLAST)
+    {
+        eEssence = EffectStunned();
+        if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_MIND_SPELLS))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, RoundsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_BEWITCHING_BLAST)
+    {
+        eEssence = PRCEffectConfused();
+        if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_MIND_SPELLS))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, RoundsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_BESHADOWED_BLAST)
+    {
+        eEssence = EffectBlindness();
+        if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_SPELL))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, RoundsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_FRIGHTFUL_BLAST)
+    {
+        eEssence = EffectShaken();
+        if(!PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_FEAR))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, TurnsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_NOXIOUS_BLAST)
+    {
+        eEssence = EffectDazed();
+        if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_SPELL))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, TurnsToSeconds(1));
+    }
+    else if(nEssence == INVOKE_SICKENING_BLAST)
+    {
+        eEssence = EffectSickened();
+        if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_SPELL))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, 60.0);
+    }
+    //damage changing essences
+    else if(nEssence == INVOKE_HELLRIME_BLAST && DmgType == DAMAGE_TYPE_COLD)
+    {
+        eEssence = EffectAbilityDecrease(ABILITY_DEXTERITY, 4);
+        if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_SPELL))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, TurnsToSeconds(10));
+    }
+    else if(nEssence == INVOKE_UTTERDARK_BLAST && DmgType == DAMAGE_TYPE_NEGATIVE)
+    {
+        eEssence = EffectNegativeLevel(2);
+        if(!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_SPELL))
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eEssence, oTarget, HoursToSeconds(1));
+    }
+    else if(nEssence == INVOKE_BRIMSTONE_BLAST && DmgType == DAMAGE_TYPE_FIRE)
+    {
+        if(!PRCMySavingThrow(SAVING_THROW_REFLEX, oTarget, nDC, SAVING_THROW_TYPE_FIRE))
+        {
+            SetLocalInt(oTarget, "BrimstoneFire", TRUE);
+            int nDuration = nInvLevel / 5;
+            DelayCommand(RoundsToSeconds(nDuration), DeleteLocalInt(oTarget, "BrimstoneFire"));
+    
+            int i;
+            float fRound = RoundsToSeconds(1);
+            for(i = 1; i <= nDuration; i++)
+            {
+                DelayCommand(fRound * i, DoDelayedBlast(oTarget));
+            }
+        }
+    }
+    else if(nEssence == INVOKE_VITRIOLIC_BLAST && DmgType == DAMAGE_TYPE_ACID)
+    {
+        //Apply secondary effect from essence invocations
+        int nDuration = nInvLevel / 5;
+
+        int i;
+        float fRound = RoundsToSeconds(1);
+        for(i = 1; i <= nDuration; i++)
+        {
+            DelayCommand(fRound * i, DoDelayedBlast(oTarget, DAMAGE_TYPE_ACID, VFX_IMP_ACID_S));
+        }
+    }
+}