Removed depreciated location saving functions.

Removed depreciated location saving functions.  Removed duplicate `prc_combatmove.nss` from top hak.  Full compile.  Updated release archive.

_haks/poa_top/prc_combatmove.nss

@@ -1,66 +0,0 @@
-//::///////////////////////////////////////////////
-//:: Combat Maneuver calling script: 
-//:: prc_combatmove
-//::///////////////////////////////////////////////
-/** @file
-    Relies on prc_inc_combmove to do various things
-    This is only for the basic maneuvers, special 
-    versions of these things should be called from
-    their own scripts.
-
-    Things:
-    Trip
-    Bullrush
-    Charge
-    Overrun
-    Disarm
-    Shield Bash
-
-    @author Stratovarius
-    @date   Created - 2018.9.18
-*/
-//:://////////////////////////////////////////////
-//:://////////////////////////////////////////////
-
-#include "prc_inc_combmove"
-
-void main()
-{
-    object oPC = OBJECT_SELF;
-    object oTarget = PRCGetSpellTargetObject();
-    location lTarget = PRCGetSpellTargetLocation();
-    int nMoveType = PRCGetSpellId();
-    
-    if (oTarget == oPC) return; // No hitting yourself
-    if (GetLocalInt(oPC, "CombatLoopProtection")) return; // Stop the damn loop
-    
-    //FloatingTextStringOnCreature("MoveID: "+IntToString(nMoveType), oPC, FALSE);
-   
-    if (nMoveType == COMBAT_CHARGE)
-        DoCharge(oPC, oTarget);
-    else if (nMoveType == COMBAT_CHARGE_BULL_RUSH)
-        DoCharge(oPC, oTarget, FALSE, TRUE, 0, -1, TRUE); 
-    else if (nMoveType == COMBAT_BULL_RUSH)
-        DoBullRush(oPC, oTarget, 0);   
-    else if (nMoveType == COMBAT_TRIP)
-        DoTrip(oPC, oTarget, 0);    
-    else if (nMoveType == COMBAT_OVERRUN)
-        DoOverrun(oPC, oTarget, lTarget);  
-    else if (nMoveType == COMBAT_DISARM)
-        DoDisarm(oPC, oTarget);        
-    else if (nMoveType == COMBAT_SHIELD_BASH)
-        DoShieldBash(oPC, oTarget);    
-    else if (nMoveType == COMBAT_SHIELD_CHARGE)
-        DoShieldCharge(oPC, oTarget);       
-    else if (nMoveType == COMBAT_SHIELD_SLAM)
-    {
-    	// If we're far enough away, charge, else, slam
-    	if (MetersToFeet(GetDistanceBetweenLocations(GetLocation(oPC), GetLocation(oTarget))) >= 10.0)
-        	DoShieldCharge(oPC, oTarget, TRUE);
-        else
-        	DoShieldBash(oPC, oTarget, 0, 0, 0, FALSE, FALSE, TRUE);
-    }    
-    
-    SetLocalInt(oPC, "CombatLoopProtection", TRUE);
-    DelayCommand(4.0, DeleteLocalInt(oPC, "CombatLoopProtection"));
-}

_module/are/labyrinth_undead.are.json

@@ -44197,7 +44197,7 @@
   },
   "Version": {
     "type": "dword",
-    "value": 32
+    "value": 33
   },
   "Width": {
     "type": "int",

_module/are/townofascension.are.json

@@ -6357,7 +6357,7 @@
   },
   "Version": {
     "type": "dword",
-    "value": 512
+    "value": 513
   },
   "Width": {
     "type": "int",

_module/itp/creaturepalcus.itp.json

@@ -3891,6 +3891,30 @@
                 "type": "byte",
                 "value": 49
               },
+              "LIST": {
+                "type": "list",
+                "value": [
+                  {
+                    "__struct_id": 0,
+                    "CR": {
+                      "type": "float",
+                      "value": 52.0
+                    },
+                    "FACTION": {
+                      "type": "cexostring",
+                      "value": "Hostile"
+                    },
+                    "NAME": {
+                      "type": "cexostring",
+                      "value": "Pwnz3r Rat"
+                    },
+                    "RESREF": {
+                      "type": "resref",
+                      "value": "pwnz3rat"
+                    }
+                  }
+                ]
+              },
               "STRREF": {
                 "type": "dword",
                 "value": 63246
@@ -31310,25 +31334,6 @@
                       "value": 12722
                     }
                   },
-                  {
-                    "__struct_id": 0,
-                    "CR": {
-                      "type": "float",
-                      "value": 52.0
-                    },
-                    "FACTION": {
-                      "type": "cexostring",
-                      "value": "Hostile"
-                    },
-                    "NAME": {
-                      "type": "cexostring",
-                      "value": "Pwnz3r Rat"
-                    },
-                    "RESREF": {
-                      "type": "resref",
-                      "value": "pwnz3rat"
-                    }
-                  },
                   {
                     "__struct_id": 0,
                     "CR": {

_module/nss/onpclevelup.nss

@@ -47,7 +47,7 @@ if (!GetIsPC(oPC)) return;
 
 //If in the guild only!
 //If they are in the guild...
-if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
+/* if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID) <- location handled by PRC8 now
 {
 if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
 {
@@ -59,7 +59,7 @@ if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
       //Tell the PC thier location was saved..
       SendMessageToPC(oPC, "Location Saved.");
 }
-}
+} */
 ////////////AUTOMATIC CHARACTER SAVING ON LEVEL UP OPTION///////////////////
 //Delete the // on the next 2 lines below to activate Automatic Character Saving.
 if(IsShifterMorphed(oPC)!=1)

_module/nss/onplayerlevelup.nss

@@ -59,7 +59,7 @@ void main()
 
 //If in the guild only!
 //If they are in the guild...
-	if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
+/* 	if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
 	{
 		if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
 		{
@@ -71,7 +71,7 @@ void main()
 		  //Tell the PC thier location was saved..
 			SendMessageToPC(oPC, "Location Saved.");
 		}
-	}
+	} */
 
 // (DO NOT TOUCH THIS LINE!) */
 

_module/nss/onplayerrest.nss

@@ -101,19 +101,19 @@ int nHD = GetHitDice(oPC);
 
 //For the guild only!
 //If they are in the guild...
-if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
+/* if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
 {
-if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
+	if(GetArea(GetAreaFromLocation(lSaved))!= OBJECT_INVALID)
-{
+	{
-  object oGuild = GetItemPossessedBy(oPC, "guildstone");
+		object oGuild = GetItemPossessedBy(oPC, "guildstone");
 
-     //Store the PC's location, so they can come back here after relogging
+		//Store the PC's location, so they can come back here after relogging
-     SetCampaignLocation("LOCATIONS", GetName(oGuild), lSaved, oPC);
+		SetCampaignLocation("LOCATIONS", GetName(oGuild), lSaved, oPC);
 
-     //Tell the PC their location was saved..
+		//Tell the PC their location was saved..
-     SendMessageToPC(oPP, "Location Saved!");
+		SendMessageToPC(oPP, "Location Saved!");
-}
+	}
-}
+} */
 
 //************CLEAR THE PC'S REPUTATION WITH ALL NPCS*****************
 if(GetIsPC(oPlayer))

_module/nss/savecharacters.nss

@@ -35,9 +35,9 @@ string sName = GetStringLeft(GetName(oPP), 20);
 location lSaved = GetLocation(oPP);
 int MULTI_PLAYER = GetLocalInt(GetModule(), "multi");
 
-while(GetIsObjectValid(oPP))
+/*while(GetIsObjectValid(oPP))
 {
-//If they are in the guild...
+ //If they are in the guild...
 if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)
 {
 //Let's make sure their area is valid!
@@ -55,8 +55,8 @@ if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
 else
 {
 SendMessageToPC(oPP, "Your location was NOT saved, you need to rest to save your location.");
-}
+} 
-}
+}*/
 
  //If the PC is not polymorphed save their character as well!
  if(IsShifterMorphed(oPP)==FALSE)
@@ -75,7 +75,7 @@ SendMessageToPC(oPP, "Your location was NOT saved, you need to rest to save your
  }
 
 oPP = GetNextPC();
-}
+//}
 
 SendMessageToPC(GetPCLevellingUp(), "All characters on the server are saved when any character levels up.");
 string oDM = (GetPCPlayerName(GetPCLevellingUp())+" has leveled. All characters saved.");

_module/nss/savecharacters2.nss

@@ -36,7 +36,7 @@ int MULTI_PLAYER = GetLocalInt(GetModule(), "multi");
 while(GetIsObjectValid(oPP))
 {
 //If they are in the guild...
-if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)
+/* if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)  <- Location handled by PRC8 now
 {
  //Let's make sure their area is valid!
  if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
@@ -54,7 +54,7 @@ if(GetItemPossessedBy(oPP, "guildpass")!=OBJECT_INVALID)
  else
  {
   SendMessageToPC(oPP, "Your location was NOT saved, you need to rest to save your location.");
- }
+ } */
 }
 
 //If the PC is not polymorphed save their character as well!
@@ -74,7 +74,7 @@ else
  }
 
 oPP = GetNextPC();
-}
+//}
 
 SendMessageToPC(GetPCSpeaker(), "All characters on the server have been saved.");
 SendMessageToAllDMs("All characters saved at Rowan Tree.");

_module/nss/savepcinfo.nss

@@ -51,7 +51,7 @@ void main()
   lSaved = GetLocation(oPC);
 
   //If they are in the guild...
-  if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
+/*   if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID) <- Handled by PRC8 now
   {
     //Let's make sure their area is valid!
     if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
@@ -69,7 +69,7 @@ void main()
     else
     {
     SendMessageToPC(oPC, "Your location was NOT saved, you need to rest to save your location.");
-    }
+    } */
   }
 
    //Make their death log empty again if they aren't dead..
@@ -94,4 +94,4 @@ void main()
  }
 
 //End Script
-}
+//}

_module/nss/voyageskip.nss

@@ -69,7 +69,7 @@ while (GetIsObjectValid(oItem))
 }
 //  */
 
-//We should delay this to allow them to logg on first!
+//We should delay this to allow them to log on first!
 DelayCommand(0.2, DoJump(oPC));
 
 
@@ -93,15 +93,15 @@ object oGuild = GetItemPossessedBy(oPC, "guildstone");
 location lSaved;
 
 
-     //Store the PC's location, so they can come back here after relogging
+     //Store the PC's location, so they can come back here after relogging  <- Handled by PRC8
-     if(oGuild != OBJECT_INVALID)
+/*      if(oGuild != OBJECT_INVALID)
      {
       lSaved = GetCampaignLocation("LOCATIONS", GetName(oGuild), oPC);
      }
      else
      {
       lSaved = GetLocation(GetWaypointByTag("guildway"));
-     }
+     } */
 
 
 //If it's a DM
@@ -123,25 +123,25 @@ if(GetIsDM(oPC))
 
 ///////////////////////////////////////////////////////////////////////
 
-//If they are in the guild...
+//If they are in the guild...  <- Not restricted to guild anymore
-else if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
+/* else if(GetItemPossessedBy(oPC, "guildpass")!=OBJECT_INVALID)
 {
- //Only guild can return to where their location was saved..
+	//Only guild can return to where their location was saved..
- //This reduces lagg and keeps the database smaller...
+	//This reduces lagg and keeps the database smaller...
- if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
+	if(GetArea(GetAreaFromLocation(lSaved))!=OBJECT_INVALID)
- {
+	{
-  DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
+		DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
-  DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(lSaved)));
+		DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(lSaved)));
- }
+	}
 
- //Otherwise jump the pc to town - Just In Case!
+	//Otherwise jump the pc to town - Just In Case!
- else
+	else
- {
+	{
-   DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
+		DelayCommand(0.1, AssignCommand(oPC, ClearAllActions()));
-   DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(guild)));
+		DelayCommand(0.2, AssignCommand(oPC, ActionJumpToLocation(guild)));
- }
+	}
 
-}
+} */
 
 ////////////////////////////////////////////////////////////////////////////
 else

_module/utc/pwnz3rat.utc.json

@@ -573,7 +573,7 @@
   },
   "PaletteID": {
     "type": "byte",
-    "value": 4
+    "value": 49
   },
   "PerceptionRange": {
     "type": "byte",