Further file organization

Further file organization

nwn/nwnprc/trunk/smp/phs_s_ironbody.nss

@@ -0,0 +1,134 @@
+/*:://////////////////////////////////////////////
+//:: Spell Name Iron Body
+//:: Spell FileName PHS_S_IronBody
+//:://////////////////////////////////////////////
+//:: In Game Spell desctiption
+//:://////////////////////////////////////////////
+    Transmutation
+    Level: Earth 8, Sor/Wiz 8
+    Components: V, S, M/DF
+    Casting Time: 1 standard action
+    Range: Personal
+    Target: You
+    Duration: 1 min./level (D)
+
+    This spell transforms your body into living iron, which grants you several
+    powerful resistances and abilities.
+
+    You gain damage reduction 15/+20. You are immune to blindness, critical hits,
+    ability score damage, deafness, disease, drowning, electricity, poison,
+    stunning, and all spells or attacks that affect your physiology or respiration,
+    because you have no physiology or respiration while this spell is in effect.
+    You take only half damage from acid and fire of all kinds. However, you also
+    become vulnerable to rust attacks, as an iron golem is.
+
+    You gain a +6 enhancement bonus to your Strength score, but you take a -6
+    penalty to Dexterity as well (to a minimum Dexterity score of 3), and your
+    speed is reduced to half normal. You have an spell failure chance of
+    50% and a -8 penalty on armor-based skills, just as if you were clad in full
+    plate armor. You cannot drink (and thus can<61>t use potions) or play wind
+    instruments.
+
+    Arcane Material Component: A small piece of iron that was once part of either
+    an iron golem, a hero<72>s armor, or a war machine.
+//:://////////////////////////////////////////////
+//:: Spell Effects Applied / Notes
+//:://////////////////////////////////////////////
+    Currently this does this:
+
+    - Will not work if the dex ability damage, slow or arcane spell failure or
+    skill decrease cannot be applied.
+
+    Got to do this - any "remove" spells will now correctly remove everything
+    and stop abuse (as does any immunities). Might change, but it'd be hard
+    to stop the bad stuff going and keeping the good stuff.
+
+    The "respiratory spells" will be added as EffectSpellImmunity()
+//:://////////////////////////////////////////////
+//:: Created By: Jasperre
+//::////////////////////////////////////////////*/
+
+#include "PHS_INC_SPELLS"
+
+void main()
+{
+    // Spell Hook Check.
+    if(!PHS_SpellHookCheck(PHS_SPELL_IRON_BODY)) return;
+
+    // Declare major variables
+    object oCaster = OBJECT_SELF;
+    object oTarget = GetSpellTargetObject();
+    int nCasterLevel = PHS_GetCasterLevel();
+    int nMetaMagic = PHS_GetMetaMagicFeat();
+
+    // Make sure they are not immune to spells
+    if(PHS_TotalSpellImmunity(oTarget)) return;
+
+    // Duration is 1 minute/level
+    float fDuration = PHS_GetDuration(PHS_MINUTES, nCasterLevel, nMetaMagic);
+
+    // Declare effects
+    // All "Good" effects
+    effect eIron = EffectDamageReduction(15, DAMAGE_POWER_PLUS_TWENTY);
+    effect eStr = EffectAbilityIncrease(ABILITY_STRENGTH, 6);
+    effect eBlind = EffectImmunity(IMMUNITY_TYPE_BLINDNESS);
+    effect eCritical = EffectImmunity(IMMUNITY_TYPE_CRITICAL_HIT);
+    effect eAbility = EffectImmunity(IMMUNITY_TYPE_ABILITY_DECREASE);
+    effect eDisease = EffectImmunity(IMMUNITY_TYPE_DISEASE);
+    effect ePoison = EffectImmunity(IMMUNITY_TYPE_POISON);
+    effect eStun = EffectImmunity(IMMUNITY_TYPE_STUN);
+    effect eElect = EffectDamageImmunityIncrease(DAMAGE_TYPE_ELECTRICAL, 100);
+    effect eAcid = EffectDamageImmunityIncrease(DAMAGE_TYPE_ACID, 50);
+    effect eFire = EffectDamageImmunityIncrease(DAMAGE_TYPE_FIRE, 50);
+    // Special visual
+    effect eDur = EffectVisualEffect(PHS_VFX_DUR_IRONSKIN);
+    effect eCessate = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
+    // Seperate bad effects
+    effect ePenDex = EffectAbilityDecrease(ABILITY_DEXTERITY, 6);
+    effect ePenSkill = PHS_EffectArmorSkillsDecrease(8);
+    effect ePenSlow = EffectMovementSpeedDecrease(50);
+    effect ePenFail = EffectSpellFailure(50);
+
+    // Link good effects
+    effect eLink = EffectLinkEffects(eIron, eBlind);
+
+    // We add the strength link only if we will havn't got any 6 or more bonuses
+    // to strength
+    if(PHS_GetHasAbilityBonusOfPower(oTarget, ABILITY_STRENGTH, 6) == 0)
+    {
+        eLink = EffectLinkEffects(eLink, eStr);
+    }
+    eLink = EffectLinkEffects(eLink, eCritical);
+    eLink = EffectLinkEffects(eLink, eAbility);
+    eLink = EffectLinkEffects(eLink, eDisease);
+    eLink = EffectLinkEffects(eLink, ePoison);
+    eLink = EffectLinkEffects(eLink, eStun);
+    eLink = EffectLinkEffects(eLink, eElect);
+    eLink = EffectLinkEffects(eLink, eAcid);
+    eLink = EffectLinkEffects(eLink, eFire);
+    eLink = EffectLinkEffects(eLink, eDur);
+    eLink = EffectLinkEffects(eLink, eCessate);
+    // Add in bad effects.
+    eLink = EffectLinkEffects(eLink, ePenDex);
+    eLink = EffectLinkEffects(eLink, ePenSkill);
+    eLink = EffectLinkEffects(eLink, ePenSlow);
+    eLink = EffectLinkEffects(eLink, ePenFail);
+
+    // Remove previous effects
+    PHS_RemoveSpellEffectsFromTarget(PHS_SPELL_IRON_BODY, oTarget);
+
+    // Remove any bonuses to strength of 5 or under.
+    PHS_RemoveAnyAbilityBonuses(oTarget, ABILITY_STRENGTH, 5);
+
+    // Signal spell cast at
+    PHS_SignalSpellCastAt(oTarget, PHS_SPELL_IRON_BODY, FALSE);
+
+    // Apply bad effects to the target
+    //PHS_ApplyDuration(oTarget, ePenDex, fDuration);
+    //PHS_ApplyDuration(oTarget, ePenSkill, fDuration);
+    //PHS_ApplyDuration(oTarget, ePenSlow, fDuration);
+    //PHS_ApplyDuration(oTarget, ePenFail, fDuration);
+
+    // Apply effects to the target
+    PHS_ApplyDuration(oTarget, eLink, fDuration);
+}