61 lines
2.8 KiB
Plaintext
61 lines
2.8 KiB
Plaintext
|
/*
|
|||
|
|
18/02/19 by Stratovarius
|
|||
|
|
|
|||
|
|
Dark Soul
|
|||
|
|
|
|||
|
|
Master, Heart and Soul
|
|||
|
|
Level/School: 7th/Enchantment (Compulsion) [Mind Affecting]
|
|||
|
|
Range: Personal
|
|||
|
|
Target: You
|
|||
|
|
Duration: 1 round/level
|
|||
|
|
Saving Throw: Will negates; see text
|
|||
|
|
Spell Resistance: Yes; see text
|
|||
|
|
|
|||
|
|
You open the subject<63>s mind to the Plane of Shadow, altering its personality.
|
|||
|
|
|
|||
|
|
You turn the dark energies from the Plane of Shadow upon another creature, compelling it to act in ways that it normally would not.
|
|||
|
|
While this effect is active, you can use a standard action to focus the shadow energies on one living creature within 30 feet that you select.
|
|||
|
|
The creature must succeed on a Will saving throw (DC 17 + your Cha modifier) or immediately make a melee attack against one target within its reach.
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
#include "shd_inc_shdfunc"
|
|||
|
|
#include "prc_inc_combat"
|
|||
|
|
|
|||
|
|
void main()
|
|||
|
|
{
|
|||
|
|
object oShadow = OBJECT_SELF;
|
|||
|
|
object oTarget = PRCGetSpellTargetObject();
|
|||
|
|
int nPen = ShadowSRPen(oShadow, GetShadowcasterLevel(oShadow));
|
|||
|
|
|
|||
|
|
if (spellsIsTarget(oTarget, SPELL_TARGET_SELECTIVEHOSTILE, oShadow))
|
|||
|
|
{
|
|||
|
|
//Fire cast spell at event for the specified target
|
|||
|
|
SignalEvent(oTarget, EventSpellCastAt(oShadow, PRCGetSpellId()));
|
|||
|
|
if (!PRCDoResistSpell(oShadow, oTarget, nPen) && !/*Will Save*/ PRCMySavingThrow(SAVING_THROW_WILL, oTarget, GetShadowcasterDC(oShadow), SAVING_THROW_TYPE_MIND_SPELLS))
|
|||
|
|
{
|
|||
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_SOUND_SYMBOL_PAIN), oTarget);
|
|||
|
|
location lTarget = GetLocation(oTarget);
|
|||
|
|
int bBreak = FALSE;
|
|||
|
|
|
|||
|
|
// Use the function to get the closest creature as a target
|
|||
|
|
object oAreaTarget = MyFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_SMALL, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|||
|
|
while(GetIsObjectValid(oAreaTarget) && !bBreak)
|
|||
|
|
{
|
|||
|
|
if(oAreaTarget != oTarget && oAreaTarget != oShadow && GetIsInMeleeRange(oTarget, oAreaTarget))
|
|||
|
|
{
|
|||
|
|
//effect eNone;
|
|||
|
|
AssignCommand(oTarget, ClearAllActions());
|
|||
|
|
AssignCommand(oTarget, ActionAttack(oAreaTarget));
|
|||
|
|
//AssignCommand(oTarget, PerformAttack(oAreaTarget, oTarget, eNone));
|
|||
|
|
//if (DEBUG) DoDebug("shd_myst_drkslft: Successful attack against "+GetName(oAreaTarget));
|
|||
|
|
//FloatingTextStringOnCreature("shd_myst_drkslft: Successful attack against "+GetName(oAreaTarget), oShadow, FALSE);
|
|||
|
|
DelayCommand(4.5, AssignCommand(oTarget, ClearAllActions()));
|
|||
|
|
bBreak = TRUE;
|
|||
|
|
}
|
|||
|
|
//Select the next target within the spell shape.
|
|||
|
|
oAreaTarget = MyNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_SMALL, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|