Further file organization

Further file organization

nwn/nwnprc/trunk/scripts/prc_tn_des_a.nss

@@ -0,0 +1,76 @@
+//::///////////////////////////////////////////////
+//:: Desecrate
+//:: prc_tn_des_a
+//::///////////////////////////////////////////////
+/*
+Desecrate
+Evocation [Evil]
+Level:            Clr 2, Evil 2
+Components:       V, S, M, DF
+Casting Time:     1 standard action
+Range:            Close (25 ft. + 5 ft./2 levels)
+Area:             20-ft.-radius emanation
+Duration:         2 hours/level
+Saving Throw:     None
+Spell Resistance: Yes
+
+This spell imbues an area with negative energy. Each
+Charisma check made to turn undead within this area
+takes a -3 profane penalty, and every undead creature
+entering a desecrated area gains a +1 profane bonus
+on attack rolls, damage rolls, and saving throws. An
+undead creature created within or summoned into such
+an area gains +1 hit points per HD.
+
+If the desecrated area contains an altar, shrine, or
+other permanent fixture dedicated to your deity or
+aligned higher power, the modifiers given above are
+doubled (-6 profane penalty on turning checks, +2
+profane bonus and +2 hit points per HD for undead in
+the area).
+
+Furthermore, anyone who casts animate dead within
+this area may create as many as double the normal
+amount of undead (that is, 4 HD per caster level
+rather than 2 HD per caster level).
+
+If the area contains an altar, shrine, or other
+permanent fixture of a deity, pantheon, or higher
+power other than your patron, the desecrate spell
+instead curses the area, cutting off its connection
+with the associated deity or power. This secondary
+function, if used, does not also grant the bonuses
+and penalties relating to undead, as given above.
+
+Desecrate counters and dispels consecrate.
+
+Material Component
+A vial of unholy water and 25 gp worth (5 pounds)
+of silver dust, all of which must be sprinkled
+around the area.
+*/
+
+#include "prc_alterations"
+
+void main()
+{
+    object oTarget = GetEnteringObject();
+
+    if(MyPRCGetRacialType(oTarget) == RACIAL_TYPE_UNDEAD)
+    {
+        effect eLink = EffectDamageIncrease(DAMAGE_BONUS_1, DAMAGE_TYPE_NEGATIVE);
+               eLink = EffectLinkEffects(eLink, EffectAttackIncrease(1));
+               eLink = EffectLinkEffects(eLink, EffectSavingThrowIncrease(SAVING_THROW_ALL, 1));
+               eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE));
+        effect eHP = EffectTemporaryHitpoints(GetHitDice(oTarget));
+        effect eVis = EffectVisualEffect(VFX_IMP_HOLY_AID);
+
+        if(!GetPRCSwitch(PRC_TRUE_NECROMANCER_ALTERNATE_VISUAL))
+            ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
+        //rather than a big flashy holy aid effect, the alternative is a minor evil red glow
+        else
+            eLink = EffectLinkEffects(eLink, EffectVisualEffect(VFX_DUR_PROTECTION_EVIL_MINOR));
+        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eLink, oTarget);
+        ApplyEffectToObject(DURATION_TYPE_PERMANENT, eHP, oTarget);
+    }
+}