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.
112 lines
4.1 KiB
Plaintext
112 lines
4.1 KiB
Plaintext
//::///////////////////////////////////////////////
|
|
//:: Bless
|
|
//:: NW_S0_Bless.nss
|
|
//:: Copyright (c) 2001 Bioware Corp.
|
|
//:://////////////////////////////////////////////
|
|
/*
|
|
Bless
|
|
Enchantment (Compulsion) [Mind-Affecting]
|
|
Level: Clr 1, Pal 1
|
|
Components: V, S, DF
|
|
Casting Time: 1 standard action
|
|
Range: 50 ft.
|
|
Area: The caster and all allies within
|
|
a 50-ft. burst, centered on the caster
|
|
Duration: 1 min./level
|
|
Saving Throw: None
|
|
Spell Resistance: Yes (harmless)
|
|
|
|
|
|
Bless fills your allies with courage. Each ally
|
|
gains a +1 morale bonus on attack rolls and on
|
|
saving throws against fear effects.
|
|
|
|
Bless counters and dispels bane.
|
|
*/
|
|
//:://////////////////////////////////////////////
|
|
//:: Created By: Preston Watamaniuk
|
|
//:: Created On: July 24, 2001
|
|
//:://////////////////////////////////////////////
|
|
//:: VFX Pass By: Preston W, On: June 20, 2001
|
|
//:: Added Bless item ability: Georg Z, On: June 20, 2001
|
|
|
|
|
|
//:: modified by mr_bumpkin Dec 4, 2003
|
|
#include "prc_inc_spells"
|
|
#include "prc_add_spell_dc"
|
|
|
|
void main()
|
|
{
|
|
if (!X2PreSpellCastCode()) return;
|
|
|
|
PRCSetSchool(SPELL_SCHOOL_ENCHANTMENT);
|
|
|
|
//Declare major variables
|
|
object oCaster = OBJECT_SELF;
|
|
object oTarget = PRCGetSpellTargetObject();
|
|
int nCasterLvl = PRCGetCasterLevel(oCaster);
|
|
int nMetaMagic = PRCGetMetaMagicFeat();
|
|
float fDuration = TurnsToSeconds(nCasterLvl);
|
|
if(nMetaMagic & METAMAGIC_EXTEND)
|
|
fDuration *= 2; //Duration is +100%
|
|
|
|
effect eVis = EffectVisualEffect(VFX_IMP_HEAD_HOLY);
|
|
effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_POSITIVE);
|
|
|
|
// ---------------- TARGETED ON BOLT -------------------
|
|
if(GetIsObjectValid(oTarget) && GetObjectType(oTarget) == OBJECT_TYPE_ITEM)
|
|
{
|
|
// special handling for blessing crossbow bolts that can slay rakshasa's
|
|
if (GetBaseItemType(oTarget) == BASE_ITEM_BOLT)
|
|
{
|
|
object oPossessor = GetItemPossessor(oTarget);
|
|
SignalEvent(oPossessor, EventSpellCastAt(oCaster, SPELL_BLESS, FALSE));
|
|
IPSafeAddItemProperty(oTarget, ItemPropertyOnHitCastSpell(IP_CONST_ONHIT_CASTSPELL_ONHIT_SLAYRAKSHASA, 1), fDuration, X2_IP_ADDPROP_POLICY_KEEP_EXISTING);
|
|
SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oPossessor);
|
|
SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eDur, oPossessor, fDuration, FALSE);
|
|
PRCSetSchool();
|
|
return;
|
|
}
|
|
}
|
|
|
|
location lCaster = GetLocation(oCaster);
|
|
float fRange = FeetToMeters(50.0);
|
|
|
|
effect eImpact = EffectVisualEffect(VFX_FNF_LOS_HOLY_30);
|
|
|
|
//Apply Impact
|
|
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImpact, lCaster);
|
|
|
|
//Get the first target in the radius around the caster
|
|
oTarget = MyFirstObjectInShape(SHAPE_SPHERE, fRange, lCaster);
|
|
while(GetIsObjectValid(oTarget))
|
|
{
|
|
if(GetIsReactionTypeFriendly(oTarget) || GetFactionEqual(oTarget))
|
|
{
|
|
//Fire spell cast at event for target
|
|
SignalEvent(oTarget, EventSpellCastAt(oCaster, SPELL_BLESS, FALSE));
|
|
|
|
float fDelay = PRCGetRandomDelay(0.4, 1.1);
|
|
|
|
if(GetHasSpellEffect(SPELL_BANE, oTarget))
|
|
//Remove Bane spell
|
|
DelayCommand(fDelay, PRCRemoveEffectsFromSpell(oTarget, SPELL_BANE));
|
|
else
|
|
{
|
|
effect eAttack = EffectAttackIncrease(1);
|
|
effect eSave = EffectSavingThrowIncrease(SAVING_THROW_ALL, 1, SAVING_THROW_TYPE_FEAR);
|
|
effect eLink = EffectLinkEffects(eAttack, eSave);
|
|
eLink = EffectLinkEffects(eLink, eDur);
|
|
|
|
//Apply bonus effects
|
|
DelayCommand(fDelay, SPApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oTarget, fDuration, TRUE, SPELL_BLESS, nCasterLvl));
|
|
}
|
|
//Apply VFX impact
|
|
DelayCommand(fDelay, SPApplyEffectToObject(DURATION_TYPE_INSTANT, eVis, oTarget));
|
|
}
|
|
//Get the next target in the specified area around the caster
|
|
oTarget = MyNextObjectInShape(SHAPE_SPHERE, fRange, lCaster);
|
|
}
|
|
PRCSetSchool();
|
|
}
|