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.
94 lines
3.1 KiB
Plaintext
94 lines
3.1 KiB
Plaintext
///::///////////////////////////////////////////////
|
|
//:: War Cry
|
|
//:: NW_S0_WarCry
|
|
//:: Copyright (c) 2001 Bioware Corp.
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
The bard lets out a terrible shout that gives
|
|
him a +2 bonus to attack and damage and causes
|
|
fear in all enemies that hear the cry
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Preston Watamaniuk
|
|
//:: Created On: Oct 22, 2001
|
|
//:://////////////////////////////////////////////
|
|
|
|
#include "X2_I0_SPELLS"
|
|
#include "x2_inc_spellhook"
|
|
|
|
void main()
|
|
{
|
|
|
|
/*
|
|
Spellcast Hook Code
|
|
Added 2003-06-20 by Georg
|
|
If you want to make changes to all spells,
|
|
check x2_inc_spellhook.nss to find out more
|
|
|
|
*/
|
|
|
|
if (!X2PreSpellCastCode())
|
|
{
|
|
// If code within the PreSpellCastHook (i.e. UMD) reports FALSE, do not run this spell
|
|
return;
|
|
}
|
|
|
|
// End of Spell Cast Hook
|
|
|
|
|
|
|
|
//Declare major variables
|
|
object oTarget;
|
|
int nLevel = GetCasterLevel(OBJECT_SELF);
|
|
effect eAttack = EffectAttackIncrease(2);
|
|
effect eDamage = EffectDamageIncrease(2, DAMAGE_TYPE_SLASHING);
|
|
effect eFear = EffectFrightened();
|
|
effect eVis = EffectVisualEffect(VFX_IMP_HEAD_SONIC);
|
|
effect eVisFear = EffectVisualEffect(VFX_DUR_MIND_AFFECTING_FEAR);
|
|
effect eLOS;
|
|
if(GetGender(OBJECT_SELF) == GENDER_FEMALE)
|
|
{
|
|
eLOS = EffectVisualEffect(290);
|
|
}
|
|
else
|
|
{
|
|
eLOS = EffectVisualEffect(VFX_FNF_HOWL_WAR_CRY);
|
|
}
|
|
|
|
effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
|
|
effect eDur2 = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
|
|
|
|
effect eLink = EffectLinkEffects(eAttack, eDamage);
|
|
eLink = EffectLinkEffects(eLink, eDur2);
|
|
|
|
effect eLink2 = EffectLinkEffects(eVisFear, eFear);
|
|
eLink = EffectLinkEffects(eLink, eDur);
|
|
|
|
//Meta Magic
|
|
if(GetMetaMagicFeat() == METAMAGIC_EXTEND)
|
|
{
|
|
nLevel *= 2;
|
|
}
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eLOS, OBJECT_SELF);
|
|
//Determine enemies in the radius around the bard
|
|
oTarget = GetFirstObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_COLOSSAL, GetLocation(OBJECT_SELF));
|
|
while (GetIsObjectValid(oTarget))
|
|
{
|
|
if (spellsIsTarget(oTarget, SPELL_TARGET_SELECTIVEHOSTILE, OBJECT_SELF) && oTarget != OBJECT_SELF)
|
|
{
|
|
SignalEvent(oTarget, EventSpellCastAt(OBJECT_SELF, SPELL_WAR_CRY));
|
|
//Make SR and Will saves
|
|
if(!MyResistSpell(OBJECT_SELF, oTarget) && !MySavingThrow(SAVING_THROW_WILL, oTarget, GetSpellSaveDC(), SAVING_THROW_TYPE_FEAR))
|
|
{
|
|
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink2, oTarget, RoundsToSeconds(4));
|
|
}
|
|
}
|
|
oTarget = GetNextObjectInShape(SHAPE_SPHERE, RADIUS_SIZE_COLOSSAL, GetLocation(OBJECT_SELF));
|
|
}
|
|
//Apply bonus and VFX effects to bard.
|
|
RemoveSpellEffects(GetSpellId(),OBJECT_SELF,OBJECT_SELF);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, OBJECT_SELF);
|
|
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, OBJECT_SELF, RoundsToSeconds(nLevel));
|
|
SignalEvent(OBJECT_SELF, EventSpellCastAt(OBJECT_SELF, SPELL_WAR_CRY, FALSE));
|
|
}
|