Adds a new [location command for easy display of target XYZ (#97)

Projects/Scripts/Commands/LocationCommand.cs

@@ -0,0 +1,52 @@
+using Server.Commands.Generic;
+using Server.Items;
+using Server.Targeting;
+using System.Globalization;
+using System.Linq;
+
+namespace Server.Commands
+{
+  public class LocationCommand : BaseCommand
+  {
+    public LocationCommand() : base()
+    {
+      AccessLevel = AccessLevel.Counselor;
+      Commands = new[] { "Location", "Loc", "Pos" };
+      ObjectTypes = ObjectTypes.All;
+      Supports = CommandSupport.Single | CommandSupport.Multi;
+      Usage = "Location [itemIds ...]";
+      Description = "Retrieves the positional coordinates of a target. Displaying a message above the item, "
+                  + "mobile, or environment. Environment targets will also have a graphic temporarily displayed "
+                  + "on the tile. This graphic can be changed to the provided list of itemIds.";
+    }
+
+    public override void Execute(CommandEventArgs e, object obj)
+    {
+      int[] graphics = new[] { 0x17AF, 0X17B0, 0X17B1, 0X17B2 };
+      if (e.Arguments.Length > 0)
+        graphics = e.Arguments
+          .Select(x => int.TryParse(x, out int result)
+                     ? result : int.TryParse(x.Substring(2), NumberStyles.HexNumber, CultureInfo.CurrentCulture, out result)
+                     ? result : (int?)null)
+          .Where(x => x.HasValue)
+          .Select(x => x.Value)
+          .ToArray();
+      if (obj is IPoint3D point)
+      {
+        var label = $"(x:{point.X}, y:{point.Y}, z:{point.Z})";
+        if (obj is LandTarget || obj is StaticTarget)
+        {
+          var item = EffectItem.Create(new Point3D(point), e.Mobile.Map, EffectItem.DefaultDuration);
+          foreach (int graphic in graphics)
+            Effects.SendLocationParticles(item, graphic, 10, 50, 2023);
+          item.LabelTo(e.Mobile, label);
+        }
+        else if (obj is Mobile entity) entity.SayTo(e.Mobile, label);
+        else if (obj is Item item) item.LabelTo(e.Mobile, label);
+        AddResponse($"Location: {label}");
+      }
+      else
+        LogFailure("That is not locatable.");
+    }
+  }
+}