113 lines
4.2 KiB
Plaintext
113 lines
4.2 KiB
Plaintext
//://///////////////////////////////////////////////////////////////////////////
|
|
/*
|
|
swm_bloodfly_hb.nss [Jaysyn / 20221230]
|
|
|
|
Bloodflies bite and seek to draw blood from their
|
|
targets. A bloodfly swarm deals 1d6 damage to any
|
|
creature whose space it occupies at the end of its move.
|
|
|
|
Blood Drain (Ex): Each creature that begins its turn
|
|
with a mini-kank swarm in its space suffers 1 points of
|
|
Constitution damage from blood loss as the mini-kanks
|
|
feed (Reflex DC 17 half). The save DC is Dexterity-based
|
|
and includes a +2 racial bonus.
|
|
|
|
Distraction (Ex): Any living creature that begins its
|
|
turns with a mini-kank swarm in its space must succeed
|
|
on a DC 12 Fortitude save or be nauseated for 1 round.
|
|
The save DC is Constitution-based.
|
|
|
|
*/
|
|
//://///////////////////////////////////////////////////////////////////////////
|
|
|
|
#include "prc_inc_spells"
|
|
|
|
void main()
|
|
{
|
|
//:: Declare major variables
|
|
object oCaster = GetAreaOfEffectCreator();
|
|
object oTarget = GetFirstInPersistentObject(OBJECT_SELF, OBJECT_TYPE_CREATURE);
|
|
|
|
int iDexMod = GetAbilityModifier(ABILITY_DEXTERITY, oCaster);
|
|
int iConMod = GetAbilityModifier(ABILITY_CONSTITUTION, oCaster);
|
|
int nCon;
|
|
int iHD = GetHitDice(oCaster);
|
|
int iDexDC = 12 + (iHD/2) + iDexMod; //:: Bloodflies have a +2 racial bonus on this DC
|
|
int iConDC = 10 + (iHD/2) + iConMod;
|
|
int nDrain = 1;
|
|
|
|
effect eImp = EffectVisualEffect(VFX_IMP_POISON_S);
|
|
effect eVis = EffectVisualEffect(VFX_DUR_AURA_PULSE_RED_BLACK);
|
|
effect eVis2 = EffectVisualEffect(VFX_DUR_FLIES);
|
|
effect eNausea = EffectNausea(oTarget, 0.0f);
|
|
effect eDur = EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
|
|
effect eDistract = EffectLinkEffects(eNausea, eVis);
|
|
eDistract = EffectLinkEffects(eDistract, eVis2);
|
|
eDistract = EffectLinkEffects(eDistract, eDur);
|
|
eDistract = TagEffect(eDistract, "BloodflyDistraction");
|
|
|
|
effect eVis3 = EffectVisualEffect(VFX_IMP_REDUCE_ABILITY_SCORE);
|
|
|
|
effect eCon = EffectAbilityDecrease(ABILITY_CONSTITUTION, nDrain);
|
|
effect eDur2 = EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
|
|
effect eDrain = EffectLinkEffects(eCon, eDur);
|
|
eDrain = SupernaturalEffect(eDrain);
|
|
eDrain = TagEffect(eDrain, "BloodflyBloodDrain");
|
|
|
|
effect eSwarmDmg = EffectDamage(d6(1), DAMAGE_TYPE_SLASHING, DAMAGE_POWER_NORMAL);
|
|
effect eSwarmHit = EffectVisualEffect(VFX_IMP_DISEASE_S);
|
|
effect eBite = EffectLinkEffects(eSwarmDmg, eSwarmHit);
|
|
eBite = SupernaturalEffect(eBite);
|
|
eBite = TagEffect(eBite, "BloodflyBite");
|
|
|
|
//:: Determine if oTarget can die from ability loss
|
|
int bKillEm = FALSE;
|
|
if ( !GetIsPC(oTarget) || GetGameDifficulty() == GAME_DIFFICULTY_CORE_RULES
|
|
|| GetGameDifficulty() == GAME_DIFFICULTY_DIFFICULT )
|
|
bKillEm = TRUE;
|
|
|
|
//:: Run the swarm effect loop
|
|
while(GetIsObjectValid(oTarget))
|
|
{
|
|
if(GetIsEnemy(oTarget, oCaster))
|
|
{
|
|
//:: Apply physical swarm damage
|
|
ApplyEffectToObject(DURATION_TYPE_PERMANENT, eBite, oTarget);
|
|
|
|
//:: Distraction (Nausea) saving throw
|
|
if (!PRCMySavingThrow(SAVING_THROW_FORT, oTarget, iConDC, SAVING_THROW_TYPE_NONE, oCaster))
|
|
{
|
|
//:: Apply Nausea effect for 1 round
|
|
ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eDistract, oTarget, 5.75f);
|
|
}
|
|
|
|
//:: Blood Drain saving throw
|
|
if (!PRCMySavingThrow(SAVING_THROW_REFLEX, oTarget, iDexDC, SAVING_THROW_TYPE_NONE, oCaster))
|
|
{
|
|
//:: Check for immunity to ability decrease
|
|
if (!GetIsImmune(oTarget, IMMUNITY_TYPE_ABILITY_DECREASE))
|
|
{
|
|
//:: If they fail this save, aren't immune & have less than a 3 Constitution, kill them
|
|
int nCon = GetAbilityScore(oTarget, ABILITY_CONSTITUTION);
|
|
|
|
if ( ( nCon - nDrain ) < 3 && bKillEm )
|
|
{
|
|
effect eVis4 = EffectVisualEffect(VFX_IMP_DEATH);
|
|
effect eHP2 = EffectDamage( 9999, DAMAGE_TYPE_MAGICAL , DAMAGE_POWER_PLUS_TWENTY);
|
|
effect eDeath2 = EffectDeath();
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT,eVis4,oTarget);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT,eDeath2,oTarget);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT,eHP2,oTarget);
|
|
}
|
|
|
|
//:: Apply CON damage
|
|
ApplyEffectToObject(DURATION_TYPE_PERMANENT, eDrain, oTarget);
|
|
ApplyEffectToObject(DURATION_TYPE_INSTANT, eVis3, oTarget);
|
|
|
|
}
|
|
}
|
|
}
|
|
|
|
oTarget = GetNextInPersistentObject();
|
|
}
|
|
} |