246f8d56aa
Reverted to 4.56 to track down a bug that started in 4.57. Bugfixed back to 4.61. It's amazing the damage that one skipped case statement can do.
118 lines
3.6 KiB
Plaintext
118 lines
3.6 KiB
Plaintext
//:://////////////////////////////////////////////
|
|
//:: ;-. ,-. ,-. ,-.
|
|
//:: | ) | ) / ( )
|
|
//:: |-' |-< | ;-:
|
|
//:: | | \ \ ( )
|
|
//:: ' ' ' `-' `-'
|
|
//::///////////////////////////////////////////////
|
|
//::
|
|
/*
|
|
Adrenaline Surge
|
|
Transmutation
|
|
Level: Druid 2, Sor/Wiz 2
|
|
Components: V, S, DF
|
|
Casting Time: 1 action
|
|
Range: Close (25 ft. + 5 fr./2 levels)
|
|
Area: Your summoned creatures within a spherical
|
|
emanation with a radius equal to the range, centered on you
|
|
Duration: 1 round/level
|
|
Saving Throw: Will negates (harmless)
|
|
Spell Resistance: Yes (harmless)
|
|
|
|
Each of your summoned creatures within the area receives
|
|
a +4 enhancement bonus to Strength. This effect lasts until
|
|
the spell ends or the creature leaves the area.
|
|
|
|
*/
|
|
//::
|
|
//:://////////////////////////////////////////////
|
|
//:: Script: sp_adrenaline
|
|
//:: Author: Jaysyn
|
|
//:: Created: 2025-08-11 22:28:40
|
|
//:://////////////////////////////////////////////
|
|
#include "x2_inc_spellhook"
|
|
#include "prc_inc_spells"
|
|
|
|
|
|
// Helper function to remove the adrenaline surge effect from the target
|
|
void RemoveAdrenalineEffect(object oTarget)
|
|
{
|
|
if (!GetIsObjectValid(oTarget)) return;
|
|
|
|
effect e = GetFirstEffect(oTarget);
|
|
while (GetIsEffectValid(e))
|
|
{
|
|
effect eNext = GetNextEffect(oTarget);
|
|
if (GetEffectTag(e) == "ADRENALINE_SURGE")
|
|
RemoveEffect(oTarget, e);
|
|
e = eNext;
|
|
}
|
|
}
|
|
|
|
// Checks each second if the target has moved out of range
|
|
void CheckAdrenalineSurge(object oCaster, object oTarget, float fRange)
|
|
{
|
|
if (!GetIsObjectValid(oTarget) || !GetIsObjectValid(oCaster))
|
|
return;
|
|
|
|
// If out of range, remove the effect early
|
|
if (GetDistanceBetween(oTarget, oCaster) > fRange)
|
|
{
|
|
RemoveAdrenalineEffect(oTarget);
|
|
return;
|
|
}
|
|
|
|
// Still valid — check again in 1 second
|
|
DelayCommand(1.0, CheckAdrenalineSurge(oCaster, oTarget, fRange));
|
|
}
|
|
|
|
void main()
|
|
{
|
|
object oCaster = OBJECT_SELF;
|
|
int nCasterLevel = PRCGetCasterLevel(oCaster);
|
|
float fRange = 25.0 + (5.0 * IntToFloat(nCasterLevel / 2));
|
|
float fDuration = IntToFloat(nCasterLevel) * 6.0; // in seconds
|
|
location lCaster = GetLocation(oCaster);
|
|
|
|
object oTarget = MyFirstObjectInShape(SHAPE_SPHERE, fRange, lCaster, TRUE, OBJECT_TYPE_CREATURE);
|
|
|
|
while (GetIsObjectValid(oTarget))
|
|
{
|
|
// Only apply to summons of this caster
|
|
if (GetMaster(oTarget) == oCaster)
|
|
{
|
|
// Prevent stacking — skip if already has the effect
|
|
int bHas = FALSE;
|
|
effect eCheck = GetFirstEffect(oTarget);
|
|
while (GetIsEffectValid(eCheck))
|
|
{
|
|
if (GetEffectTag(eCheck) == "ADRENALINE_SURGE")
|
|
{
|
|
bHas = TRUE;
|
|
break;
|
|
}
|
|
eCheck = GetNextEffect(oTarget);
|
|
}
|
|
|
|
if (!bHas)
|
|
{
|
|
effect eStr = EffectAbilityIncrease(ABILITY_STRENGTH, 4);
|
|
eStr = TagEffect(eStr, "ADRENALINE_SURGE");
|
|
|
|
effect eVis = EffectVisualEffect(VFX_IMP_HASTE);
|
|
|
|
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eVis, oTarget, 3.0);
|
|
ApplyEffectToObject(DURATION_TYPE_PERMANENT, eStr, oTarget);
|
|
|
|
// Schedule effect removal after the full duration
|
|
DelayCommand(fDuration, RemoveAdrenalineEffect(oTarget));
|
|
|
|
// Start periodic range check
|
|
DelayCommand(1.0, CheckAdrenalineSurge(oCaster, oTarget, fRange));
|
|
}
|
|
}
|
|
|
|
oTarget = MyNextObjectInShape(SHAPE_SPHERE, fRange, lCaster, TRUE, OBJECT_TYPE_CREATURE);
|
|
}
|
|
}
|