home *** CD-ROM | disk | FTP | other *** search
/ PC Zone 125 / DPPCZ0203B.7z / DPPCZ0203B.ISO / Demos / Neverwinter / data1.cab / override / nw_s0_doom.nss < prev    next >
Text File  |  2002-09-10  |  2KB  |  46 lines
  1. //::///////////////////////////////////////////////
  2. //:: Doom
  3. //:: NW_S0_Doom.nss
  4. //:: Copyright (c) 2001 Bioware Corp.
  5. //:://////////////////////////////////////////////
  6. /*
  7.     If the target fails a save they recieve a -2
  8.     penalty to all saves, attack rolls, damage and
  9.     skill checks for the duration of the spell.
  10.     
  11.     July 22 2002 (BK): Made it mind affecting.
  12. */
  13. //:://////////////////////////////////////////////
  14. //:: Created By: Preston Watamaniuk
  15. //:: Created On: Oct 22, 2001
  16. //:://////////////////////////////////////////////
  17.  
  18.  
  19. #include "NW_I0_SPELLS"    
  20. void main()
  21. {
  22.     //Declare major variables
  23.     object oTarget = GetSpellTargetObject();
  24.     effect eVis = EffectVisualEffect(VFX_IMP_DOOM);
  25.     effect eLink = CreateDoomEffectsLink();
  26.  
  27.     int nLevel = GetCasterLevel(OBJECT_SELF);
  28.     int nMetaMagic = GetMetaMagicFeat();
  29.     //Meta-Magic checks
  30.     if(nMetaMagic == METAMAGIC_EXTEND)
  31.     {
  32.         nLevel *= 2;
  33.     }
  34.     if(!GetIsReactionTypeFriendly(oTarget))
  35.     {
  36.         SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_DOOM));
  37.         //Spell Resistance and Saving throw
  38.         if (!MyResistSpell(OBJECT_SELF, oTarget) && !/*Will Save*/ MySavingThrow(SAVING_THROW_WILL, oTarget, GetSpellSaveDC(), SAVING_THROW_TYPE_MIND_SPELLS))
  39.         {
  40.             ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
  41.             ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink , oTarget, TurnsToSeconds(nLevel));
  42.         }
  43.     }
  44. }
  45.  
  46.