Initial Commit

2023-09-21 19:51:32 -04:00
parent 65b5bd7fd3
commit 102ba7dab6
6400 changed files with 5741850 additions and 0 deletions
--- a/_module/nss/client_walkaway.nss
+++ b/_module/nss/client_walkaway.nss
@@ -0,0 +1,129 @@
+#include "quest_inc"
+#include "nw_i0_plot"
+void RemoveAllItems(object oCreature, string sTag="")
+{
+    object oItem = GetFirstItemInInventory(oCreature);
+    while ( oItem != OBJECT_INVALID )
+    {
+        if ( "" == sTag  ||  GetTag(oItem) == sTag )
+            DestroyObject(oItem);
+        oItem = GetNextItemInInventory(oCreature);
+    }
+}
+
+void BanditAttack(object oBandit)
+{
+    AssignCommand(oBandit, ClearAllActions());
+    AssignCommand(oBandit, ActionAttack(GetPCSpeaker()));
+}
+
+void main()
+{
+    if (GetLocalInt(OBJECT_SELF, "RansomQuest") == TRUE)
+        {
+            if (GetLocalInt(OBJECT_SELF, "Quest_Halt") == TRUE)
+            {
+                DeleteLocalObject(OBJECT_SELF, "oPC");
+                SetPlotFlag(OBJECT_SELF, TRUE);
+                ClearAllActions();
+                ActionMoveAwayFromObject(GetPCSpeaker(), FALSE);
+                ActionDoCommand(DestroyObject(OBJECT_SELF));
+            }
+        }
+
+    if (GetLocalInt(OBJECT_SELF, "EscortSuccessful") == TRUE && GetMaster(OBJECT_SELF) == GetPCSpeaker()) RemoveHenchman(GetPCSpeaker(), OBJECT_SELF);
+
+    if (GetLocalInt(OBJECT_SELF, "EscortBandits") >= 1 && GetLocalInt(OBJECT_SELF, "NoMoreBandits") == FALSE)
+    {
+        string sResRef;
+        string sAreaString = GetLocalString(GetArea(OBJECT_SELF), "AreaString");
+        string sRegionString = GetStringLeft(sAreaString, 1);
+        //Race should depend on the region
+        sResRef = "anc_roadbandit_h";
+
+        if (GetLocalInt(OBJECT_SELF, "EscortBandits") == 3)
+        {
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HUMAN) sResRef = "anc_roadbandit_h";
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_ELF) sResRef = "anc_roadbandit_e";
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_DWARF) sResRef = "anc_roadbandit_d";
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_GNOME) sResRef = "anc_roadbandit_g";
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HALFLING) sResRef = "anc_roadbandi_ha";
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HALFELF) sResRef = "anc_roadbandi_he";
+            if (GetRacialType(OBJECT_SELF) == RACIAL_TYPE_HALFORC) sResRef = "anc_roadbandit_ho";
+        }
+        int nNumber;
+        int i;
+        object oBandit;
+
+        int nLevel = GetHitDice(GetPCSpeaker());
+        if (nLevel < 5) nNumber = 1;
+        if (nLevel >= 5 && nLevel <= 25) nNumber = 2;
+        if (nLevel >= 26 && nLevel <= 33) nNumber = 3;
+        if (nLevel == 34 || nLevel == 35) nNumber = 4;
+        if (nLevel == 36 || nLevel == 37) nNumber = 5;
+        if (nLevel > 37) nNumber = 6;
+
+        for (i = 1; i <= nNumber; i++)
+        {
+            oBandit = CreateObject(OBJECT_TYPE_CREATURE, sResRef, GetLocation(GetPCSpeaker()), TRUE);
+            SetLocalInt(oBandit, "EscortBandit", TRUE);
+            SetLocalObject(oBandit, "oPC", GetPCSpeaker());
+            LevelHenchmanUpTo(oBandit, nLevel, CLASS_TYPE_INVALID, 0, GetCreatureStartingPackage(oBandit), PACKAGE_INVALID);
+            if (GetLocalInt(OBJECT_SELF, "EscortBandits") >= 2)
+            {
+                SetIsTemporaryEnemy(GetPCSpeaker(), oBandit);
+                DelayCommand(0.5, BanditAttack(oBandit));
+            }
+            if (GetLocalInt(OBJECT_SELF, "EscortBandits") == 3)
+            {
+                SetIsTemporaryEnemy(GetPCSpeaker(), OBJECT_SELF);
+                ClearAllActions();
+                ActionMoveAwayFromObject(GetPCSpeaker(), TRUE);
+            }
+        }
+        SetLocalInt(OBJECT_SELF, "NoMoreBandits", TRUE);
+    }
+
+    if (GetLocalInt(OBJECT_SELF, "EscortQuest") == TRUE)
+        {
+            if (GetLocalInt(OBJECT_SELF, "Quest_Halt") == TRUE)
+            {
+                RemoveHenchman(GetPCSpeaker());
+                DeleteLocalObject(OBJECT_SELF, "oPC");
+                SetPlotFlag(OBJECT_SELF, TRUE);
+                ClearAllActions();
+                ActionMoveAwayFromObject(GetPCSpeaker(), FALSE);
+                ActionDoCommand(DestroyObject(OBJECT_SELF));
+            }
+        }
+
+    if (GetLocalInt(OBJECT_SELF, "Client") == TRUE && GetLocalInt(OBJECT_SELF, "EscortQuest") == FALSE)
+        {
+            SetLocalInt(OBJECT_SELF, "ClientSpawned", FALSE);
+            SetLocalInt(GetPCSpeaker(), "ClientSpawned", FALSE);
+            int nTavern = GetLocalInt(GetArea(OBJECT_SELF), "TavernNumber");
+            string sTag;
+            object oNPC = OBJECT_SELF;
+
+            //Get the area's exit waypoint's tag
+            if (nTavern == 1) sTag = "alverton_tav_exit";
+
+            //Make the client NPC walk away (out of the tavern)
+            EscapeArea(FALSE, sTag);
+
+            //Delete all quest data of the PC, but only if the PC does not have a quest journal entry
+            if (GetCampaignInt(CharacterDB(GetPCSpeaker()), "QUEST_JOURNAL") == 0)
+            {
+                DeleteQuest(GetPCSpeaker());
+                RemoveAllItems(GetPCSpeaker(), "quest_proof");
+            }
+
+            //Remove all effects on the NPC (to make quest exclamation and question marks disappear)
+            effect eEffect = GetFirstEffect(oNPC);
+            while (GetIsEffectValid(eEffect))
+                {
+                    RemoveEffect(oNPC, eEffect);
+                    eEffect = GetNextEffect(oNPC);
+                }
+        }
+}