PRC8_fork/nwn/nwnprc/trunk/psionics/psi_pow_dispel.nss
Jaysyn904 e641b42f84 Exalted update
Updated Vow of Poverty. Added Sanctify Ki Strike, Holy Strike, Fist of Heavens, Vow of Abstinence, Vow of Chastity & Gift of Faith.  (@fenac).  Turned off the Taunt & Parry skills.  Re-disabled AC & save bonuses from Tumble & Spellcraft.   Updated min() & max() to PRCmin() & PRCmax() to not conflict with similarly named NUI adjacent functions.  Set Point Blank Shot to 30' per PnP.  Added icon for Chosen of Evil.  Started work on Hidden Talent.  Created Psionics function cheatsheet.  Updated release archive.
2025-01-29 22:46:38 -05:00

131 lines
5.0 KiB
Plaintext

/*
----------------
Dispel Psionics
psi_pow_dispel
----------------
26/3/05 by Stratovarius
*/ /** @file
Dispel Psionics
Psychokinesis
Level: Psion/wilder 3
Manifesting Time: 1 standard action
Range: Medium (100 ft. + 10 ft./level)
Target or Area: One creature; or 20-ft.-radius burst
Duration: Instantaneous
Saving Throw: None
Power Resistance: No
Power Points: 5
Metapsionics: Twin, Widen
This power attempts to strip all magical effects from a single target. It can also target a group of creatures,
attempting to remove the most powerful spell effect from each creature. To remove an effect, the manifester makes a dispel
check of 1d20 +1 per manifester level (to a maximum of +10) against a DC of 11 + the power effect's manifester level.
Augment: For every additional power point spent, the manifester level limit
on your dispel check increases by 2 (to a maximum bonus of +20 for
a 5-point expenditure).
*/
#include "psi_inc_psifunc"
#include "psi_inc_pwresist"
#include "psi_spellhook"
#include "inc_dispel"
void main()
{
/*
Spellcast Hook Code
Added 2004-11-02 by Stratovarius
If you want to make changes to all powers,
check psi_spellhook to find out more
*/
if (!PsiPrePowerCastCode())
{
// If code within the PrePowerCastHook (i.e. UMD) reports FALSE, do not run this spell
return;
}
// End of Spell Cast Hook
object oManifester = OBJECT_SELF;
object oTarget = PRCGetSpellTargetObject();
struct manifestation manif =
EvaluateManifestation(oManifester, oTarget,
PowerAugmentationProfile(PRC_NO_GENERIC_AUGMENTS,
1, 5
),
METAPSIONIC_TWIN | METAPSIONIC_WIDEN
);
if(manif.bCanManifest)
{
int bIsBioDispel = GetLocalInt(GetModule(),"BIODispel");
int nMLCap = PRCMin(10 + (2 * manif.nTimesAugOptUsed_1), manif.nManifesterLevel);
effect eVis = EffectVisualEffect(VFX_IMP_BREACH);
effect eImpact = EffectVisualEffect(VFX_FNF_DISPEL);
location lTarget = PRCGetSpellTargetLocation();
float fRadius = EvaluateWidenPower(manif, FeetToMeters(20.0f));
// Handle Twin Power
int nRepeats = manif.bTwin ? 2 : 1;
for(; nRepeats > 0; nRepeats--)
{
// Targeted dispel - Remove all effects
if(GetIsObjectValid(oTarget))
{
if(bIsBioDispel)
spellsDispelMagic(oTarget, manif.nManifesterLevel, eVis, eImpact);
else
spellsDispelMagicMod(oTarget, manif.nManifesterLevel, eVis, eImpact);
}
// Dispel in an area - Only remove single effect from each target
else
{
// Do area VFX
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImpact, lTarget);
// Target loop
oTarget = MyFirstObjectInShape(SHAPE_SPHERE, fRadius, lTarget, FALSE,
OBJECT_TYPE_CREATURE | OBJECT_TYPE_AREA_OF_EFFECT | OBJECT_TYPE_PLACEABLE
);
while(GetIsObjectValid(oTarget))
{
// Area of Effects are handled using a separate function
if(GetObjectType(oTarget) == OBJECT_TYPE_AREA_OF_EFFECT)
{
if(bIsBioDispel)
spellsDispelAoE(oTarget, oManifester, manif.nManifesterLevel);
else
spellsDispelAoEMod(oTarget, oManifester, manif.nManifesterLevel);
}
// Placeables just have their AI informed
// Why? - Ornedan
else if(GetObjectType(oTarget) == OBJECT_TYPE_PLACEABLE)
{
SignalEvent(oTarget, EventSpellCastAt(oManifester, SPELL_DISPEL_MAGIC));//PRCGetSpellId()));
}
// It's a creature, take out the highest caster/manifester level effect on it
else
{
if(bIsBioDispel)
spellsDispelMagic(oTarget, manif.nManifesterLevel, eVis, eImpact, FALSE);
else
spellsDispelMagicMod(oTarget, manif.nManifesterLevel, eVis, eImpact, FALSE);
}
// Get next target
oTarget = MyNextObjectInShape(SHAPE_SPHERE, fRadius, lTarget, FALSE,
OBJECT_TYPE_CREATURE | OBJECT_TYPE_AREA_OF_EFFECT | OBJECT_TYPE_PLACEABLE
);
}// end while - Target loop
}// end else - Area dispel
}// end for - Twin Power
}// end if - Successfull manifestation
}