Further file organization

Further file organization

nwn/nwnprc/trunk/smp/phs_s_holysmite.nss

@@ -0,0 +1,150 @@
+/*:://////////////////////////////////////////////
+//:: Spell Name Holy Smite
+//:: Spell FileName PHS_S_HolySmite
+//:://////////////////////////////////////////////
+//:: In Game Spell desctiption
+//:://////////////////////////////////////////////
+    Evocation [Good]
+    Level: Good 4
+    Components: V, S
+    Casting Time: 1 standard action
+    Range: Medium (20M)
+    Area: 6.67-M.-radius burst
+    Duration: Instantaneous (1 round); see text
+    Saving Throw: Will partial; see text
+    Spell Resistance: Yes
+
+    You draw down holy power to smite your enemies. Only evil and neutral
+    creatures are harmed by the spell; good creatures are unaffected.
+
+    The spell deals 1d8 points of damage per two caster levels (maximum 5d8) to
+    each evil creature in the area (or 1d6 points of damage per caster level,
+    maximum 10d6, to an evil outsider) and causes it to become blinded for 1
+    round. A successful Will saving throw reduces damage to half and negates the
+    blinded effect.
+
+    The spell deals only half damage to creatures who are neither good nor evil,
+    and they are not blinded. Such a creature can reduce that damage by half
+    (down to one-quarter of the roll) with a successful Will save.
+//:://////////////////////////////////////////////
+//:: Spell Effects Applied / Notes
+//:://////////////////////////////////////////////
+    Good = No damage
+    Neutral = Half damage, can quarter on a will save. Never blinded.
+    Evil = Full damage, can half on a will save. Blinded on fail.
+
+    Hits non-good people.
+
+    Hits for up to 5d6 damage, or 10d6 VS outsiders.
+
+    Neutrals take /2 damage.
+
+    This is taken from Chaos Hammer's script, but replaces slow with 1 round
+    blindness and changes alignemnts
+//:://////////////////////////////////////////////
+//:: Created By: Jasperre
+//::////////////////////////////////////////////*/
+
+#include "PHS_INC_SPELLS"
+
+void main()
+{
+    // Spell Hook Check.
+    if(!PHS_SpellHookCheck(PHS_SPELL_CHAOS_HAMMER)) return;
+
+    // Delcare major variables.
+    object oCaster = OBJECT_SELF;
+    object oTarget;
+    location lTarget = GetSpellTargetLocation();
+    int nCasterLevel = GetCasterLevel(oCaster);
+    int nMetaMagic = PHS_GetMetaMagicFeat();
+    int nAlignment, nDam;
+    int nSpellSaveDC = GetSpellSaveDC();
+    float fDelay;
+
+    // Duration of blindness is 1 round
+    float fDuration = PHS_GetDuration(PHS_ROUNDS, 1, nMetaMagic);
+
+    // Delcare Effects
+    effect eVis = EffectVisualEffect(VFX_COM_HIT_DIVINE);
+    effect eVisBlind = EffectVisualEffect(VFX_IMP_BLIND_DEAF_M);
+    effect eBlind = EffectBlindness();
+    effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
+    effect eLink = EffectLinkEffects(eBlind, eDur);
+    eLink = EffectLinkEffects(eLink, eVisBlind);
+
+    // how much damage dice?
+    // 1d8 damage/2 caster levels. We do 1d6/caster level to outsiders
+    int nOutsiderDice = PHS_LimitInteger(nCasterLevel, 10);
+
+    // Normal dice will be nOutsiderDice/2, or 1 per 2 caster levels.
+    int nNormalDice = PHS_LimitInteger(nOutsiderDice/2);
+
+    // Apply AOE visual
+    effect eImpact = EffectVisualEffect(PHS_VFX_FNF_HOLY_SMITE);
+    PHS_ApplyLocationVFX(lTarget, eImpact);
+
+    // Loop all targets in the area.
+    oTarget = GetFirstObjectInShape(SHAPE_SPHERE, 6.67, lTarget, TRUE);
+    while(GetIsObjectValid(oTarget))
+    {
+        // Alignment check and PvP check
+        nAlignment = GetAlignmentGoodEvil(oTarget);
+        if(nAlignment != ALIGNMENT_GOOD &&
+          !GetIsReactionTypeFriendly(oTarget) &&
+        // Make sure they are not immune to spells
+           !PHS_TotalSpellImmunity(oTarget))
+        {
+            // Signal spell cast at
+            PHS_SignalSpellCastAt(oTarget, PHS_SPELL_CHAOS_HAMMER);
+
+            // Delay
+            fDelay = GetDistanceBetweenLocations(lTarget, GetLocation(oTarget))/20;
+
+            // Get random damage
+            if(GetRacialType(oTarget) == RACIAL_TYPE_OUTSIDER)
+            {
+                nDam = PHS_MaximizeOrEmpower(6, nOutsiderDice, nMetaMagic);
+            }
+            else
+            {
+                nDam = PHS_MaximizeOrEmpower(8, nNormalDice, nMetaMagic);
+            }
+            // Half damage if only neutral
+            if(nAlignment == ALIGNMENT_NEUTRAL)
+            {
+                // Divide by 2.
+                nDam /= 2;
+            }
+            // Will saving throw for half damage, and no slow.
+            // - Chaos Saving throw.
+            // If we SAVE it does half damage - no slow
+            if(PHS_SavingThrow(SAVING_THROW_WILL, oTarget, nSpellSaveDC, SAVING_THROW_TYPE_GOOD))
+            {
+                // No slow - hald damage
+                nDam /= 2;
+                if(nDam > 0)
+                {
+                    // Do damage and VFX
+                    DelayCommand(fDelay, PHS_ApplyDamageVFXToObject(oTarget, eVis, nDam, DAMAGE_TYPE_DIVINE));
+                }
+            }
+            else
+            {
+                // Else, full damage. If not neutral, slow for 1d6 rounds
+
+                // Do damage and VFX
+                DelayCommand(fDelay, PHS_ApplyDamageVFXToObject(oTarget, eVis, nDam, DAMAGE_TYPE_DIVINE));
+
+                // If not alignment neutral, we apply blindess as they failed the save.
+                if(nAlignment != ALIGNMENT_NEUTRAL)
+                {
+                    // Apply blindness for fDuration, and instantly!
+                    PHS_ApplyDuration(oTarget, eLink, fDuration);
+                }
+            }
+        }
+        // Get next target
+        oTarget = GetNextObjectInShape(SHAPE_SPHERE, 6.67, lTarget, TRUE);
+    }
+}