Horsefly Swamp update

Creatures & encounter tables to support Horsefly swamp expansion.
2023-08-13 17:21:44 -04:00
parent e4a37cd868
commit df709d33fc
485 changed files with 257810 additions and 10741 deletions
--- a/_module/nss/plague_blight.nss
+++ b/_module/nss/plague_blight.nss
@@ -0,0 +1,94 @@
+#include "NW_I0_SPELLS"
+#include "prc_inc_spells"
+
+void DoConDamage(object oTarget)
+{
+    int nDam = d4();
+    int nKillEm = FALSE;
+    if ( (!GetIsPC( oTarget ) ) || ( GetGameDifficulty() >= GAME_DIFFICULTY_CORE_RULES ) )
+    {
+        nKillEm = 1;
+    }
+
+    int nTargetAbility = GetAbilityScore(oTarget, ABILITY_CONSTITUTION);
+    if ( ( (nTargetAbility - nDam) < 3) && nKillEm )
+    {
+         int nHitPoints = GetCurrentHitPoints(oTarget);
+         effect eVis = EffectVisualEffect(VFX_IMP_DEATH);
+         effect eHitDamage = EffectDamage(nHitPoints, DAMAGE_TYPE_MAGICAL, DAMAGE_POWER_PLUS_TWENTY);
+         ApplyEffectToObject(DURATION_TYPE_INSTANT,eVis,oTarget);
+         ApplyEffectToObject(DURATION_TYPE_PERMANENT, eHitDamage, oTarget);
+    }
+
+    effect eCon = EffectAbilityDecrease(ABILITY_CONSTITUTION,nDam);
+    effect eVis = EffectVisualEffect(VFX_IMP_DISEASE_S);
+    ApplyEffectToObject(DURATION_TYPE_PERMANENT,eCon,oTarget);
+    ApplyEffectToObject(DURATION_TYPE_INSTANT,eVis,oTarget);
+
+
+
+}
+int DoPlague(object oTarget, float fDelay)
+{
+
+    int nRoll = PRCMySavingThrow(SAVING_THROW_FORT,oTarget,15,SAVING_THROW_TYPE_DISEASE);
+
+    if ( nRoll == 0 )
+    {
+        SetLocalInt(oTarget,"LastRoundSuccess",0);
+        DelayCommand(fDelay,DoConDamage(oTarget));
+        return TRUE;
+    }
+    if ( nRoll == 1 )
+    {
+        if ( GetLocalInt(oTarget,"LastRoundSuccess") )
+        {
+            DelayCommand(fDelay,SendMessageToPC(oTarget,"Recovered from Gangrenous Touch"));
+            DelayCommand(fDelay,SetLocalInt(oTarget,"PB_Plague",0));
+            return FALSE;
+        }
+        SetLocalInt(oTarget,"LastRoundSuccess",1);
+        return TRUE;
+    }
+    DelayCommand(fDelay,SetLocalInt(oTarget,"PB_Plague",0));
+    return FALSE;
+}
+
+
+void main()
+{
+    object oOrigin = OBJECT_SELF ;               // Where the spell came from
+    object oTarget = PRCGetSpellTargetObject();  // What the spell is aimed at
+
+
+    if ( GetLocalInt(oTarget,"PB_Plague") )
+    {
+        SendMessageToPC(oOrigin,"Creature already has this effect.");
+        return;
+    }
+    int nDelay = 0;
+
+    if ( PRCMySavingThrow(SAVING_THROW_FORT,oTarget,15,SAVING_THROW_TYPE_DISEASE) )
+        return;
+
+    SetLocalInt(oTarget,"PB_Plague",1);
+//    effect eVis = EffectVisualEffect(VFX_IMP_NEGATIVE_ENERGY);
+//    ApplyEffectToObject(DURATION_TYPE_INSTANT,eVis,oTarget);
+
+    if ( GetIsImmune(oTarget,IMMUNITY_TYPE_DISEASE) )
+    {
+        SendMessageToPC(oOrigin,"Target is immune to disease");
+        SendMessageToPC(oTarget,"Immune to disease");
+        return;
+    }
+
+    SetLocalInt(oTarget,"LastRoundSuccess",0);
+    SendMessageToPC(oTarget,"You've contracted Gangrenous Touch.");
+    while ( DoPlague(oTarget,RoundsToSeconds(nDelay)) && nDelay < 10 )
+    {
+        nDelay++;
+    }
+}
+
+
+