5914ed2ab5
Updated Release Archive. Fixed Mage-killer prereqs. Removed old LETO & ConvoCC related files. Added organized spell scroll store. Fixed Gloura spellbook. Various TLK fixes. Reorganized Repo. Removed invalid user folders. Added DocGen back in.
94 lines
3.4 KiB
Plaintext
94 lines
3.4 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Enthrall
|
|
//:: sp_enthrall
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
Fascinates all creatures in the area (supposed
|
|
to enthrall them, but the effects are close
|
|
enough).
|
|
*/
|
|
|
|
#include "prc_inc_spells"
|
|
#include "prc_add_spell_dc"
|
|
|
|
void DoConcLoop(object oPC, float fDur, int nCounter, object oTarget)
|
|
{
|
|
if((nCounter == 0) || GetBreakConcentrationCheck(oPC) > 0)
|
|
{
|
|
PRCRemoveSpellEffects(SPELL_ENTHRALL, oPC, oTarget);
|
|
}
|
|
|
|
else
|
|
{
|
|
nCounter--;
|
|
DelayCommand(6.0f, DoConcLoop(oPC, fDur, nCounter, oTarget));
|
|
}
|
|
}
|
|
|
|
void main()
|
|
{
|
|
if(!X2PreSpellCastCode()) return;
|
|
|
|
PRCSetSchool(SPELL_SCHOOL_ENCHANTMENT);
|
|
|
|
|
|
//Declare major variables
|
|
effect eImpact = EffectVisualEffect(VFX_FNF_LOS_NORMAL_20);
|
|
effect eSleep = EffectFascinate();
|
|
effect eMind = EffectVisualEffect(VFX_DUR_MIND_AFFECTING_NEGATIVE);
|
|
effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
|
|
effect eVis = EffectVisualEffect(VFX_IMP_SLEEP);
|
|
|
|
effect eLink = EffectLinkEffects(eSleep, eMind);
|
|
eLink = EffectLinkEffects(eLink, eDur);
|
|
|
|
// * Moved the linking for the ZZZZs into the later code
|
|
// * so that they won't appear if creature immune
|
|
|
|
int nMetaMagic = PRCGetMetaMagicFeat();
|
|
int CasterLvl = PRCGetCasterLevel(OBJECT_SELF);
|
|
|
|
int nDuration = 1;
|
|
int nPenetr = CasterLvl + SPGetPenetr();
|
|
location lTarget = PRCGetSpellTargetLocation();
|
|
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImpact, lTarget);
|
|
|
|
if ((nMetaMagic & METAMAGIC_EXTEND))
|
|
{
|
|
nDuration = nDuration *2; //Duration is +100%
|
|
}
|
|
|
|
object oTarget = MyFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_HUGE, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
//Cycle through the targets within the spell shape until an invalid object is captured.
|
|
while (GetIsObjectValid(oTarget))
|
|
{
|
|
if (spellsIsTarget(oTarget, SPELL_TARGET_SELECTIVEHOSTILE, OBJECT_SELF) && oTarget != OBJECT_SELF)
|
|
{
|
|
//Fire cast spell at event for the specified target
|
|
SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_ENTHRALL));
|
|
//Get the distance between the explosion and the target to calculate delay
|
|
float fDelay = GetDistanceBetweenLocations(lTarget, GetLocation(oTarget))/20;
|
|
if (!PRCDoResistSpell(OBJECT_SELF, oTarget, CasterLvl, fDelay))
|
|
{
|
|
int nDC = PRCGetSaveDC(oTarget, OBJECT_SELF);
|
|
|
|
// Creatures of a different race get a bonus on the save
|
|
if (MyPRCGetRacialType(oTarget) != MyPRCGetRacialType(OBJECT_SELF))
|
|
nDC -= 4;
|
|
|
|
//Make Will Save to negate effect
|
|
if (!/*Will Save*/ PRCMySavingThrow(SAVING_THROW_WILL, oTarget, nDC, SAVING_THROW_TYPE_MIND_SPELLS))
|
|
{
|
|
SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, HoursToSeconds(nDuration), TRUE, PRCGetSpellId(), CasterLvl, OBJECT_SELF);
|
|
//Start conc monitor
|
|
DelayCommand(6.0f, DoConcLoop(OBJECT_SELF, HoursToSeconds(nDuration), 600, oTarget));
|
|
}
|
|
}
|
|
}
|
|
//Select the next target within the spell shape.
|
|
oTarget = MyNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_HUGE, lTarget, TRUE, OBJECT_TYPE_CREATURE);
|
|
}
|
|
|
|
PRCSetSchool();
|
|
}
|