Re-uploaded instead of migrated

Re-uploaded instead of migrated.
2024-08-03 15:05:13 -04:00
parent 53776f5b96
commit defc8f9f6d
934 changed files with 643472 additions and 0 deletions
--- a/_module/nss/trashcan.nss
+++ b/_module/nss/trashcan.nss
@@ -0,0 +1,147 @@
+// Copyright (C) 2002, Leo Lipelis
+// need to declare this function ahead of its use
+// to avoid compilation error;
+// this function will destroy an object and everything
+// inside of it recursively
+void TrashObject(object obj)
+{
+    // if this is not a container, just destroy it and we're done
+    if (GetHasInventory(obj) == FALSE) {
+        DestroyObject(obj);
+    } else {
+        object oItem = GetFirstItemInInventory(obj);
+        // destroy everything in the inventory first
+        while (oItem != OBJECT_INVALID)
+        {
+            TrashObject(oItem);
+            oItem = GetNextItemInInventory(obj);
+        }
+        // destroy the container itself
+        DestroyObject(obj);
+    }
+}
+void main()
+{
+    int iItemDropLifeSpan = 20;
+    // iCounterMax must always be greater than iItemDropLifeSpan
+    int iCounterMax = 1000;
+    string sTrashMark = "iTrashMark";
+    int iCounter = GetLocalInt(OBJECT_SELF, "iCounter");
+    iCounter++;
+    iCounter = iCounter % iCounterMax;
+    if (iCounter == 0) { iCounter++; } // 0 is reserved
+    SetLocalInt(OBJECT_SELF, "iCounter", iCounter);
+    object obj = GetFirstObjectInArea();
+    while (obj != OBJECT_INVALID)
+    {
+        int iObjType = GetObjectType(obj);
+        // match based on type first, because comparing int
+        // is faster than string; wrong types don't reach
+        // string comparison
+        if (iObjType == OBJECT_TYPE_PLACEABLE)
+        {
+            string sTag = GetTag(obj);
+            // this assumes that every item drop from a monster
+            // comes in a placeable container with a tag name
+            // of "Body Bag"; it seems to be true, but if this
+            // assumption is false, this code needs to be fixed
+            if (sTag == "Body Bag")
+            {
+                int iTrashMark = GetLocalInt(obj, sTrashMark);
+                if (iTrashMark == 0) {
+                    SetLocalInt(obj, sTrashMark, iCounter);
+                } else {
+                    int iTimeAlive = 0;
+                    if (iCounter >= iTrashMark) {
+                        iTimeAlive = iCounter - iTrashMark;
+                    } else {
+                        iTimeAlive = iCounterMax - iTrashMark + iCounter - 1;
+                    }
+                    if (iTimeAlive > iItemDropLifeSpan) {
+                        TrashObject(obj);
+                    }
+                }
+            }
+        }
+        obj = GetNextObjectInArea();
+    }
+
+// Modification by Dalantriel
+// Caltulate average PC level to scale difficulty
+
+// Calculate number of PCs on the level
+    int nNumberOfPCs = 0;
+    int nPlayerFactor = 0;
+    int nChallenge = 0;
+    int nRandom;
+    object oPC = GetFirstPC();
+    while (GetIsObjectValid(oPC))
+    {
+        if (GetIsPC(oPC))
+        {
+            nNumberOfPCs++;
+        }
+        oPC = GetNextPC();
+    }
+
+    if (nNumberOfPCs == 1)
+    {
+    nChallenge = (GetFactionAverageLevel(GetFirstPC())) - 3;
+    }
+    else if (nNumberOfPCs == 2)
+    {
+    nChallenge = (GetFactionAverageLevel(GetFirstPC())) - 1;
+    }
+    else if (nNumberOfPCs > 5)
+    {
+    nChallenge = (GetFactionAverageLevel(GetFirstPC())) + 1;
+    }
+    else
+    {
+    nChallenge = GetFactionAverageLevel(GetFirstPC());
+    }
+
+    SetLocalInt(OBJECT_SELF, "nChallengelevel", nChallenge);
+
+    if (nChallenge > 11)
+    {
+    SetLocalInt(OBJECT_SELF, "nDifficultylevel", 4);
+    }
+    else if (nChallenge > 9)
+    {
+    SetLocalInt(OBJECT_SELF, "nDifficultylevel", 3);
+    }
+    else if (nChallenge > 7)
+    {
+    SetLocalInt(OBJECT_SELF, "nDifficultylevel", 2);
+    }
+    else if (nChallenge > 4)
+    {
+    SetLocalInt(OBJECT_SELF, "nDifficultylevel", 1);
+    }
+    else
+    {
+    SetLocalInt(OBJECT_SELF, "nDifficultylevel", 0);
+    }
+
+/*
+// Announce End of scenario to players and restart Module
+
+    if(GetLocalInt(OBJECT_SELF, "nGoodNPCDead") > 0)
+    {
+        ActionSpeakString("*** Scenario has been Lost. Log out and Restart ***", TALKVOLUME_SHOUT);
+        int nDeadtime = 0;
+        if ((nDeadtime = GetLocalInt(OBJECT_SELF, "DeadTime")) < 20)
+        {
+            // SetLocalInt(OBJECT_SELF, "DeadTime", nDeadtime + 1);
+            ActionSpeakString("*** Scenario has been Lost. Log out and Restart ***", TALKVOLUME_SHOUT);
+        }
+        else
+        {
+            // StartNewModule(GetModuleName());
+            ActionSpeakString("*** Scenario has been Lost. Log out and Restart ***", TALKVOLUME_SHOUT);
+        }
+    }
+*/
+}
+