2bb2c470e0
Updated to PRC8. Further function integration. Fixed NPC onDeath script. Full compile. Updated release archive.
127 lines
4.6 KiB
Plaintext
127 lines
4.6 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Name Disrupt Undead/Greater Disrupt Undead
|
|
//:: FileName sp_disrpt_undead.nss
|
|
//:://////////////////////////////////////////////
|
|
/**@file Disrupt Undead
|
|
Necromancy
|
|
Level: Sor/Wiz 0
|
|
Components: V, S
|
|
Casting Time: 1 standard action
|
|
Range: Close (25 ft. + 5 ft./2 levels)
|
|
Effect: Ray
|
|
Duration: Instantaneous
|
|
Saving Throw: None
|
|
Spell Resistance: Yes
|
|
|
|
You direct a ray of positive energy. You must make a
|
|
ranged touch attack to hit, and if the ray hits an
|
|
undead creature, it deals 1d6 points of damage to it.
|
|
|
|
Greater Disrupt Undead
|
|
Necromancy
|
|
Level: Sorcerer/wizard 3
|
|
Components: V, S
|
|
Casting Time: 1 standard action
|
|
Range: Close (25 ft. + 5 ft./2 levels)
|
|
Effect: Ray
|
|
Duration: Instantaneous
|
|
Saving Throw: None
|
|
Spell Resistance: Yes
|
|
|
|
You must succeed on a ranged touch attack with the ray
|
|
to strike a target. This spell functions like disrupt
|
|
undead (PH 223), except that this ray deals 1d8 points
|
|
of damage per caster level to any undead, to a maximum
|
|
of 10d8. If the damage is sufficient to destroy the
|
|
first target, then you can redirect the ray to another
|
|
undead target within 15 feet of the first target. If
|
|
you make a successful ranged touch attack on the second
|
|
target, that target takes half of the damage rolled for
|
|
the first target.
|
|
|
|
Author: Tenjac
|
|
Created: 7/6/07
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "prc_inc_sp_tch"
|
|
|
|
void main()
|
|
{
|
|
object oPC = OBJECT_SELF;
|
|
object oTarget = PRCGetSpellTargetObject();
|
|
int nSpell = GetSpellId();
|
|
int nCasterLvl = PRCGetCasterLevel(oPC);
|
|
int nBeam;
|
|
int nDam;
|
|
int nMetaMagic = PRCGetMetaMagicFeat();
|
|
int nTouch = PRCDoRangedTouchAttack(oTarget);
|
|
int nType = MyPRCGetRacialType(oTarget);
|
|
|
|
if(nSpell == SPELL_DISRUPT_UNDEAD)
|
|
{
|
|
nBeam = VFX_BEAM_HOLY;
|
|
nDam = d6(1)+ (nCasterLvl/4);
|
|
|
|
if(nMetaMagic & METAMAGIC_MAXIMIZE) nDam = 6+(nCasterLvl/4);
|
|
}
|
|
|
|
if(nSpell == SPELL_GREATER_DISRUPT_UNDEAD)
|
|
{
|
|
nBeam = VFX_BEAM_BLACK;
|
|
nDam = d6(3)+ (nCasterLvl/3);
|
|
|
|
if(nMetaMagic & METAMAGIC_MAXIMIZE) nDam = 18+ (nCasterLvl/3);
|
|
}
|
|
|
|
if(nMetaMagic & METAMAGIC_EMPOWER) nDam += (nDam/2);
|
|
|
|
//Beam that acts accordingly
|
|
effect eVis = EffectBeam(nBeam, oPC, BODY_NODE_HAND, !nTouch);
|
|
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
|
|
|
|
if(nTouch)
|
|
{
|
|
if(nType == RACIAL_TYPE_UNDEAD
|
|
|| (GetHasFeat(FEAT_TOMB_TAINTED_SOUL, oTarget) && GetAlignmentGoodEvil(oTarget) != ALIGNMENT_GOOD))
|
|
{
|
|
if(!PRCDoResistSpell(oPC, oTarget, nCasterLvl + SPGetPenetr()))
|
|
{
|
|
if(nSpell == SPELL_GREATER_DISRUPT_UNDEAD)
|
|
{
|
|
//Get hp before damage
|
|
int nHP = GetCurrentHitPoints(oTarget);
|
|
|
|
//Apply Damage
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, PRCEffectDamage(oTarget, nDam, DAMAGE_TYPE_POSITIVE), oTarget);
|
|
|
|
//if enough to kill target, bounce
|
|
if(nDam >= nHP)
|
|
{
|
|
location lLoc = GetLocation(oTarget);
|
|
object oTarget2 = MyFirstObjectInShape(SHAPE_SPHERE, FeetToMeters(15.0), lLoc, TRUE);
|
|
|
|
while(GetIsObjectValid(oTarget2))
|
|
{
|
|
//Undead, enemy, and not the original target
|
|
if((GetRacialType(oTarget2) == RACIAL_TYPE_UNDEAD || (GetHasFeat(FEAT_TOMB_TAINTED_SOUL, oTarget2) && GetAlignmentGoodEvil(oTarget2) != ALIGNMENT_GOOD)
|
|
&& GetIsEnemy(oTarget2, oPC) && (oTarget != oTarget2)))
|
|
{
|
|
//Black beam, origin chest of previous target
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectBeam(VFX_BEAM_BLACK, oTarget, BODY_NODE_CHEST), oTarget2);
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, PRCEffectDamage(oTarget, nDam/2, DAMAGE_TYPE_POSITIVE), oTarget2);
|
|
break;
|
|
}
|
|
|
|
oTarget2 = MyNextObjectInShape(SHAPE_SPHERE, FeetToMeters(15.0), lLoc, TRUE);
|
|
}
|
|
}
|
|
}
|
|
else SPApplyEffectToObject(DURATION_TYPE_INSTANT, PRCEffectDamage(oTarget, nDam, DAMAGE_TYPE_POSITIVE), oTarget);
|
|
}
|
|
}
|
|
}
|
|
PRCSetSchool();
|
|
} |