Initial upload

2023-09-25 20:24:01 -04:00
parent 4e16ca63ca
commit 5197ad9a4d
7741 changed files with 5391820 additions and 0 deletions
--- a/_module/nss/nw_s1_dragfire.nss
+++ b/_module/nss/nw_s1_dragfire.nss
@@ -0,0 +1,125 @@
+//::///////////////////////////////////////////////
+//:: Dragon Breath Fire
+//:: NW_S1_DragFire
+//:: Copyright (c) 2001 Bioware Corp.
+//:://////////////////////////////////////////////
+/*
+    Calculates the proper damage and DC Save for the
+    breath weapon based on the HD of the dragon.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: Preston Watamaniuk
+//:: Created On: May 9, 2001
+//:://////////////////////////////////////////////
+#include "NW_I0_SPELLS"
+
+void main()
+{
+    //Declare major variables
+    int nAge = GetHitDice(OBJECT_SELF);
+    int nDamage, nDC, nDamStrike;
+    float fDelay;
+    object oTarget;
+    effect eVis, eBreath;
+    //Use the HD of the creature to determine damage and save DC
+    if (nAge <= 6) //Wyrmling
+    {
+        nDamage = d10(2);
+        nDC = 15;
+    }
+    else if (nAge >= 7 && nAge <= 9) //Very Young
+    {
+        nDamage = d10(4);
+        nDC = 18;
+    }
+    else if (nAge >= 10 && nAge <= 12) //Young
+    {
+        nDamage = d10(6);
+        nDC = 19;
+    }
+    else if (nAge >= 13 && nAge <= 15) //Juvenile
+    {
+        nDamage = d10(8);
+        nDC = 22;
+    }
+    else if (nAge >= 16 && nAge <= 18) //Young Adult
+    {
+        nDamage = d10(10);
+        nDC = 24;
+    }
+    else if (nAge >= 19 && nAge <= 22) //Adult
+    {
+        nDamage = d10(12);
+        nDC = 25;
+    }
+    else if (nAge >= 23 && nAge <= 24) //Mature Adult
+    {
+        nDamage = d10(14);
+        nDC = 28;
+    }
+    else if (nAge >= 25 && nAge <= 27) //Old
+    {
+        nDamage = d10(18);
+        nDC = 36;
+    }
+    else if (nAge >= 28 && nAge <= 30) //Very Old
+    {
+        nDamage = d10(22);
+        nDC = 42;
+    }
+    else if (nAge >= 31 && nAge <= 33) //Ancient
+    {
+        nDamage = d10(28);
+        nDC = 48;
+    }
+    else if (nAge >= 34 && nAge <= 37) //Wyrm
+    {
+        nDamage = d10(36);
+        nDC = 58;
+    }
+    else if (nAge > 37) //Great Wyrm
+    {
+        nDamage = d10(48);
+        nDC = 68;
+    }
+
+    PlayDragonBattleCry();
+    //Get first target in spell area
+    oTarget = GetFirstObjectInShape(SHAPE_SPELLCONE, 14.0, GetSpellTargetLocation(), TRUE);
+    while(GetIsObjectValid(oTarget))
+    {
+        if(oTarget != OBJECT_SELF && !GetIsReactionTypeFriendly(oTarget))
+        {
+            //Reset the damage to full
+            nDamStrike = nDamage;
+            //Fire cast spell at event for the specified target
+            SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELLABILITY_DRAGON_BREATH_FIRE));
+            //Adjust the damage based on the Reflex Save, Evasion and Improved Evasion.
+            if(MySavingThrow(SAVING_THROW_REFLEX, oTarget, nDC, SAVING_THROW_TYPE_FIRE))
+            {
+                nDamStrike = nDamStrike/2;
+                if(GetHasFeat(FEAT_EVASION, oTarget) || GetHasFeat(FEAT_IMPROVED_EVASION, oTarget))
+                {
+                    nDamStrike = 0;
+                }
+            }
+            else if(GetHasFeat(FEAT_IMPROVED_EVASION, oTarget))
+            {
+                nDamStrike = nDamStrike/2;
+            }
+            if (nDamStrike > 0)
+            {
+                //Set Damage and VFX
+                eBreath = EffectDamage(nDamStrike, DAMAGE_TYPE_FIRE);
+                eVis = EffectVisualEffect(VFX_IMP_FLAME_M);
+                //Determine effect delay
+                fDelay = GetDistanceBetween(OBJECT_SELF, oTarget)/20;
+                //Apply the VFX impact and effects
+                DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget));
+                DelayCommand(fDelay, ApplyEffectToObject(DURATION_TYPE_INSTANT, eBreath, oTarget));
+             }
+        }
+        //Get next target in spell area
+        oTarget = GetNextObjectInShape(SHAPE_SPELLCONE, 14.0, GetSpellTargetLocation(), TRUE);
+    }
+}