PRC8/trunk/psionics/psi_pow_greaseb.nss
Jaysyn904 1662218bb4 Initial upload.
Adding base PRC 4.19a files to repository.
2022-10-07 13:51:24 -04:00

57 lines
1.5 KiB
Plaintext

/*
----------------
Ectoplasmic Sheen, OnExit
psi_pow_greaseb
----------------
30/10/04 by Stratovarius
*/ /** @file
Ectoplasmic Sheen, OnExit
Metacreativity (Creation)
Level: Psion/wilder 1
Manifesting Time: 1 standard action
Range: Close (25 ft. + 5 ft./2 levels)
Target or Area: 10-ft. square
Duration: 1 round/level
Saving Throw: See text
Power Resistance: No
Power Points: 1
Metapsionics: Extend
You create a pool of ectoplasm across the floor that inhibits motion and can cause people to slow down.
This functions as the spell grease.
*/
#include "psi_inc_psifunc"
#include "psi_inc_pwresist"
#include "psi_spellhook"
#include "prc_inc_spells"
void main()
{
object oCreator = GetAreaOfEffectCreator();
object oTarget = GetExitingObject();
// Loop over effects, removing the ones from this power
effect eAOE;
if(GetHasSpellEffect(POWER_GREASE, oTarget))
{
eAOE = GetFirstEffect(oTarget);
while(GetIsEffectValid(eAOE))
{
if(GetEffectCreator(eAOE) == oCreator &&
GetEffectType(eAOE) == EFFECT_TYPE_MOVEMENT_SPEED_DECREASE &&
GetEffectSpellId(eAOE) == POWER_GREASE
)
{
RemoveEffect(oTarget, eAOE);
}
// Get next effect on the target
eAOE = GetNextEffect(oTarget);
}// end while - Effect loop
}// end if - Target has been affected at all
}