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/henchmanmng_arm.nss
+++ b/_module/nss/henchmanmng_arm.nss
@@ -0,0 +1,99 @@
+//::///////////////////////////////////////////////
+//:: FileName henchmanmng_arm
+//:://////////////////////////////////////////////
+//:: This script will cause the henchman to give the PC all their
+//:: armor within a bag of holding. The PC will arrange the
+//:: possessions, and then use dialog to give the bag back to the
+//:: henchman.
+//:://////////////////////////////////////////////
+//:: Created By: Pausanias
+//:://////////////////////////////////////////////
+
+#include "hench_i0_ident"
+#include "hench_i0_generic"
+
+void main()
+{       
+    object oItem, oBag;
+    int    i;
+
+    // Set the variables
+    // This variable is checked for in dialogue. HenchmanInv = 1
+    // means that the PC has the Henchman's inventory.
+    SetLocalInt(OBJECT_SELF, "HenchmanInv", 1);
+
+    // Give the PC a bag of holding or other container.
+    ExecuteScript("henchbagtype",OBJECT_SELF);
+    string sBagTag = GetLocalString(OBJECT_SELF,"ContainerType");
+    if (GetStringLength(sBagTag) < 2) sBagTag = "NW_IT_CONTAIN006";
+
+    oBag = CreateItemOnObject(sBagTag, GetPCSpeaker(), 1);
+
+    // If PC is low-level, the bag sometimes wont' identify for some reason.
+    SetIdentified(oBag, TRUE);
+
+    // The script henchmanequip will have to refer to this bag, so create
+    // a pointer to it.
+    SetLocalObject(OBJECT_SELF, "HenchBag", oBag);
+
+    ClearAllActions();
+
+    // First go through the backpack.
+
+    // Now for some decency: we don't want the henchman to stand there
+    // all naked (do we????), so we create a nice monk's outfit.
+    object oDecency = GetLocalObject(OBJECT_SELF,"Decency");
+    if (!GetIsObjectValid(oDecency) && GetIsHumanoid(GetRacialType(OBJECT_SELF)))
+    {
+        oDecency = CreateItemOnObject("NW_CLOTH016",OBJECT_SELF,1);
+        DelayCommand(0.1,ActionEquipItem(oDecency,INVENTORY_SLOT_CHEST));
+        SetLocalObject(OBJECT_SELF,"Decency",oDecency);
+    }
+
+    int iMaxGPIdentify = HenchGetMaxGPToIdentify();
+    oItem = GetFirstItemInInventory(OBJECT_SELF);
+
+    while (oItem != OBJECT_INVALID)
+    {
+        if (oItem != oDecency)
+        {
+            switch (GetBaseItemType(oItem))
+            {
+            case BASE_ITEM_ARMOR:
+            case BASE_ITEM_CLOAK:
+            case BASE_ITEM_BOOTS:
+            case BASE_ITEM_HELMET:
+            case BASE_ITEM_SMALLSHIELD:
+            case BASE_ITEM_LARGESHIELD:
+            case BASE_ITEM_TOWERSHIELD:
+                HenchIdentifyItem(oItem, iMaxGPIdentify);
+                DelayCommand(0.2, ActionGiveItem(oItem, oBag));
+                break;
+            }
+        }
+        oItem = GetNextItemInInventory(OBJECT_SELF);
+   }
+
+    // Next go through all the equipped items. DO NOT transfer creature
+    // items to the PC!
+    for(i = 0; i < NUM_INVENTORY_SLOTS; ++i)
+    {
+        oItem = GetItemInSlot(i,OBJECT_SELF);
+        if (oItem != OBJECT_INVALID && oItem != oDecency)
+        {
+            switch (GetBaseItemType(oItem))
+            {
+            case BASE_ITEM_ARMOR:
+            case BASE_ITEM_CLOAK:
+            case BASE_ITEM_BOOTS:
+            case BASE_ITEM_HELMET:
+            case BASE_ITEM_SMALLSHIELD:
+            case BASE_ITEM_LARGESHIELD:
+            case BASE_ITEM_TOWERSHIELD:
+                SetIdentified(oItem, TRUE);                
+                DelayCommand(0.2, ActionGiveItem(oItem, oBag));
+                break;
+            }
+        }
+    }
+}