Initial Commit

Initial Commit [v1.32PRC8]

_module/nss/a_death_purge.nss

@@ -0,0 +1,10 @@
+void main()
+{
+location lLoc;
+
+lLoc=GetLocation(GetObjectByTag("spawn_purgatory"));
+AssignCommand(GetPCSpeaker(),JumpToLocation(lLoc));
+SendMessageToPC(GetPCSpeaker(),"You are transported to purgatory...");
+
+
+}

_module/nss/a_death_purge_c.nss

@@ -0,0 +1,9 @@
+#include "utl_i_sqluuid"
+
+int StartingConditional()
+{
+if (SQLocalsUUID_GetInt(GetPCSpeaker(),"ModRank") == 1)
+    return TRUE;
+
+return FALSE;
+}

_module/nss/a_wisp_purge.nss

@@ -0,0 +1,11 @@
+void main()
+{
+location lLoc;
+
+SetLocalString(GetPCSpeaker(),"Killer","Nothing");
+lLoc=GetLocation(GetObjectByTag("spawn_purgatory"));
+AssignCommand(GetPCSpeaker(),JumpToLocation(lLoc));
+SendMessageToPC(GetPCSpeaker(),"You are transported to purgatory...");
+
+
+}

_module/nss/ag_mer1.nss

@@ -0,0 +1,19 @@
+//::///////////////////////////////////////////////
+//:: FileName tg_mer1
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 3/13/2005 1:32:36 PM
+//:://////////////////////////////////////////////
+#include "nw_i0_plot"
+
+void main()
+{
+
+    // Either open the store with that tag or let the user know that no store exists.
+    object oStore = GetNearestObjectByTag("en4_ag1");
+    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
+        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
+    else
+        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
+}

_module/nss/ag_mer2.nss

@@ -0,0 +1,19 @@
+//::///////////////////////////////////////////////
+//:: FileName tg_mer1
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 3/13/2005 1:32:36 PM
+//:://////////////////////////////////////////////
+#include "nw_i0_plot"
+
+void main()
+{
+
+    // Either open the store with that tag or let the user know that no store exists.
+    object oStore = GetNearestObjectByTag("en4_ag2");
+    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
+        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
+    else
+        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
+}

_module/nss/ag_mer3.nss

@@ -0,0 +1,19 @@
+//::///////////////////////////////////////////////
+//:: FileName tg_mer1
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 3/13/2005 1:32:36 PM
+//:://////////////////////////////////////////////
+#include "nw_i0_plot"
+
+void main()
+{
+
+    // Either open the store with that tag or let the user know that no store exists.
+    object oStore = GetNearestObjectByTag("en4_ag3");
+    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
+        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
+    else
+        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
+}

_module/nss/al1_portals.nss

@@ -0,0 +1,61 @@
+void main()
+{
+int iRandom;
+string sPortal1;
+string sPortal2;
+string sPortal3;
+string sPortal4;
+string sTag;
+object oBoss;
+location lLoc;
+
+if (GetLocalInt(GetModule(),"ALPortals") == 0)
+    {
+    iRandom = Random(2) + 1;
+    if (iRandom == 1)
+        {
+        sPortal1 = "AL1_Teleport1";
+        SetLocalString(GetModule(),"ALPortal1",sPortal1);
+        sPortal2 = "AL1_Teleport2";
+        SetLocalString(GetModule(),"ALPortal2",sPortal2);
+        } else {
+        sPortal1 = "AL1_Teleport2";
+        SetLocalString(GetModule(),"ALPortal1",sPortal1);
+        sPortal2 = "AL1_Teleport1";
+        SetLocalString(GetModule(),"ALPortal2",sPortal2);
+        }
+
+    iRandom = Random(2) + 1;
+    if (iRandom == 1)
+        {
+        sPortal3 = "AL1_Teleport3";
+        SetLocalString(GetModule(),"ALPortal3",sPortal3);
+        sPortal4 = "AL1_Entrance";
+        SetLocalString(GetModule(),"ALPortal4",sPortal4);
+        } else {
+        sPortal3 = "AL1_Entrance";
+        SetLocalString(GetModule(),"ALPortal3",sPortal3);
+        sPortal4 = "AL1_Teleport3";
+        SetLocalString(GetModule(),"ALPortal4",sPortal4);
+        }
+
+    SetLocalInt(GetModule(),"ALPortals",1);
+    } else {
+    sPortal1 = GetLocalString(GetModule(),"ALPortal1");
+    sPortal2 = GetLocalString(GetModule(),"ALPortal2");
+    sPortal3 = GetLocalString(GetModule(),"ALPortal3");
+    sPortal4 = GetLocalString(GetModule(),"ALPortal4");
+    }
+
+sTag = "AL1_C" + GetTag(OBJECT_SELF) + "_Boss_S";
+//SendMessageToPC(GetEnteringObject(),"Boss Check: " + sTag);
+oBoss = GetObjectByTag(sTag);
+
+if (!GetIsObjectValid(oBoss))
+    {
+    sTag = GetLocalString(GetModule(),"ALPortal" + GetTag(OBJECT_SELF));
+    lLoc = GetLocation(GetObjectByTag(sTag));
+    //SendMessageToPC(GetEnteringObject(),"Jump to " + sTag);
+    AssignCommand(GetEnteringObject(),JumpToLocation(lLoc));
+    }
+}

_module/nss/ap_areaenter.nss

@@ -0,0 +1,128 @@
+#include "rd_spawnzones"
+//#include "rd_questinc"
+//#include "rd_treasure"
+
+void SpawnSpecialCamp(int iCamp, string sCType);
+
+void main()
+{
+int iCamp;
+string sCType;
+object oPC;
+
+oPC = GetEnteringObject();
+
+if (GetIsPC(oPC))
+    {
+    if (GetLocalInt(OBJECT_SELF,"EN4_DoOnce") == 0)
+        {
+        SetLocalInt(OBJECT_SELF,"EN4_DoOnce",1);
+        SetLocalInt(GetModule(),"Astral",1);
+        DelayCommand(1.0f,SpawnSpecialCamp(1,"angelic"));
+        DelayCommand(1.0f,SpawnSpecialCamp(2,"fiend"));
+        DelayCommand(1.0f,SpawnSpecialCamp(3,"astral"));
+        DelayCommand(1.0f,SpawnSpecialCamp(4,"maelore"));
+        DelayCommand(1.0f,SpawnSpecialCamp(5,"astral"));
+        }
+    }
+}
+
+void SpawnSpecialCamp(int iCamp, string sCType)
+{
+int iFlag;
+int iIndex;
+int iType;
+int iBaseLevel;
+int iBase;
+int iBaseStart;
+int iBaseMax;
+int iCampType;
+int iArea;
+string sEncounter;
+string sBossTest;
+string sCampType;
+string sCD;
+object oEncounter;
+object oCreature;
+object oBoss;
+object oMod;
+object oArea;
+location lEncounter;
+
+string sZone = "AP1";
+int iLevel=40;
+int iLeader=0;
+
+oMod = GetModule();
+sEncounter = sZone + "_Q" + IntToString(iCamp) + "_Boss";
+oEncounter = GetObjectByTag(sEncounter);
+oArea = GetArea(oEncounter);
+
+iArea=GetIsAreaInterior(oArea);
+iBaseLevel=AdjustLevel(iLevel);
+
+if (iArea == FALSE)
+    SetupCampTypes(iBaseLevel,1,0,0);
+else
+    SetupCampTypes(iBaseLevel,1,1,0);
+
+if (sCType == "")
+    {
+    iBaseLevel=AdjustLevel(iLevel);
+    sCampType = GetCampType();
+    } else {
+    iBaseLevel=AdjustLevel(iLevel);
+    sCampType = GetSpecificCampType(sCType);
+    }
+
+
+iBase = GetLocalInt(oMod,"iBase");
+iBaseStart = GetLocalInt(oMod,"iBaseStart");
+iBaseMax = GetLocalInt(oMod,"iBaseMax");
+iCampType = GetLocalInt(oMod,"iCampType");
+sCD = GetLocalString(oMod,"sCD");
+
+//debug line
+//SendMessageToPC(GetFirstPC(),"Spawn Specific camptype " + sCampType + " at type " + IntToString(iCampType));
+
+SetLocalInt(oMod,"iBase",0);
+SetLocalInt(oMod,"iBaseStart",0);
+SetLocalInt(oMod,"iBaseMax",0);
+SetLocalInt(oMod,"iCampType",0);
+SetLocalString(oMod,"sCD","");
+
+sEncounter = sZone + "_Q" + IntToString(iCamp) + "_Boss";
+oBoss = GetCampMob(99,sEncounter,sCampType,iBaseLevel,iBaseStart,iBase,iBaseMax,iCampType);
+
+SetLocalString(oBoss,"CampType",sCampType);
+SetLocalInt(oBoss,"BaseLevel",iBaseLevel);
+SetLocalInt(oBoss,"iBase",iBase);
+SetLocalInt(oBoss,"iBaseStart",iBaseStart);
+SetLocalInt(oBoss,"iBaseMax",iBaseMax);
+SetLocalInt(oBoss,"iCampType",iCampType);
+SetLocalString(oBoss,"Description",sCD);
+
+iType = 1;
+while (iType <4)
+    {
+    iFlag = 1;
+    iIndex = 1;
+    while (iFlag == 1)
+        {
+        sEncounter = sZone + "_Q" + IntToString(iCamp) +
+                    "_T" + IntToString(iType) + "_" + IntToString(iIndex);
+        oEncounter = GetObjectByTag(sEncounter);
+        if (GetIsObjectValid(oEncounter))
+            {
+            GetCampMob(iType,sEncounter,sCampType,iBaseLevel,iBaseStart,iBase,iBaseMax,iCampType);
+            } else
+                iFlag =0;
+        iIndex++;
+        if (iIndex > 1000)
+            {
+            iFlag = 0;
+            }
+        }
+    iType++;
+    }
+}

_module/nss/ar1_enter.nss

@@ -0,0 +1,69 @@
+#include "rd_misc"
+#include "rd_treasure"
+
+void main()
+{
+location lLoc;
+object oPC;
+int iRandom;
+int iCount;
+
+oPC = GetEnteringObject();
+
+SitInChairs("ar1");
+
+if (GetLocalInt(OBJECT_SELF,"DoOnce") == 0)
+    {
+    SetLocalInt(OBJECT_SELF,"DoOnce",1);
+    if (Random(100)<25)
+        {
+        SetLocalInt(OBJECT_SELF,"CustomMerchant",1);
+        lLoc = GetLocation(GetObjectByTag("en4_cm1"));
+        CreateObject(OBJECT_TYPE_CREATURE,"mer_cm1",lLoc);
+        }
+    }
+
+if (GetIsPC(oPC))
+    {
+    if (GetLocalInt(oPC,"SS1") == 0)
+        {
+        SetLocalInt(oPC,"SS1",1);
+        if (GetLocalInt(OBJECT_SELF,"CustomMerchant") == 1)
+            {
+            object oStore = GetObjectByTag("en4_cm1_mer");
+            iRandom=Random(4)+1;
+            iCount = 0;
+            while (iCount <= iRandom)
+                {
+                GetMagicItem(oStore,TRUE,TRUE,5);
+                iCount++;
+                }
+            iRandom=Random(4)+1;
+            iCount = 0;
+            while (iCount <= iRandom)
+                {
+                GetMagicItem(oStore,TRUE,TRUE);
+                iCount++;
+                }
+            iRandom=Random(3)+1;
+            iCount = 0;
+            while (iCount <= iRandom)
+                {
+                CreateRandomItem(oStore);
+                iCount++;
+                }
+            iRandom=Random(2)+1;
+            iCount = 0;
+            while (iCount <= iRandom)
+                {
+                GetMiscMagic(oStore);
+                iCount++;
+                }
+            iRandom=Random(2);
+            if (iRandom == 1)
+                GetRareItem(oStore);
+            }
+        }
+    }
+
+}

_module/nss/ar_st_generic.nss

@@ -0,0 +1,284 @@
+//::///////////////////////////////////////////////
+//:: Store Open Script
+//:: nw_d1_startstore
+//:://////////////////////////////////////////////
+/*
+    This script will allow stores to partially reset
+    themselves to their original state after some
+    time has passed.
+
+    Intended for persistent worlds.
+*/
+//:://////////////////////////////////////////////
+//:: Created By: The Krit
+//:: Created On: 3/2/07
+//:: Replaces the "do-nothing" BioWare script.
+//:://////////////////////////////////////////////
+
+//////////////////////////////////////////////////
+//
+// This script will cause a store's finite inventory
+// and limited gold to be (partially) replenished
+// after a certain amount of time passes. It will also
+// clean out new items and excess gold. I call this
+// restocking.
+//
+// The timer starts when the store is first opened
+// after server rest or the last restock. The time
+// is random, but will be at least RESTOCK_TIME_FIXED
+// real-time hours. The random component of the time
+// is added to this minimum, and will range from 0
+// to RESTOCK_TIME_VARIABLE minutes.
+//
+// Items are only replaced if all of that type have
+// been sold (and not bought back). The chance for an
+// item to be replaced is RESTOCK_CHANCE.
+//
+// Items not in the store's original inventory have a
+// chance to be removed (sold to unspecified NPC's, if
+// you will) when the store restocks. This chance is
+// UNSTOCK_CHANCE.
+//
+// After the store restocks, the store's gold supply -- if
+// limited -- will be no more than GOLD_MAX_FRACTION times
+// its starting value.
+//
+// After the store restocks, the store's gold supply -- if
+// limited -- will be no less than GOLD_MIN_FRACTION times
+// its starting value.
+//
+// If you try to mess with things and make GOLD_MAX_FRACTION
+// less than GOLD_MIN_FRACTION, you deserve whatever happens.
+// You may also smack yourself for making trouble. :)
+//
+//////////////////////////////////////////////////
+//
+// The variables mentioned above are set globally below.
+// In addition, you can change the value for a particular
+// store by setting a local variable of the same name
+// (and type) on the store.
+// NOTE: These variables must be set on the *store*, not
+// the merchant.
+//
+//////////////////////////////////////////////////
+//
+// This script will (likely) break if you switch a
+// store from unlimited gold to limited gold through
+// scripting. Don't do that. There would be no
+// original gold level to refer to when restocking.
+//
+//////////////////////////////////////////////////
+
+
+// The following is the minimum number of real-time (not
+// game-time) hours that elapse before a store gets
+// restocked.
+const int RESTOCK_TIME_FIXED = 3;
+
+// The following is the maximum number of minutes (not
+// hours) that a restock might be delayed beyond the
+// above minimum number of hours.
+const int RESTOCK_TIME_VARIABLE = 30;
+
+// The following is the chance (percentage) that a depleted
+// item will be replaced when the restocking occurs. Each
+// item rolls this percentage individually.
+const int RESTOCK_CHANCE = 55;
+
+// The following is the chance (percentage) that an item
+// not in the store's original inventory will be removed
+// when a restocking occurs.
+const int UNSTOCK_CHANCE = 33;
+
+// The following is the fraction (floating point) of the
+// stores original gold that is the most a store can have
+// after restocking.
+// (No effect on stores with unlimited gold.)
+const float GOLD_MAX_FRACTION = 1.20;
+
+// The following is the fraction (floating point) of the
+// stores original gold that is the least a store can have
+// after restocking.
+// (No effect on stores with unlimited gold.)
+const float GOLD_MIN_FRACTION = 0.80;
+
+
+// The following are names of local variables used by
+// this script.
+const string STORE_GOLD      = "TK_STORE_STARTING_GOLD";
+const string ORIG_INVENTORY  = "TK_STORE_STARTING_INVENTORY_";
+const string CUR_INVENTORY   = "TK_STORE_CURRENT_INVENTORY_";
+const string INVENTORY_STACK = "TK_STORE_INVENTORY_STACK_LIST_";
+const string INVENTORY_LIST  = "TK_STORE_INVENTORY_LIST_";
+const string INVENTORY_SIZE  = "TK_STORE_INVENTORY_SIZE";
+const string INVENTORIED     = "TK_STORE_DID_INVENTORY";
+const string RESTOCK_ORDERED = "TK_STORE_DID_DELAY";
+
+
+// Records the store's current (starting) inventory.
+void DoInventory();
+
+// Restocks the store.
+void Restock();
+
+
+//////////////////////////////////////////////////
+// main()
+//
+// Intended for a store's OnOpenStore event, replacing the BioWare default.
+//
+void main()
+{
+    // See if the store's original inventory has been recorded.
+    if ( !GetLocalInt(OBJECT_SELF, INVENTORIED) )
+    {
+        // Record the current inventory.
+        DoInventory();
+        SetLocalInt(OBJECT_SELF, INVENTORIED, TRUE);
+    }
+
+    // See if a restock is currently on delay.
+    if ( !GetLocalInt(OBJECT_SELF, RESTOCK_ORDERED) )
+    {
+        // Determine the restock times (possibly stored locally).
+        int nRestockHours = GetLocalInt(OBJECT_SELF, "RESTOCK_TIME_FIXED");
+        if ( nRestockHours == 0 )
+            nRestockHours = RESTOCK_TIME_FIXED;
+        int nRestockMinutes = GetLocalInt(OBJECT_SELF, "RESTOCK_TIME_VARIABLE");
+        if ( nRestockMinutes == 0 )
+            nRestockMinutes = RESTOCK_TIME_VARIABLE;
+
+        // Order (delay) a restock.
+        DelayCommand( TurnsToSeconds(60*nRestockHours + Random(nRestockMinutes+1)),
+                      Restock());
+        SetLocalInt(OBJECT_SELF, RESTOCK_ORDERED, TRUE);
+    }
+}
+
+
+//////////////////////////////////////////////////
+// DoInventory()
+//
+// Records the store's current (starting) inventory.
+//
+void DoInventory()
+{
+    // Record the store's current gold.
+    SetLocalInt(OBJECT_SELF, STORE_GOLD, GetStoreGold(OBJECT_SELF));
+
+    // Record the store's current inventory.
+    int nCount = 0;
+    object oItem = GetFirstItemInInventory();
+    while ( oItem != OBJECT_INVALID )
+    {
+        // We are only concerned with items in finite supply.
+        if ( !GetInfiniteFlag(oItem) )
+        {
+            string sResRef = GetResRef(oItem);
+            // Set a boolean flag based on the blueprint name.
+            SetLocalInt(OBJECT_SELF, ORIG_INVENTORY + sResRef, TRUE);
+            // Add sResRef to the list of blueprints.
+            SetLocalString(OBJECT_SELF, INVENTORY_LIST + IntToString(nCount), sResRef);
+            // Record the stack size.
+            SetLocalInt(OBJECT_SELF, INVENTORY_STACK + IntToString(nCount), GetItemStackSize(oItem));
+            // Update the count.
+            nCount++;
+        }
+        // Next item.
+        oItem = GetNextItemInInventory();
+    }
+
+    // Record the length of the list of blueprints.
+    SetLocalInt(OBJECT_SELF, INVENTORY_SIZE, nCount);
+}
+
+
+//////////////////////////////////////////////////
+// Restock()
+//
+// Restocks the store.
+//
+void Restock()
+{
+    // Check the store's gold.
+    int nCurGold = GetStoreGold(OBJECT_SELF);
+
+    // We are only concerned if the store has limited gold.
+    if ( nCurGold > -1 )
+    {
+        // Determine the min and max gold fractions (possibly stored locally).
+        float fGoldMin = GetLocalFloat(OBJECT_SELF, "GOLD_MIN_FRACTION");
+        if ( fGoldMin == 0.0 )
+            fGoldMin = GOLD_MIN_FRACTION;
+        float fGoldMax = GetLocalFloat(OBJECT_SELF, "GOLD_MAX_FRACTION");
+        if ( fGoldMax == 0.0 )
+            fGoldMax = GOLD_MAX_FRACTION;
+
+        // Calculate the minimum and maximum gold levels.
+        int nOrigGold = GetLocalInt(OBJECT_SELF, STORE_GOLD);
+        int nMinGold = FloatToInt(IntToFloat(nOrigGold) * fGoldMin);
+        int nMaxGold = FloatToInt(IntToFloat(nOrigGold) * fGoldMax);
+
+        // Check for too little gold.
+        if ( nCurGold < nMinGold )
+            SetStoreGold(OBJECT_SELF, nMinGold);
+        // Check for too much gold.
+        else if ( nCurGold > nMaxGold )
+            SetStoreGold(OBJECT_SELF, nMaxGold);
+    }
+
+    // Determine the unstock chance (possibly stored locally).
+    int nUnstockChance = GetLocalInt(OBJECT_SELF, "UNSTOCK_CHANCE");
+    if ( nUnstockChance == 0 )
+        nUnstockChance = UNSTOCK_CHANCE;
+
+    // Scan the store's current inventory.
+    // Record which original items are still around.
+    // Possibly remove non-original items.
+    object oItem = GetFirstItemInInventory();
+    while ( oItem != OBJECT_INVALID )
+    {
+        // We are only concerned with items in finite supply.
+        if ( !GetInfiniteFlag(oItem) )
+        {
+            string sResRef = GetResRef(oItem);
+
+            // See if this item is an original item.
+            if ( GetLocalInt(OBJECT_SELF, ORIG_INVENTORY + sResRef) )
+            {
+                // Set a boolean flag (temporarily) based on the blueprint name.
+                SetLocalInt(OBJECT_SELF, CUR_INVENTORY + sResRef, TRUE);
+                DelayCommand(0.0, DeleteLocalInt(OBJECT_SELF, CUR_INVENTORY + sResRef));
+            }
+            // See if this (not original) item should be removed.
+            else if ( d100() <= nUnstockChance )
+                // Delete this item.
+                DestroyObject(oItem);
+        }
+        // Next item.
+        oItem = GetNextItemInInventory();
+    }
+
+    // Determine the restock chance (possibly stored locally).
+    int nRestockChance = GetLocalInt(OBJECT_SELF, "RESTOCK_CHANCE");
+    if ( nRestockChance == 0 )
+        nRestockChance = RESTOCK_CHANCE;
+
+    // Loop through the list of items that might be restored.
+    int nCount = GetLocalInt(OBJECT_SELF, INVENTORY_SIZE);
+    while ( nCount-- > 0 )
+    {
+        string sResRef = GetLocalString(OBJECT_SELF, INVENTORY_LIST + IntToString(nCount));
+
+        // Make sure no items of this type are in the store's inventory (before this loop).
+        if ( !GetLocalInt(OBJECT_SELF, CUR_INVENTORY + sResRef) )
+            // See if this item should be restocked.
+            if ( d100() <= nRestockChance )
+                // Add this item to the store.
+                CreateItemOnObject(sResRef, OBJECT_SELF,
+                    GetLocalInt(OBJECT_SELF, INVENTORY_STACK + IntToString(nCount)));
+    }
+
+    // Restocking is no longer in progress.
+    SetLocalInt(OBJECT_SELF, RESTOCK_ORDERED, FALSE);
+}

_module/nss/array_example.nss

@@ -0,0 +1,143 @@
+//#include "inc_array"
+#include "nwnx_time"
+
+// nwnx_data also includes inc_array, so don't double dip.
+#include "nwnx_data"
+
+void Log(string msg) 
+{
+    WriteTimestampedLogEntry(msg);
+}
+
+void TestArrayOnModule() 
+{
+
+    string array = "test";
+
+    // By default, temporary arrays are created on the module.
+    Array_PushBack_Str(array, "BItem1");
+    Array_PushBack_Str(array, "AItem2");
+    Array_PushBack_Str(array, "AItem3");
+    Array_PushBack_Str(array, "BItem2");
+    Array_Debug_Dump(array, "After first load");
+
+    int foo = Array_Find_Str(array, "AItem3");
+    Log("Found element AItem3 at index = " + IntToString(foo));
+
+    Array_Set_Str(array, 2, "Suck it up...");
+    Array_Debug_Dump(array, "After set 2 = 'Suck it up...'");
+
+    Array_Erase(array, 1);
+    Array_Debug_Dump(array, "After delete 1");
+
+    Array_PushBack_Str(array, "MItem1");
+    Array_PushBack_Str(array, "QItem2");
+    Array_PushBack_Str(array, "NItem3");
+    Array_PushBack_Str(array, "KItem2");
+
+    Array_Debug_Dump(array, "After add more");
+    Array_SortAscending(array);
+
+    Array_Debug_Dump(array, "After sort");
+
+    Array_Shuffle(array);
+    Array_Debug_Dump(array, "After shuffle");
+
+    Log( (Array_Contains_Str(array, "NItem3")) ? "Passed.. found it"  : "Failed.. should have found it" );
+    Log( (Array_Contains_Str(array, "KItem2")) ? "Passed.. found it"  : "Failed.. should have found it" );
+    Log( (Array_Contains_Str(array, "xxxxxx")) ? "Failed.. not found" : "Passed.. should not exist" );
+
+    Array_Clear(array);
+    // Load up the array with 100 entries
+    int i;
+	
+    struct NWNX_Time_HighResTimestamp b;
+    b = NWNX_Time_GetHighResTimeStamp();
+    Log("Start Time: " + IntToString(b.seconds) + "." + IntToString(b.microseconds));
+    for (i=0; i<1000; i++) 
+    {
+        Array_PushBack_Str(array, IntToString(d100()) + " xxx " + IntToString(i));
+    }
+    b = NWNX_Time_GetHighResTimeStamp();
+    Log("Loaded 1000: " + IntToString(b.seconds) + "." + IntToString(b.microseconds));
+    Array_Shuffle(array);
+    b = NWNX_Time_GetHighResTimeStamp();
+    Log("Shuffled 1000: " + IntToString(b.seconds) + "." + IntToString(b.microseconds));
+    for (i=5; i<995; i++) 
+    {
+        // Delete the third entry a bunch of times
+        Array_Erase(array, 3);
+    }
+    b = NWNX_Time_GetHighResTimeStamp();
+    Log("Delete ~990: " + IntToString(b.seconds) + "." + IntToString(b.microseconds));
+    Array_Debug_Dump(array, "After mass insert/delete");
+
+}
+
+void TestArrayOnChicken() 
+{
+    string array="chicken";
+    // Let's create an array "on" our favorite creature: the deadly nw_chicken
+    // Note - arrays aren't really attached to the item, but the module, and they
+    // are tagged with the objects string representation.
+    object oCreature = CreateObject(OBJECT_TYPE_CREATURE, "nw_chicken", GetStartingLocation());
+    if (!GetIsObjectValid(oCreature))
+    {
+        Log("NWNX_Creature test: Failed to create creature");
+        return;
+    }
+
+    Array_PushBack_Str(array, "BItem1", oCreature);
+    Array_PushBack_Str(array, "AItem2", oCreature);
+    Array_PushBack_Str(array, "AItem3", oCreature);
+    Array_PushBack_Str(array, "BItem2", oCreature);
+    Array_Debug_Dump(array, "After Chicken array load", oCreature);
+
+}
+
+void TestNWNXArray() 
+{
+    Log("");
+    Log("Start NWNX_Data test.");
+    string array = "test2";
+
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "XItem1");
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "ZItem2");
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "ZItem3");
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "XItem2");
+    Array_Debug_Dump(array, "After first load");
+
+    int foo = NWNX_Data_Array_Find_Str(GetModule(), array, "ZItem3");
+    Log("Found element AItem3 at index = " + IntToString(foo));
+
+    NWNX_Data_Array_Set_Str(GetModule(), array, 2, "Suck it up...");
+    Array_Debug_Dump(array, "After set 2 = 'Suck it up...'");
+
+    NWNX_Data_Array_Erase(NWNX_DATA_TYPE_STRING, GetModule(), array, 1);
+    Array_Debug_Dump(array, "After delete 1");
+
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "MItem1");
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "QItem2");
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "NItem3");
+    NWNX_Data_Array_PushBack_Str(GetModule(), array, "KItem2");
+
+    Array_Debug_Dump(array, "After add more");
+    NWNX_Data_Array_SortAscending(NWNX_DATA_TYPE_STRING, GetModule(), array);
+
+    Array_Debug_Dump(array, "After sort");
+
+}
+
+// Uncomment and assign to some event click.
+/* */
+void main() 
+{
+    Log("Start");
+
+    TestArrayOnModule();
+
+    TestArrayOnChicken();
+
+    TestNWNXArray();
+}
+/* */

_module/nss/at_areatrans_001.nss

@@ -0,0 +1,10 @@
+
+void main()
+{
+  object oClicker = GetClickingObject();
+  object oTarget = GetTransitionTarget(OBJECT_SELF);
+
+  SetAreaTransitionBMP(AREA_TRANSITION_RANDOM);
+
+  AssignCommand(oClicker,JumpToObject(oTarget));
+}

_module/nss/at_fancydoor_001.nss

@@ -0,0 +1,10 @@
+
+void main()
+{
+  object oClicker = GetClickingObject();
+  object oTarget = GetTransitionTarget(OBJECT_SELF);
+
+  SetAreaTransitionBMP(AREA_TRANSITION_RANDOM);
+
+  AssignCommand(oClicker,JumpToObject(oTarget));
+}

_module/nss/at_h1_exit_001.nss

@@ -0,0 +1,10 @@
+
+void main()
+{
+  object oClicker = GetClickingObject();
+  object oTarget = GetTransitionTarget(OBJECT_SELF);
+
+  SetAreaTransitionBMP(AREA_TRANSITION_RANDOM);
+
+  AssignCommand(oClicker,JumpToObject(oTarget));
+}

_module/nss/at_htc_to_ht_001.nss

@@ -0,0 +1,10 @@
+
+void main()
+{
+  object oClicker = GetClickingObject();
+  object oTarget = GetTransitionTarget(OBJECT_SELF);
+
+  SetAreaTransitionBMP(AREA_TRANSITION_RANDOM);
+
+  AssignCommand(oClicker,JumpToObject(oTarget));
+}

_module/nss/at_htca_to_h_001.nss

@@ -0,0 +1,10 @@
+
+void main()
+{
+  object oClicker = GetClickingObject();
+  object oTarget = GetTransitionTarget(OBJECT_SELF);
+
+  SetAreaTransitionBMP(AREA_TRANSITION_RANDOM);
+
+  AssignCommand(oClicker,JumpToObject(oTarget));
+}

_module/nss/at_hts2_to_h_001.nss

@@ -0,0 +1,10 @@
+
+void main()
+{
+  object oClicker = GetClickingObject();
+  object oTarget = GetTransitionTarget(OBJECT_SELF);
+
+  SetAreaTransitionBMP(AREA_TRANSITION_RANDOM);
+
+  AssignCommand(oClicker,JumpToObject(oTarget));
+}

_module/nss/cg_mer1.nss

@@ -0,0 +1,19 @@
+//::///////////////////////////////////////////////
+//:: FileName tg_mer1
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 3/13/2005 1:32:36 PM
+//:://////////////////////////////////////////////
+#include "nw_i0_plot"
+
+void main()
+{
+
+    // Either open the store with that tag or let the user know that no store exists.
+    object oStore = GetNearestObjectByTag("en4_cg1");
+    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
+        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
+    else
+        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
+}

_module/nss/cg_mer2.nss

@@ -0,0 +1,19 @@
+//::///////////////////////////////////////////////
+//:: FileName tg_mer1
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 3/13/2005 1:32:36 PM
+//:://////////////////////////////////////////////
+#include "nw_i0_plot"
+
+void main()
+{
+
+    // Either open the store with that tag or let the user know that no store exists.
+    object oStore = GetNearestObjectByTag("en4_cg2");
+    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
+        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
+    else
+        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
+}

_module/nss/cg_mer3.nss

@@ -0,0 +1,19 @@
+//::///////////////////////////////////////////////
+//:: FileName tg_mer1
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 3/13/2005 1:32:36 PM
+//:://////////////////////////////////////////////
+#include "nw_i0_plot"
+
+void main()
+{
+
+    // Either open the store with that tag or let the user know that no store exists.
+    object oStore = GetNearestObjectByTag("en4_cg3");
+    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
+        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
+    else
+        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
+}

_module/nss/clickforxp.nss

@@ -0,0 +1,6 @@
+void main()
+{
+      object oPC = GetPlaceableLastClickedBy();
+      GiveXPToCreature(oPC, 30000);
+      FloatingTextStringOnCreature("Granted XP",oPC,FALSE);
+}

_module/nss/cm_aid_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "aidswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_aid_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "aidswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_aid_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Aid(OBJECT_SELF);
+}

_module/nss/cm_aid_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "aidswitch", 0);
+
+}

_module/nss/cm_aid_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "aidswitch", 1);
+
+}

_module/nss/cm_antid_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Anti(OBJECT_SELF);
+}

_module/nss/cm_bar_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "barswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_bar_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "barswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_bar_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "barswitch", 0);
+
+}

_module/nss/cm_bar_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "barswitch", 1);
+
+}

_module/nss/cm_bark_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Barkskin(OBJECT_SELF);
+}

_module/nss/cm_bless_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Bless(OBJECT_SELF);
+}

_module/nss/cm_bls_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "blsswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_bls_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "blsswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_bls_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "blsswitch", 0);
+
+}

_module/nss/cm_bls_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "blsswitch", 1);
+
+}

_module/nss/cm_buf_clear_all.nss

@@ -0,0 +1,29 @@
+//::///////////////////////////////////////////////
+//:: FileName buf_set_all
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 11:15:14 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "aidswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "barswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "bulswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "catswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "cleswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "deaswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "eagswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "eliswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "endswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "foxswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "iroswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "lirswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "lstswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "owlswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "phaswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "speswitch", 0);
+    SetLocalInt(GetPCSpeaker(), "watswitch", 0);
+
+}

_module/nss/cm_buf_set_all.nss

@@ -0,0 +1,29 @@
+//::///////////////////////////////////////////////
+//:: FileName buf_set_all
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 11:15:14 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "aidswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "barswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "bulswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "catswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "cleswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "deaswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "eagswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "eliswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "endswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "foxswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "iroswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "lirswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "lstswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "owlswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "phaswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "speswitch", 1);
+    SetLocalInt(GetPCSpeaker(), "watswitch", 1);
+
+}

_module/nss/cm_buff_hench.nss

@@ -0,0 +1,236 @@
+#include "cm_hench_include"
+
+void main()
+{
+object oPC=GetModule();
+object oPC1=GetPCSpeaker();
+object oStar=OBJECT_SELF;
+float oDelay = 120.0;
+SetLocalInt(oStar, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oStar, "buffing", 0));
+int i1,i2,i3,i4,i5,i6,i7,i8,i9,i10,i11,i12,i13,i14,i15,i16,i17,
+    s1,s2,s3,s4,s5,s6,s7,s8,s9,s10,s11,s12,s13,s14,s15,s16,s17;
+i1=GetLocalInt(oPC, "aidtook");
+i2=GetLocalInt(oPC, "bulltook");
+i3=GetLocalInt(oPC, "speedtook");
+i4=GetLocalInt(oPC, "cleartook");
+i5=GetLocalInt(oPC, "barktook");
+i6=GetLocalInt(oPC, "eagletook");
+i7=GetLocalInt(oPC, "endtook");
+i8=GetLocalInt(oPC, "cattook");
+i9=GetLocalInt(oPC, "foxtook");
+i10=GetLocalInt(oPC, "owltook");
+i11=GetLocalInt(oPC, "irontook");
+i12=GetLocalInt(oPC, "deathtook");
+i13=GetLocalInt(oPC, "blesstook");
+s1=GetLocalInt(oPC1, "aidswitch");
+s2=GetLocalInt(oPC1, "bulswitch");
+s3=GetLocalInt(oPC1, "speswitch");
+s4=GetLocalInt(oPC1, "cleswitch");
+s5=GetLocalInt(oPC1, "barswitch");
+s6=GetLocalInt(oPC1, "eagswitch");
+s7=GetLocalInt(oPC1, "endswitch");
+s8=GetLocalInt(oPC1, "catswitch");
+s9=GetLocalInt(oPC1, "foxswitch");
+s10=GetLocalInt(oPC1, "owlswitch");
+s11=GetLocalInt(oPC1, "iroswitch");
+s12=GetLocalInt(oPC1, "deaswitch");
+s13=GetLocalInt(oPC1, "blsswitch");
+
+object oPot = GetItemPossessedBy(oStar, "NW_IT_MPOTION015"); //Bullstrength
+object oPot1 = GetItemPossessedBy(oStar, "NW_IT_MPOTION004");//Speed
+object oPot2 = GetItemPossessedBy(oStar, "NW_IT_MPOTION016");//Aid
+object oPot3 = GetItemPossessedBy(oStar, "NW_IT_MPOTION005");//Barkskin
+object oPot4 = GetItemPossessedBy(oStar, "NW_IT_MPOTION007");//Clarity
+object oPot5 = GetItemPossessedBy(oStar, "NW_IT_MPOTION010");//Eagle's Splend
+object oPot6 = GetItemPossessedBy(oStar, "NW_IT_MPOTION013");//Endurance
+object oPot7 = GetItemPossessedBy(oStar, "NW_IT_MPOTION014");//Cat's Grace
+object oPot8 = GetItemPossessedBy(oStar, "NW_IT_MPOTION017");// Fox's Cunning
+object oPot9 = GetItemPossessedBy(oStar, "NW_IT_MPOTION018");// Owl's Wisdom
+object oPot10 = GetItemPossessedBy(oStar, "X2_IT_MPOTION001");//Iron Guts
+object oPot11 = GetItemPossessedBy(oStar, "NW_IT_MPOTION002");//Death Armor
+object oPot12 = GetItemPossessedBy(oStar, "NW_IT_MPOTION009");//Bless
+
+if ((oPot==OBJECT_INVALID)&&(oPot1==OBJECT_INVALID)
+   &&(oPot2==OBJECT_INVALID)&&(oPot3==OBJECT_INVALID)
+   &&(oPot4==OBJECT_INVALID)&&(oPot5==OBJECT_INVALID)
+   &&(oPot7==OBJECT_INVALID)&&(oPot7==OBJECT_INVALID)
+   &&(oPot8==OBJECT_INVALID)&&(oPot9==OBJECT_INVALID)
+   &&(oPot10==OBJECT_INVALID)&&(oPot11==OBJECT_INVALID)
+   &&(oPot12==OBJECT_INVALID))
+   {
+    ClearAllActions();
+    ActionSpeakString("I don't have any buff potions.");
+    ActionPlayAnimation(ANIMATION_LOOPING_TALK_PLEADING, 1.0f, 2.0f);
+   }
+   else if ((i1!=1)||(i2!=1)||(i3!=1)||(i3!=1)||(i4!=1)||(i5!=1)||(i6!=1)
+            ||(i7!=1)||(i8!=1)||(i9!=1)||(i10!=1)||(i11!=1)||(i12!=1)||(i13!=1))
+
+     {
+      if ((i1!=1)&&(s1==1)&&(oPot2!=OBJECT_INVALID))
+     {
+      TakeAid(OBJECT_SELF);
+      SetLocalInt(oPC, "aidtook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "aidtook", 0));
+      return;
+     }
+      if ((i2!=1)&&(s2==1)&&(oPot!=OBJECT_INVALID))
+     {
+      TakeBull(OBJECT_SELF);
+      SetLocalInt(oPC, "bulltook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "bulltook", 0));
+      return;
+     }
+     if ((i3!=1)&&(s3==1)&&(oPot1!=OBJECT_INVALID))
+     {
+      TakeSpeed(OBJECT_SELF);
+      SetLocalInt(oPC, "speedtook", 1);
+      DelayCommand(20.0, SetLocalInt(oPC, "speedtook", 0));
+      return;
+     }
+     if ((i4!=1)&&(s4==1)&&(oPot4!=OBJECT_INVALID))
+     {
+      TakeClear(OBJECT_SELF);
+      SetLocalInt(oPC, "cleartook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "cleartook", 0));
+      return;
+     }
+     if ((i5!=1)&&(s5==1)&&(oPot3!=OBJECT_INVALID))
+      {
+       TakeBark(OBJECT_SELF);
+       SetLocalInt(oPC, "barktook", 1);
+       DelayCommand(oDelay, SetLocalInt(oPC, "barktook", 0));
+       return;
+     }
+     if ((i6!=1)&&(s6==1)&&(oPot5!=OBJECT_INVALID))
+     {
+      TakeEag(OBJECT_SELF);
+      SetLocalInt(oPC, "eagletook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "eagletook", 0));
+      return;
+     }
+     if ((i7!=1)&&(s7==1)&&(oPot6!=OBJECT_INVALID))
+     {
+      TakeEnd(OBJECT_SELF);
+      SetLocalInt(oPC, "endtook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "endtook", 0));
+      return;
+     }
+     if ((i8!=1)&&(s8==1)&&(oPot7!=OBJECT_INVALID))
+     {
+      TakeCat(OBJECT_SELF);
+      SetLocalInt(oPC, "cattook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "cattook", 0));
+      return;
+     }
+     if ((i9!=1)&&(s9==1)&&(oPot8!=OBJECT_INVALID))
+     {
+      TakeFox(OBJECT_SELF);
+      SetLocalInt(oPC, "foxtook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "foxtook", 0));
+      return;
+     }
+     if ((i10!=1)&&(s10==1)&&(oPot9!=OBJECT_INVALID))
+     {
+      TakeOwl(OBJECT_SELF);
+      SetLocalInt(oPC, "owltook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "owltook", 0));
+      return;
+     }
+     if ((i11!=1)&&(s11==1)&&(oPot10!=OBJECT_INVALID))
+     {
+      TakeIron(OBJECT_SELF);
+      SetLocalInt(oPC, "irontook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "irontook", 0));
+      return;
+     }
+     if ((i12!=1)&&(s12==1)&&(oPot11!=OBJECT_INVALID))
+     {
+      TakeDeath(OBJECT_SELF);
+      SetLocalInt(oPC, "deathtook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "deathtook", 0));
+      return;
+     }
+     if ((i13!=1)&&(s13==1)&&(oPot12!=OBJECT_INVALID))
+     {
+      TakeBless(OBJECT_SELF);
+      SetLocalInt(oPC, "blesstook", 1);
+      DelayCommand(oDelay, SetLocalInt(oPC, "blesstook", 0));
+      return;
+     }
+     if ((i3!=1)&&(s3==1)&&(oPot1==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Speed potions.");
+     }
+     if ((i1!=1)&&(s1==1)&&(oPot2==OBJECT_INVALID))
+     {
+     SendMessageToPC(oPC1, "Starbright is out of Aid potions.");
+     }
+     if ((i2!=1)&&(s2==1)&&(oPot==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Bull's Strength potions.");
+     }
+     if ((i4!=1)&&(s4==1)&&(oPot4==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Clarity potions.");
+     }
+     if ((i5!=1)&&(s5==1)&&(oPot3==OBJECT_INVALID))
+     {
+     SendMessageToPC(oPC1, "Starbright is out of Barkskin potions.");
+     }
+     if ((i6!=1)&&(s6==1)&&(oPot5==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Eagle's Splendour potions.");
+     }
+     if ((i7!=1)&&(s7==1)&&(oPot6==OBJECT_INVALID))
+     {
+     SendMessageToPC(oPC1, "Starbright is out of Endurance potions.");
+     }
+     if ((i8!=1)&&(s8==1)&&(oPot7==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Cat's Grace potions.");
+     }
+     if ((i9!=1)&&(s9==1)&&(oPot8==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Fox's Cunning potions.");
+     }
+      if ((i10!=1)&&(s10==1)&&(oPot9==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Owl's Wisdom potions.");
+     }
+     if ((i11!=1)&&(s11==1)&&(oPot10==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Ironguts potions.");
+     }
+     if ((i12!=1)&&(s12==1)&&(oPot11==OBJECT_INVALID))
+     {
+     SendMessageToPC(oPC1, "Starbright is out of Death Armor potions.");
+     }
+     if ((i13!=1)&&(s13==1)&&(oPot12==OBJECT_INVALID))
+     {
+      SendMessageToPC(oPC1, "Starbright is out of Bless potions.");
+     }
+
+     if ((s1!=1)&&(s2!=1)&&(s3!=1)&&(s3!=1)&&(s4!=1)&&(s5!=1)&&(s6!=1)
+            &&(s7!=1)&&(s8!=1)&&(s9!=1)&&(s10!=1)&&(s11!=1)&&(s12!=1)&&(s13!=1))
+     {
+
+     ClearAllActions();
+     ActionSpeakString("Please tell me which potions I should drink");
+     ActionPlayAnimation(ANIMATION_LOOPING_TALK_PLEADING, 1.0f, 2.0f);
+     return;
+     }
+     ClearAllActions();
+     ActionSpeakString("I am ready for battle! Lets take em out!");
+     ActionPlayAnimation(ANIMATION_FIREFORGET_VICTORY2);
+     }
+     else if ((i1==1)&&(i2==1)&&(i3==1)&&(i3==1)&&(i4==1)&&(i5==1)&&(i6==1)
+            &&(i7==1)&&(i8==1)&&(i9==1)&&(i10==1)&&(i11==1)&&(i12==1)&&(i13==1))
+
+     {
+     ClearAllActions();
+     ActionSpeakString("I believe I'm fully buffed! Let's go!");
+     ActionPlayAnimation(ANIMATION_FIREFORGET_VICTORY1);
+     }
+
+}

_module/nss/cm_bul_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "bulswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_bul_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "bulswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_bul_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "bulswitch", 0);
+
+}

_module/nss/cm_bul_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "bulswitch", 1);
+
+}

_module/nss/cm_canheal_hench.nss

@@ -0,0 +1,14 @@
+#include "nw_i0_generic"
+int StartingConditional()
+{
+    if (GetCurrentHitPoints(OBJECT_SELF) < GetMaxHitPoints(OBJECT_SELF))
+    {
+        if (GetItemPossessedBy(OBJECT_SELF,"NW_IT_MPOTION001") != OBJECT_INVALID
+         || GetItemPossessedBy(OBJECT_SELF,"NW_IT_MPOTION002") != OBJECT_INVALID
+         || GetItemPossessedBy(OBJECT_SELF,"NW_IT_MPOTION003") != OBJECT_INVALID
+         || GetItemPossessedBy(OBJECT_SELF,"NW_IT_MPOTION012") != OBJECT_INVALID
+         || GetItemPossessedBy(OBJECT_SELF,"NW_IT_MPOTION020") != OBJECT_INVALID)
+        return TRUE;
+    }
+    return FALSE;
+}

_module/nss/cm_cat_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "catswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_cat_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "catswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_cat_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "catswitch", 0);
+
+}

_module/nss/cm_cat_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "catswitch", 1);
+
+}

_module/nss/cm_cha_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Char(OBJECT_SELF);
+}

_module/nss/cm_cheal_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+CureCrit(OBJECT_SELF);
+}

_module/nss/cm_cla_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "cleswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_cla_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "cleswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_cla_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "cleswitch", 0);
+
+}

_module/nss/cm_cla_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "cleswitch", 1);
+
+}

_module/nss/cm_clarity_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Clarity(OBJECT_SELF);
+}

_module/nss/cm_con_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Con(OBJECT_SELF);
+}

_module/nss/cm_dea_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "deaswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_dea_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "deaswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_dea_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "deaswitch", 0);
+
+}

_module/nss/cm_dea_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "deaswitch", 1);
+
+}

_module/nss/cm_deatha_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+DeathArmour(OBJECT_SELF);
+}

_module/nss/cm_dex_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Dex(OBJECT_SELF);
+}

_module/nss/cm_drheal_hench.nss

@@ -0,0 +1,5 @@
+#include "x0_i0_talent"
+void main()
+{
+    TalentHealingSelf(TRUE);
+}

_module/nss/cm_eag_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "eagswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_eag_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "eagswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_eag_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "eagswitch", 0);
+
+}

_module/nss/cm_eag_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "eagswitch", 1);
+
+}

_module/nss/cm_end_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "endswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_end_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "endswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_end_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "endswitch", 0);
+
+}

_module/nss/cm_end_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "endswitch", 1);
+
+}

_module/nss/cm_fheal_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Heal(OBJECT_SELF);
+}

_module/nss/cm_fire_hench.nss

@@ -0,0 +1,51 @@
+
+
+void main()
+{
+object oPC;
+object oHench = OBJECT_SELF;
+object oTarget;
+string oSelf = GetTag(OBJECT_SELF);
+location lTarget;
+effect eEffect;
+int iGold;
+int iGoldNow;
+int iGoldTake;
+int iRefund = GetLocalInt(oPC, "hench_deposit");
+oPC = GetPCSpeaker();
+ClearAllActions();
+RemoveHenchman(oPC, OBJECT_SELF);
+SetLocalString(oPC,"Henchman","");
+
+iGold = GetLocalInt(oPC,"RestGold");
+iGoldNow = GetGold(oPC);
+SetLocalInt(oPC,"RestGold",iGoldNow);
+if (iGoldNow>iGold)
+    {
+    iGoldTake = (iGoldNow-iGold)/10;
+    if (iGoldTake>0)
+        {
+        AssignCommand(oHench, ActionSpeakString("I'll take my share of the spoils now. Good luck! If you need me, I'll be back at the church."));
+        SendMessageToPC(oPC,"Starbright takes " + IntToString(iGoldTake) + " gold pieces as her share of the spoils.");
+        //DelayCommand(0.1f,TakeGold(iGoldTake,oPC));
+        DelayCommand(0.1f,AssignCommand(oPC,TakeGoldFromCreature(iGoldTake,oPC,TRUE)));
+        }
+     }
+else
+    {
+     AssignCommand(oHench, ActionSpeakString("I believe we are square now. Good luck! If you need me, I'll be back at the church."));
+    }
+SetLocalInt(oPC, "a_hired", 0);
+SetLocalInt(oPC, "starhere", 1);
+oTarget = GetObjectByTag(oSelf);
+SetLocalInt(GetPCSpeaker(), "leave1", 0);
+AssignCommand(oTarget, ActionPlayAnimation(ANIMATION_FIREFORGET_GREETING));
+AssignCommand(oTarget, ActionPlayAnimation(ANIMATION_FIREFORGET_BOW));
+oTarget = GetWaypointByTag("starbright_home");
+lTarget = GetLocation(oTarget);
+DelayCommand(5.0,ApplyEffectToObject(DURATION_TYPE_PERMANENT,EffectDisappear(),oHench));
+if (GetAreaFromLocation(lTarget)==OBJECT_INVALID) return;
+
+AssignCommand(oPC, ClearAllActions());
+DelayCommand(6.5, AssignCommand(oHench, ActionJumpToLocation(lTarget)));
+}

_module/nss/cm_fox_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "foxswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_fox_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "foxswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_fox_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "foxswitch", 0);
+
+}

_module/nss/cm_fox_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "foxswitch", 1);
+
+}

_module/nss/cm_hench_include.nss

@@ -0,0 +1,244 @@
+#include "cm_treat_include"
+
+void TakeSpeed(object oUser)
+{
+object oPC=GetModule();
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION004");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion004", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_HASTE, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+ void TakeBless(object oUser)
+{
+object oPC=GetModule();
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION009");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion009", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_BLESS, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+void TakeClear(object oUser)
+{
+object oPC=GetModule();
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION007");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion007", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_CLARITY, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+
+}
+
+
+void TakeAid(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION016");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion016", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_AID, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+
+
+void TakeBull(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION015");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion015", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_BULLS_STRENGTH, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+ void TakeBark(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION005");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion005", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_BARKSKIN, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+void TakeEag(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION010");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion010", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_EAGLE_SPLEDOR, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+void TakeFox(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION017");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion017", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_FOXS_CUNNING, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+void TakeOwl(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION018");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion018", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_OWLS_WISDOM, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+void TakeCat(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION014");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion014", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_CATS_GRACE, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+void TakeEnd(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "NW_IT_MPOTION013");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("nw_it_mpotion013", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_ENDURANCE, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+void TakeIron(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "X2_IT_MPOTION001");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("x2_it_mpotion001", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_IRONGUTS, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+void TakeDeath(object oUser)
+{
+
+object oPot = GetItemPossessedBy(oUser, "X2_IT_MPOTION002");
+SetLocalInt(oUser, "buffing", 1);
+DelayCommand(3.0, SetLocalInt(oUser, "buffing", 0));
+if (oPot!= OBJECT_INVALID)
+   {
+   int iStack = GetNumStackedItems(oPot);
+   iStack--;
+   DestroyObject(oPot, 0.0);
+   if (iStack>0){DelayCommand(0.3, CreatePotion("x2_it_mpotion002", oUser, iStack));}
+   ClearAllActions();
+   ActionPlayAnimation(ANIMATION_FIREFORGET_DRINK);
+   ActionCastSpellAtObject(SPELL_DEATH_ARMOR, oUser, METAMAGIC_ANY, TRUE, 10, PROJECTILE_PATH_TYPE_DEFAULT, TRUE);
+   }
+}
+
+
+
+
+
+//void main () {}
+

_module/nss/cm_hired_hench.nss

@@ -0,0 +1,15 @@
+
+#include "x0_i0_henchman"
+
+int StartingConditional()
+{
+    // this checks to see if the henchman is considered currently
+    if  (GetIsHired() && GetWorkingForPlayer(GetPCSpeaker()) &&
+            GetLocalInt(OBJECT_SELF, "X0_L_BUSY_SPEAKING_ONE_LINER") == 0)
+    {
+        SetLocalInt(OBJECT_SELF, "X0_L_BUSY_SPEAKING_ONE_LINER", 0);
+        return TRUE;
+    }
+
+    return FALSE;
+}

_module/nss/cm_int_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+Int(OBJECT_SELF);
+}

_module/nss/cm_invis_hench.nss

@@ -0,0 +1,9 @@
+#include "cm_treat_include"
+void main()
+{
+Invisibility(OBJECT_SELF);
+}
+
+
+
+

_module/nss/cm_invopen_hench.nss

@@ -0,0 +1,6 @@
+void main()
+{
+object oPC=GetPCSpeaker();
+object oSelf=OBJECT_SELF;
+OpenInventory(oSelf, oPC);
+}

_module/nss/cm_iro_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "iroswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_iro_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "iroswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_iro_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "iroswitch", 0);
+
+}

_module/nss/cm_iro_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "iroswitch", 1);
+
+}

_module/nss/cm_irong_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+IronGuts(OBJECT_SELF);
+}

_module/nss/cm_lheal_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+CureLig(OBJECT_SELF);
+}

_module/nss/cm_lrest_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+LesserRest(OBJECT_SELF);
+}

_module/nss/cm_mheal_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+CureMod(OBJECT_SELF);
+}

_module/nss/cm_owl_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "owlswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_owl_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "owlswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_owl_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "owlswitch", 0);
+
+}

_module/nss/cm_owl_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "owlswitch", 1);
+
+}

_module/nss/cm_sheal_hench.nss

@@ -0,0 +1,6 @@
+#include "cm_treat_include"
+
+void main()
+{
+CureSer(OBJECT_SELF);
+}

_module/nss/cm_spe_0.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "speswitch") == 0))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_spe_1.nss

@@ -0,0 +1,16 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_0
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 9:59:16 PM
+//:://////////////////////////////////////////////
+int StartingConditional()
+{
+
+    // Inspect local variables
+    if(!(GetLocalInt(GetPCSpeaker(), "speswitch") == 1))
+        return FALSE;
+
+    return TRUE;
+}

_module/nss/cm_spe_set_off.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "speswitch", 0);
+
+}

_module/nss/cm_spe_set_on.nss

@@ -0,0 +1,13 @@
+//::///////////////////////////////////////////////
+//:: FileName aid_set_on
+//:://////////////////////////////////////////////
+//:://////////////////////////////////////////////
+//:: Created By: Script Wizard
+//:: Created On: 6/10/2004 10:02:24 PM
+//:://////////////////////////////////////////////
+void main()
+{
+    // Set the variables
+    SetLocalInt(GetPCSpeaker(), "speswitch", 1);
+
+}