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.
278 lines
11 KiB
Plaintext
278 lines
11 KiB
Plaintext
//::///////////////////////////////////////////////
|
||
//:: Turn Undead
|
||
//:: NW_S2_TurnDead
|
||
//:: Copyright (c) 2001 Bioware Corp.
|
||
//:://////////////////////////////////////////////
|
||
/*
|
||
Checks domain powers and class to determine
|
||
the proper turning abilities of the casting
|
||
character.
|
||
*/
|
||
//:://////////////////////////////////////////////
|
||
//:: Created By: Preston Watamaniuk
|
||
//:: Created On: Nov 2, 2001
|
||
//:: Updated On: Jul 15, 2003 - Georg Zoeller
|
||
//:://////////////////////////////////////////////
|
||
|
||
/*
|
||
308 - turn undead
|
||
1726 - Turn_Scaleykind
|
||
1727 - Turn_Slime
|
||
1728 - Turn_Spider
|
||
1729 - Turn_Plant
|
||
1730 - Turn_Air
|
||
1731 - Turn_Earth
|
||
1732 - Turn_Fire
|
||
1733 - Turn_Water
|
||
1734 - Turn_Blightspawned
|
||
2259 - turn outsider
|
||
3497 - Turn cold
|
||
*/
|
||
|
||
#include "prc_inc_clsfunc"
|
||
#include "prc_inc_domain"
|
||
#include "prc_inc_turning"
|
||
#include "prc_inc_factotum"
|
||
|
||
void main()
|
||
{
|
||
int nTurnType = GetSpellId();
|
||
|
||
if(nTurnType == VESTIGE_TENEBROUS_TURN)
|
||
{
|
||
if(!BindAbilCooldown(OBJECT_SELF, GetSpellId(), VESTIGE_TENEBROUS)) return;
|
||
nTurnType = SPELL_TURN_UNDEAD;
|
||
}
|
||
|
||
if(nTurnType == SPELL_OPPORTUNISTIC_PIETY_TURN)
|
||
{
|
||
if (!ExpendInspiration(OBJECT_SELF, 1))
|
||
{
|
||
IncrementRemainingFeatUses(OBJECT_SELF, FEAT_OPPORTUNISTIC_PIETY_TURN);
|
||
return;
|
||
}
|
||
// We know we can cast it now
|
||
nTurnType = SPELL_TURN_UNDEAD;
|
||
DecrementRemainingFeatUses(OBJECT_SELF, FEAT_OPPORTUNISTIC_PIETY_HEAL);
|
||
}
|
||
|
||
// Because Turn Undead/Outsider isn't from a domain, skip this check
|
||
if(nTurnType != SPELL_TURN_UNDEAD && nTurnType != SPELL_TURN_OUTSIDER)
|
||
{
|
||
// Used by the uses per day check code for bonus domains
|
||
if(!DecrementDomainUses(GetTurningDomain(nTurnType), OBJECT_SELF))
|
||
return;
|
||
}
|
||
|
||
int bUndeadMastery = GetHasFeat(FEAT_UNDEAD_MASTERY);
|
||
|
||
//casters level for turning
|
||
int nLevel = GetTurningClassLevel(OBJECT_SELF, nTurnType);
|
||
int nCommandLevel = bUndeadMastery ? nLevel * 10 : nLevel;
|
||
|
||
//check alignment - we will need that later
|
||
int nAlign = GetAlignmentGoodEvil(OBJECT_SELF);
|
||
|
||
//casters charisma modifier
|
||
int nChaMod = GetTurningCharismaMod(nTurnType);
|
||
|
||
//key values for turning
|
||
int nTurningTotalHD = d6(2) + nLevel + nChaMod;
|
||
int nTurningCheck = d20() + nChaMod;
|
||
|
||
if(nTurnType == SPELL_TURN_UNDEAD) // Hallow spell, +4 for turning, -4 for commanding undead
|
||
{
|
||
if (nAlign == ALIGNMENT_EVIL && GetLocalInt(OBJECT_SELF, "HallowTurn")) nTurningCheck -= 4;
|
||
else if (GetLocalInt(OBJECT_SELF, "HallowTurn")) nTurningCheck += 4;
|
||
}
|
||
|
||
int nTurningMaxHD = GetTurningCheckResult(nLevel, nTurningCheck);
|
||
|
||
//these stack but dont multiply
|
||
//so use a bonus amount and then add that on later
|
||
|
||
//apply maximize turning
|
||
//+100% if good
|
||
if((GetHasFeat(FEAT_MAXIMIZE_TURNING) && nAlign == ALIGNMENT_GOOD)
|
||
|| GetLocalInt(OBJECT_SELF,"vMaximizeNextTurn"))
|
||
{
|
||
nTurningTotalHD += nTurningTotalHD;
|
||
DeleteLocalInt(OBJECT_SELF,"vMaximizeNextTurn");
|
||
DecrementRemainingFeatUses(OBJECT_SELF, FEAT_ML_MAXIMIZE_TURNING);
|
||
}
|
||
|
||
//apply empowered turning
|
||
//+50%
|
||
//only if maximize doesnt apply
|
||
else if(GetHasFeat(FEAT_EMPOWER_TURNING))
|
||
nTurningTotalHD += nTurningTotalHD/2;
|
||
|
||
// Evil clerics rebuke, not turn, and have a different VFX
|
||
effect eImpactVis = nAlign == ALIGNMENT_EVIL ? EffectVisualEffect(VFX_FNF_LOS_EVIL_30):
|
||
EffectVisualEffect(VFX_FNF_LOS_HOLY_30);
|
||
|
||
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, eImpactVis, GetLocation(OBJECT_SELF));
|
||
|
||
//zone of animation effect
|
||
//"You can use a rebuke or command undead attempt to animate
|
||
//corpses within range of your rebuke or command attempt.
|
||
//You animate a total number of HD of undead equal to the
|
||
//number of undead that would be commanded by your result
|
||
//(though you can<61>t animate more undead than there are available
|
||
//corpses within range). You can<61>t animate more undead with
|
||
//any single attempt than the maximum number you can command
|
||
//(including any undead already under your command). These
|
||
//undead are automatically under your command, though your
|
||
//normal limit of commanded undead still applies. If the
|
||
//corpses are relatively fresh, the animated undead are zombies.
|
||
//Otherwise, they are skeletons."
|
||
//currently implemented ignoring corpses & what the corpses are of.
|
||
if(GetLocalInt(OBJECT_SELF, "UsingZoneOfAnimation"))
|
||
{
|
||
//Undead Mastery multiplies total HD by 10
|
||
int bUndeadMastery = GetHasFeat(FEAT_UNDEAD_MASTERY);
|
||
if(bUndeadMastery)
|
||
nLevel *= 10;
|
||
//keep creating stuff
|
||
int nCommandedTotalHD = GetCommandedTotalHD(nTurnType, bUndeadMastery);
|
||
while(nCommandedTotalHD < nTurningTotalHD)
|
||
{
|
||
//skeletal blackguard
|
||
string sResRef = "x2_s_bguard_18";
|
||
object oCreated = CreateObject(OBJECT_TYPE_CREATURE, sResRef, GetLocation(OBJECT_SELF));
|
||
|
||
int nTargetHD = GetHitDiceForTurning(oCreated, nTurnType, RACIAL_TYPE_UNDEAD);
|
||
|
||
if(nCommandedTotalHD + nTargetHD <= nLevel)
|
||
{
|
||
ApplyEffectAtLocation(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_FNF_SUMMON_UNDEAD), GetLocation(oCreated));
|
||
DoCommand(oCreated);
|
||
CorpseCrafter(OBJECT_SELF, oCreated);
|
||
nCommandedTotalHD += nTargetHD;
|
||
}
|
||
//cant be commanded, clean it up
|
||
else
|
||
DestroyObject(oCreated);
|
||
}
|
||
//send feedback
|
||
FloatingTextStringOnCreature("Currently commanding "+IntToString(nCommandedTotalHD)+"HD out of "+IntToString(nLevel)+"HD.", OBJECT_SELF, FALSE);
|
||
return;
|
||
}
|
||
|
||
FloatingTextStringOnCreature("You are turning "+IntToString(nTurningTotalHD)+"HD of creatures whose HD is equal or less than "+IntToString(nTurningMaxHD), OBJECT_SELF, FALSE);
|
||
|
||
int bDisplayCommandMessage = -1;
|
||
int nCommandedTotalHD = GetCommandedTotalHD(nTurnType, bUndeadMastery);
|
||
int nHDCount, nTurnOrRebuke, nTargetHD, nTargetRace;
|
||
int i = 1;
|
||
|
||
object oTest = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, OBJECT_SELF, i);
|
||
if (GetEssentiaInvestedFeat(OBJECT_SELF, FEAT_AZURE_TURNING) && nTurnType == SPELL_TURN_UNDEAD)
|
||
{
|
||
while(GetIsObjectValid(oTest) && GetDistanceToObject(oTest) < 20.0)
|
||
{
|
||
nTargetRace = MyPRCGetRacialType(oTest);
|
||
if(nTargetRace == RACIAL_TYPE_UNDEAD && nTurningMaxHD >= GetHitDiceForTurning(oTest, nTurnType, nTargetRace))
|
||
{
|
||
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(d8(GetEssentiaInvestedFeat(OBJECT_SELF, FEAT_AZURE_TURNING)), DAMAGE_TYPE_DIVINE), oTest);
|
||
}
|
||
|
||
//move to next test
|
||
i++;
|
||
oTest = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, OBJECT_SELF, i);
|
||
}
|
||
}
|
||
|
||
i = 1;
|
||
oTest = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, OBJECT_SELF, i);
|
||
while(GetIsObjectValid(oTest) && nHDCount < nTurningTotalHD && GetDistanceToObject(oTest) < 20.0)//20 m = 60 ft
|
||
{
|
||
nTargetRace = MyPRCGetRacialType(oTest);
|
||
nTurnOrRebuke = GetIsTurnOrRebuke(oTest, nTurnType, nTargetRace);
|
||
if(nTurnOrRebuke)
|
||
{
|
||
int nTargetHD = GetHitDiceForTurning(oTest, nTurnType, nTargetRace);
|
||
if(nTargetHD <= nTurningMaxHD && nHDCount+nTargetHD <= nTurningTotalHD)
|
||
{
|
||
nHDCount += nTargetHD;
|
||
|
||
//signal the event
|
||
SignalEvent(oTest, EventSpellCastAt(OBJECT_SELF, nTurnType));
|
||
|
||
//sun domain
|
||
//destroys instead of turn/rebuke/command
|
||
//useable once per day only
|
||
if(GetLocalInt(OBJECT_SELF, "UsingSunDomain"))
|
||
{
|
||
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_SUNSTRIKE), oTest);
|
||
//Do not destroy until this script finishes, otherwise GetNearestCreature() will not work correctly
|
||
DelayCommand(0.0, DoDestroy(oTest));
|
||
}
|
||
else
|
||
{
|
||
if(nTurnOrRebuke == ACTION_TURN)
|
||
{
|
||
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectVisualEffect(VFX_IMP_SUNSTRIKE), oTest);
|
||
//if half of level, destroy
|
||
//otherwise turn
|
||
if(nTargetHD < nLevel/2)
|
||
DelayCommand(0.0, DoDestroy(oTest));
|
||
else
|
||
DoTurn(oTest);
|
||
}
|
||
else
|
||
{
|
||
bDisplayCommandMessage = TRUE;
|
||
//if half of level, command
|
||
//otherwise rebuke
|
||
if(nTargetHD < nLevel/2)
|
||
{
|
||
//undead mastery only applies to undead
|
||
//so non-undead have thier HD multiplied by 10
|
||
if(nTargetRace != RACIAL_TYPE_UNDEAD && bUndeadMastery)
|
||
nTargetHD *= 10;
|
||
|
||
if(nCommandedTotalHD + nTargetHD <= nCommandLevel)
|
||
{
|
||
nCommandedTotalHD += nTargetHD;
|
||
DoCommand(oTest);
|
||
}
|
||
//not enough commanding power left
|
||
//rebuke instead
|
||
else
|
||
DoRebuke(oTest);
|
||
}
|
||
else
|
||
DoRebuke(oTest);
|
||
}
|
||
}
|
||
|
||
// Check for Exalted Turning
|
||
// take 3d6 damage if they do
|
||
// Only works on undead
|
||
if(nAlign == ALIGNMENT_GOOD
|
||
&& nTargetRace == RACIAL_TYPE_UNDEAD
|
||
&& GetHasFeat(FEAT_EXALTED_TURNING))
|
||
{
|
||
ApplyEffectToObject(DURATION_TYPE_INSTANT, EffectDamage(d6(3), DAMAGE_TYPE_DIVINE), oTest);
|
||
}
|
||
|
||
//Check for Holy Fire
|
||
if(GetHasSpellEffect(SPELL_HOLY_FIRE, oTest))
|
||
{
|
||
int nFire = nTurningMaxHD / 2;
|
||
int nHoly = nTurningMaxHD - nFire;
|
||
effect eDam = EffectLinkEffects(EffectDamage(DAMAGE_TYPE_DIVINE, nHoly), EffectDamage(DAMAGE_TYPE_FIRE, nFire));
|
||
SPApplyEffectToObject(DURATION_TYPE_INSTANT, eDam, oTest);
|
||
}
|
||
}
|
||
}
|
||
|
||
//move to next test
|
||
i++;
|
||
oTest = GetNearestCreature(CREATURE_TYPE_IS_ALIVE, TRUE, OBJECT_SELF, i);
|
||
}
|
||
|
||
if(bDisplayCommandMessage)
|
||
FloatingTextStringOnCreature("Currently commanding "+IntToString(nCommandedTotalHD)+"HD out of "+IntToString(nCommandLevel)+"HD.", OBJECT_SELF, FALSE);
|
||
} |