Further file organization

Further file organization

nwn/nwnprc/trunk/smp/xxx_s_spellguard.nss

@@ -0,0 +1,92 @@
+/*:://////////////////////////////////////////////
+//:: Spell Name Spellguard
+//:: Spell FileName XXX_S_Spellguard
+//:://////////////////////////////////////////////
+//:: In Game Spell desctiption
+//:://////////////////////////////////////////////
+    Abjuration
+    Level: Sor/Wiz 8
+    Components: V, S, M
+    Casting Time: 1 standard action
+    Range: Personal
+    Target: Caster
+    Duration: 4 rounds
+    Saving Throw: None
+    Spell Resistance: No
+    Source: Various (shadow mage)
+
+    When you cast the spell, a transparent barrier of arcane energy protects you
+    from all spells of 6th level or lower which allow a spell resistance check,
+    for the duration. Spellcasters casting spells of 7th level or higher at you
+    must succeed at a Spellcraft check, DC equal to your spellcaster level + your
+    Intelligence or Charisma modifier for wizards and sorcerers respectively.
+    Their success indicates you are affected as normal by the spell and their
+    failure indicates your spellguard blocked the magical attack.
+
+    Once the spellguard is raised, it lasts for 4 rounds, whenupon it is
+    discharged. Only one spellguard may be active for the caster at any one
+    time, and spells which do allow or provide harmless spell resistance checks
+    are not affected by the barrier.
+
+    Material Components: a small crystal shaped into a shield, worth 500 gp.
+//:://////////////////////////////////////////////
+//:: Spell Effects Applied / Notes
+//:://////////////////////////////////////////////
+    How this is done, its pretty easy:
+
+    1. It alters the SMP_SpellResistanceCheck() function.
+    2. It applies the normal immunity: 6 level spells and lower, to the caster
+    3. If at any time the function is called, they pass the checks for ResistSpell()
+       and it would normally return FALSE, a new check is made (for spellcraft,
+       as the description) as it will be a level 7+ spell. The DC is set
+       on the caster.
+
+    Easy. Note: This needs testing. It is 4 rounds long, as Guardian Mantal type
+    spells are (also made up) to provide some tempoary immunity to spells, or
+    at least an expensive one (500GP component, only 4 rounds long is nothing
+    compared to other helpful spells, but helpful in short term).
+//:://////////////////////////////////////////////
+//:: Created By: Jasperre
+//::////////////////////////////////////////////*/
+
+#include "SMP_INC_SPELLS"
+
+void main()
+{
+    // Spell Hook Check.
+    if(!SMP_SpellHookCheck(SMP_SPELL_SPELLGUARD)) return;
+
+    // Declare major variables
+    object oCaster = OBJECT_SELF;
+    object oTarget = GetSpellTargetObject();// Should always be us.
+    int nMetaMagic = SMP_GetMetaMagicFeat();
+    int nCasterLevel = SMP_GetCasterLevel();
+    int nAbility = SMP_GetAppropriateAbilityBonus();
+    // DC for level 7+ spells. Spellcraft check.
+    int nDC = nCasterLevel + nAbility;
+
+    // Component check
+    if(!SMP_ComponentExactItemRemove(SMP_ITEM_CRYSTALSHIELD, "A small crystal shaped into a Shield, worth 500GP", "Spellguard")) return;
+
+    // Declare effects
+    effect eDur = EffectVisualEffect(VFX_DUR_SPELLTURNING);
+    effect eImmune = EffectSpellLevelAbsorption(6);
+    effect eCessate = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
+
+    // Link effects
+    effect eLink = EffectLinkEffects(eDur, eImmune);
+    eLink = EffectLinkEffects(eLink, eCessate);
+
+    // Duration is 4 rounds
+    float fDuration = RoundsToSeconds(4);
+
+    // This will remove the previous ones.
+    SMP_RemoveSpellEffectsFromTarget(SMP_SPELL_SPELLGUARD, oTarget);
+
+    // Set the DC of level 7+ spells cast on the caster.
+    // * see SMP_INC_RESIST
+    SetLocalInt(oCaster, "SMP_SPELL_SPELLGUARD_DC", nDC);
+
+    // Apply effects
+    SMP_ApplyDuration(oTarget, eLink, fDuration);
+}