[Commands] Consolidate #set-like commands into a singular #set command (#3486)

* First push

* Final push.

* Consolidate zone commands in to one.

* Update command.cpp

* Remove debug messages.

* Test

* Add support for sub command status levels.

* Update command.cpp

* Update client.cpp

* Update database_update_manifest.cpp

* Update version.h

* Update item.cpp

* Update version.h

* Update database_update_manifest.cpp

* Fix command arguments.

* Help message.

* Update command.cpp

* Do DB injection/deletion

* Indent

* Update server_locked.cpp

* Update set.cpp

* Lock aliases

* Update command_subsettings_repository.h

* Update set.cpp

* Fix

---------

Co-authored-by: Akkadius <akkadius1@gmail.com>

zone/gm_commands/set/hero_model.cpp

@@ -0,0 +1,44 @@
+#include "../../client.h"
+
+void SetHeroModel(Client *c, const Seperator *sep)
+{
+	const auto arguments = sep->argnum;
+	if (arguments < 2 || !sep->IsNumber(2)) {
+		c->Message(Chat::White, "Usage: #set hero_model [Hero Model]");
+		c->Message(Chat::White, "Usage: #set hero_model [Hero Model] [Slot]");
+		c->Message(
+			Chat::White,
+			fmt::format(
+				"Example: {}",
+				Saylink::Silent("#heromodel 63")
+			).c_str()
+		);
+		return;
+	}
+
+	Mob* t = c;
+	if (c->GetTarget()) {
+		t = c->GetTarget();
+	}
+
+	uint32 hero_forge_model = Strings::ToUnsignedInt(sep->arg[2]);
+
+	if (arguments > 2) {
+		const uint8 slot = Strings::ToUnsignedInt(sep->arg[3]);
+		c->GetTarget()->SendTextureWC(slot, 0, hero_forge_model, 0, 0, 0);
+	} else {
+		if (!hero_forge_model) {
+			c->Message(Chat::White, "Hero's Forge Model must be greater than 0.");
+			return;
+		}
+
+		// Conversion to simplify the command arguments
+		// Hero's Forge model is actually model * 1000 + texture * 100 + wearslot
+		// Hero's Forge Model slot 7 is actually for Robes, but it still needs to use wearslot 1 in the packet
+		hero_forge_model *= 100;
+
+		for (uint8 slot = 0; slot < 7; slot++) {
+			c->GetTarget()->SendTextureWC(slot, 0, (hero_forge_model + slot), 0, 0, 0);
+		}
+	}
+}