Level One rework

Revamped Level One: North & Level One: Central to be as close to PnP as possible. Added Level One: Latrene 3 area. Added efreeti appearance from CEP3. Revamped efreeti bottle to be like PnP (no wishes, yet)
2023-09-23 22:02:32 -04:00
parent 7832a55868
commit 2e30722043
106 changed files with 40744 additions and 9332 deletions
--- a/_module/nss/ra_lvl01a_onhb.nss
+++ b/_module/nss/ra_lvl01a_onhb.nss
@@ -0,0 +1,107 @@
+//::////////////////////////////////////////////////////////////////////////////
+/*//
+
+    Level 1a: Latrene 3
+        onHeartbeat script
+            ra_lvl01a_onhb.nss
+
+    Wandering Monsters: None
+
+    Detections: Faint evil from the whole place; slightly more to the south east.
+
+    Continuous Effects: The stench of this level requires all characters to make
+    a Fortitude save (DC 26) upon entering the level and every 2 minutes
+    thereafter become Nauseated due to the overpowering smell.
+
+*///
+//::////////////////////////////////////////////////////////////////////////////
+
+#include "prc_inc_spells"
+
+//:: Function to process the stench penalty
+void ApplySick(object oPC)
+{
+    int RA_DEBUG = 0;
+
+    //:: Check for exising variable on player
+    int oldTime = GetLocalInt(oPC, "StenchFortSaveTime");
+
+    // Get the current system time in seconds
+    int newTime = (GetTimeHour()*60*60)+(GetTimeMinute()*60)+GetTimeSecond();
+
+    // Calculate the time difference in seconds
+    int timeDifference = newTime - oldTime;
+
+    if (RA_DEBUG)
+    {
+        SendMessageToPC(oPC, "oldTime = " + IntToString(oldTime));
+        SendMessageToPC(oPC, "newTime = " + IntToString(newTime));
+        SendMessageToPC(oPC, "timeDifference = " + IntToString(timeDifference));
+    }
+
+    //:: Check if the character hasn't made a Fortitude save in the last 3 minutes
+    if (oldTime == 0 || timeDifference >= 15)
+    {
+        //:: Check if the character failed the save
+        if (!FortitudeSave(oPC, 26))
+        {
+            //:: Apply Nausea
+            effect eNauseated   = EffectNausea(oPC, 12.0f);
+            effect eVFX			= EffectVisualEffect(VFX_DUR_CESSATE_NEGATIVE);
+            effect eLink		= EffectLinkEffects(eNauseated, eVFX);
+
+            eLink	= SupernaturalEffect(eLink);
+            eLink	= TagEffect(eLink, "LatreneStench");
+
+            ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eLink, oPC, 12.0f); // 12 seconds = 2 in-game minutes.
+
+            //:: Store the current time on player
+            SetLocalInt(oPC, "LatreneFortSaveTime", newTime);
+
+            if (RA_DEBUG)
+            {
+                SendMessageToPC(oPC, "Failed LatreneFortSave");
+                SendMessageToPC(oPC, "Setting LatreneFortSaveTime as " + IntToString(newTime));
+            }
+
+            // Send a message to the player
+            SendMessageToPC(oPC, "The overpowering stench is nauseating you.");
+        }
+
+    //:: Store the current time on player
+        SetLocalInt(oPC, "LatreneFortSaveTime", newTime);
+
+        if (RA_DEBUG)
+        {
+            SendMessageToPC(oPC, "Passed LatreneFortSave");
+            SendMessageToPC(oPC, "Setting LatreneFortSaveTime as " + IntToString(newTime));
+        }
+    }
+}
+
+void main()
+{
+    int RA_DEBUG = 0;
+
+    //:: Declare major variables
+    object oArea = OBJECT_SELF;
+    object oPC = GetFirstObjectInArea(oArea, OBJECT_TYPE_CREATURE);
+
+    while (GetIsObjectValid(oPC))
+    {
+        if (GetIsPC(oPC) || (GetMaster(oPC) != OBJECT_INVALID && GetIsPC(GetMaster(oPC))))
+        {
+            if (RA_DEBUG)
+            {
+                SendMessageToPC(oPC, "Running Level 1a Area HB");
+            }
+
+            //:: Apply the stench
+            ApplySick(oPC);
+        }
+
+        // Get the next object in the area
+        oPC = GetNextObjectInArea(oArea);
+    }
+}
+