6ec137a24e
Updated AMS marker feats. Removed arcane & divine marker feats. Updated Dread Necromancer for epic progression. Updated weapon baseitem models. Updated new weapons for crafting & npc equip. Updated prefix. Updated release archive.
118 lines
4.4 KiB
Plaintext
118 lines
4.4 KiB
Plaintext
/*:://////////////////////////////////////////////
|
||
//:: Spell Name Shield of Law
|
||
//:: Spell FileName PHS_S_ShieldofLa
|
||
//:://////////////////////////////////////////////
|
||
//:: In Game Spell desctiption
|
||
//:://////////////////////////////////////////////
|
||
Abjuration [Lawful]
|
||
Level: Clr 8, Law 8
|
||
Components: V, S, F
|
||
Casting Time: 1 standard action
|
||
Range: 6.67M (20 ft.)
|
||
Targets: One creature/level in a 6.67M-radius (20-ft.) burst centered on you
|
||
Duration: 1 round/level (D)
|
||
Saving Throw: See text
|
||
Spell Resistance: Yes (harmless)
|
||
|
||
A dim, blue glow surrounds the subjects, protecting them from attacks,
|
||
granting them resistance to spells cast by chaotic creatures, and slowing
|
||
chaotic creatures when they strike the subjects. This abjuration has four
|
||
effects.
|
||
|
||
First, each warded creature gains a +4 deflection bonus to AC and a +4
|
||
resistance bonus on saves. Unlike protection from chaos, this benefit applies
|
||
against all attacks, not just against attacks by chaotic creatures.
|
||
|
||
Second, a warded creature gains spell resistance 25 against chaotic spells
|
||
and spells cast by chaotic creatures.
|
||
|
||
Third, the abjuration blocks possession and mental influence, just as
|
||
protection from chaos does.
|
||
|
||
Finally, if a chaotic creature succeeds on a melee attack against a warded
|
||
creature, the attacker is slowed (Will save negates, as the slow spell, but
|
||
against shield of law’s save DC).
|
||
|
||
Focus: A tiny reliquary containing some sacred relic, such as a scrap of
|
||
parchment from a lawful text. The reliquary costs at least 500 gp.
|
||
//:://////////////////////////////////////////////
|
||
//:: Spell Effects Applied / Notes
|
||
//:://////////////////////////////////////////////
|
||
Apart from the Finally bit (as the others) the rest, however, is possible.
|
||
//:://////////////////////////////////////////////
|
||
//:: Created By: Jasperre
|
||
//::////////////////////////////////////////////*/
|
||
|
||
#include "PHS_INC_SPELLS"
|
||
|
||
void main()
|
||
{
|
||
// Spell hook check.
|
||
if(!PHS_SpellHookCheck(PHS_SPELL_SHIELD_OF_LAW)) return;
|
||
|
||
// Check for 500GP lawful relic item
|
||
// - Only a focus, not a requirement
|
||
if(!PHS_ComponentFocusItem(PHS_ITEM_LAWFUL_RELIC_500, "Lawful Relic worth 500GP", "Shield of Law")) return;
|
||
|
||
//Declare major variables
|
||
object oCaster = OBJECT_SELF;
|
||
object oTarget;
|
||
int nCasterLevel = PHS_GetCasterLevel();
|
||
int nMetaMagic = PHS_GetMetaMagicFeat();
|
||
|
||
// 1 creature level.
|
||
int nDoneCreatures = 0;
|
||
|
||
// 1 Round/level duration
|
||
float fDuration = PHS_GetDuration(PHS_ROUNDS, nCasterLevel, nMetaMagic);
|
||
|
||
// Delcare effects
|
||
effect eDur = EffectVisualEffect(PHS_VFX_DUR_PROTECTION_LAW_MAJOR);
|
||
effect eSR = EffectSpellResistanceIncrease(25);
|
||
effect eAC = EffectACIncrease(4, AC_DEFLECTION_BONUS);
|
||
effect eSaves = EffectSavingThrowIncrease(SAVING_THROW_ALL, 4, SAVING_THROW_TYPE_ALL);
|
||
effect eImmunities = PHS_CreateCompulsionImmunityLink();
|
||
effect eCessate = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
|
||
|
||
// Only the SR and immunities are vs chaos.
|
||
// * Need to check if this works correctly
|
||
eSR = VersusAlignmentEffect(eSR, ALIGNMENT_CHAOTIC);
|
||
eImmunities = VersusAlignmentEffect(eImmunities, ALIGNMENT_CHAOTIC);
|
||
|
||
// Link effects
|
||
effect eLink = EffectLinkEffects(eDur, eSR);
|
||
eLink = EffectLinkEffects(eLink, eAC);
|
||
eLink = EffectLinkEffects(eLink, eSaves);
|
||
eLink = EffectLinkEffects(eLink, eImmunities);
|
||
eLink = EffectLinkEffects(eLink, eCessate);
|
||
|
||
// Loop all targets without effect nearby
|
||
int nCnt = 0;
|
||
oTarget = oCaster;
|
||
// Loop for 6.67M range
|
||
while(GetIsObjectValid(oTarget) && nDoneCreatures < nCasterLevel &&
|
||
GetDistanceToObject(oTarget) <= 6.67)
|
||
{
|
||
// Make sure they are in our LOS, are a friend too.
|
||
if(LineOfSightObject(oCaster, oTarget) &&
|
||
(GetIsFriend(oTarget) || GetFactionEqual(oTarget)) &&
|
||
// Make sure they are not immune to spells
|
||
!PHS_TotalSpellImmunity(oTarget))
|
||
{
|
||
// Add one to nDoneCreatures
|
||
nDoneCreatures++;
|
||
|
||
// Signal spell cast at event
|
||
PHS_SignalSpellCastAt(oTarget, PHS_SPELL_SHIELD_OF_LAW, FALSE);
|
||
|
||
// Remove previous castings
|
||
PHS_RemoveProtectionFromAlignment(oTarget, ALIGNMENT_CHAOTIC, 3);
|
||
|
||
// Apply effects
|
||
PHS_ApplyDuration(oTarget, eLink, fDuration);
|
||
}
|
||
nCnt++;
|
||
oTarget = GetNearestObject(OBJECT_TYPE_CREATURE, oCaster, nCnt);
|
||
}
|
||
}
|