PRC8_fork/nwn/nwnprc/trunk/psionics/psi_pow_baletel.nss

119 lines
4.4 KiB
Plaintext
Raw Normal View History

/*
----------------
Baleful Teleport
psi_pow_baletel
----------------
21/10/04 by Stratovarius
*/ /** @file
Baleful Teleport
Psychoportation (Teleportation)
Level: Nomad 5
Manifesting Time: 1 standard action
Range: Close (25 ft. + 5 ft./2 levels)
Target: One corporeal creature
Duration: Instantaneous
Saving Throw: Fortitude half
Power Resistance: Yes
Power Points: 9
Metapsionics: Empower, Maximize, Twin
You psychoportively disperse minuscule portions of the subject, dealing 9d6
points of damage. Targets can be protected from the effects of baleful
teleport by dimensional anchor.
Augment: For every additional power point you spend, this power<65>s damage
increases by 1d6 points. For each extra 2d6 points of damage, this
power<65>s save DC increases by 1 and your manifester level increases
by 1 for the purpose of overcoming power resistance.
*/
#include "psi_inc_psifunc"
#include "psi_inc_pwresist"
#include "psi_spellhook"
#include "prc_inc_spells"
#include "prc_inc_teleport"
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(2,
1, PRC_UNLIMITED_AUGMENTATION
),
METAPSIONIC_EMPOWER | METAPSIONIC_MAXIMIZE | METAPSIONIC_TWIN
);
if(manif.bCanManifest)
{
// Get more data
int nDC = GetManifesterDC(oManifester);
int nPen = GetPsiPenetration(oManifester);
int nNumberOfDice = 9;
int nDieSize = 6;
int nDamage;
// Apply augmentation
nDC += manif.nTimesGenericAugUsed;
nPen += manif.nTimesGenericAugUsed;
nNumberOfDice += manif.nTimesAugOptUsed_1;
// Let the target know
PRCSignalSpellEvent(oTarget, TRUE, manif.nSpellID, oManifester);
// Handle Twin Power
int nRepeats = manif.bTwin ? 2 : 1;
for(; nRepeats > 0; nRepeats--)
{
// Check for Power Resistance
if(PRCMyResistPower(oManifester, oTarget, nPen) && !GetIsIncorporeal(oTarget))
{
// The power has the Teleportation descriptor, so the target has to be teleportable for it to be affected
if(GetCanTeleport(oTarget, GetLocation(oTarget), FALSE))
{
// Roll damage
nDamage = MetaPsionicsDamage(manif, nDieSize, nNumberOfDice, 0, 0, TRUE, FALSE);
// Fort save for half
if(PRCMySavingThrow(SAVING_THROW_FORT, oTarget, nDC, SAVING_THROW_TYPE_NONE))
{
if (GetHasMettle(oTarget, SAVING_THROW_FORT))
// This script does nothing if it has Mettle, bail
nDamage = 0;
nDamage /= 2;
}
// Target-specific stuff
nDamage = GetTargetSpecificChangesToDamage(oTarget, oManifester, nDamage);
//Apply the damage and some VFX
effect eDam = EffectDamage(nDamage, DAMAGE_TYPE_MAGICAL);
SPApplyEffectToObject(DURATION_TYPE_INSTANT, eDam, oTarget);
SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_LOS_NORMAL_10), oTarget);
DelayCommand(0.75f, SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_LOS_NORMAL_20), oTarget));
DelayCommand(1.5f, SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_LOS_NORMAL_30), oTarget));
}// end if - the target can be teleported
}// end if - SR check
}// end for - Twin Power
}// end if - Successfull manifestation
}