7b9e44ebbb
Initial upload. PRC8 has been added. Module compiles, PRC's default AI & treasure scripts have been integrated. Started work on top hak for SLA / Ability / Scripting modifications.
73 lines
2.9 KiB
Plaintext
73 lines
2.9 KiB
Plaintext
///::////////////////////////////////////////////////
|
|
//:: [Mass Dominate]
|
|
//:: [NW_S0_MsDomn.nss]
|
|
//:: Copyright (c) 2000 Bioware Corp.
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
The caster attempts to dominate a group of individuals
|
|
who's HD can be no more than his level combined.
|
|
The spell starts checking the area and those that
|
|
fail a will save are dominated. The affected persons
|
|
are dominated for 1 round per 2 caster levels.
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Preston Watamaniuk
|
|
//:: Created On: Feb 4, 2001
|
|
//:://////////////////////////////////////////////
|
|
//:: Last Updated By: Preston Watamaniuk, On: April 10, 2001
|
|
|
|
void main()
|
|
{
|
|
//Declare major varialbes
|
|
object oTarget;
|
|
effect eDom = EffectDominated();
|
|
effect eMind = EffectVisualEffect(VFX_DUR_MIND_AFFECTING_NEGATIVE);
|
|
effect eLink = EffectLinkEffects(eMind, eDom);
|
|
effect eVis = EffectVisualEffect(VFX_IMP_DOMINATE_S);
|
|
int nMetaMagic = GetMetaMagicFeat();
|
|
int nCasterLevel = GetCasterLevel(OBJECT_SELF);
|
|
int nDuration = nCasterLevel/2;
|
|
int nHD = nCasterLevel;
|
|
int nCnt = 0;
|
|
int nRacial = GetRacialType(oTarget);
|
|
//Check for metamagic extension
|
|
if (nMetaMagic == METAMAGIC_EXTEND)
|
|
{
|
|
nDuration = nCasterLevel;
|
|
}
|
|
//Get first target in spell area
|
|
oTarget = GetFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_LARGE, GetSpellTargetLocation());
|
|
while (GetIsObjectValid(oTarget) && nCnt < nHD)
|
|
{
|
|
//Make sure the target is not in the caster's faction
|
|
if(GetIsEnemy(oTarget))
|
|
{
|
|
//Make sure the target is a humanoid
|
|
if (GetIsPlayableRacialType(oTarget) ||
|
|
(nRacial == RACIAL_TYPE_HUMANOID_MONSTROUS) ||
|
|
(nRacial == RACIAL_TYPE_HUMANOID_ORC) ||
|
|
(nRacial == RACIAL_TYPE_HUMANOID_REPTILIAN) ||
|
|
(nRacial == RACIAL_TYPE_ANIMAL) ||
|
|
((nHD-nCnt) > GetHitDice(oTarget)))
|
|
{
|
|
//Fire cast spell at event for the specified target
|
|
SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_DOMINATE_PERSON));
|
|
//Make an SR check
|
|
if (!ResistSpell(OBJECT_SELF, oTarget))
|
|
{
|
|
//Make a Will save to negate
|
|
if (!WillSave(oTarget, GetSpellSaveDC(), SAVING_THROW_TYPE_MIND_SPELLS))
|
|
{
|
|
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, RoundsToSeconds(nDuration));
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget);
|
|
}
|
|
}
|
|
//Add targets HD to the total
|
|
nCnt = nCnt + GetHitDice(oTarget);
|
|
}
|
|
}
|
|
//Get next target in spell area
|
|
oTarget = GetNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_LARGE, GetSpellTargetLocation());
|
|
}
|
|
}
|