Merge pull request #3233 from ScottNZ/follow

Add unit following/guarding

OpenRA.Mods.RA/Guard.cs

@@ -0,0 +1,98 @@
+#region Copyright & License Information
+/*
+ * Copyright 2007-2013 The OpenRA Developers (see AUTHORS)
+ * This file is part of OpenRA, which is free software. It is made
+ * available to you under the terms of the GNU General Public License
+ * as published by the Free Software Foundation. For more information,
+ * see COPYING.
+ */
+#endregion
+
+using System.Collections.Generic;
+using System.Drawing;
+using System.Linq;
+using OpenRA.Graphics;
+using OpenRA.Mods.RA.Activities;
+using OpenRA.Mods.RA.Move;
+using OpenRA.Traits;
+
+namespace OpenRA.Mods.RA
+{
+	class GuardInfo : TraitInfo<Guard>, Requires<MobileInfo> { }
+
+	class Guard : IResolveOrder, IOrderVoice
+	{
+		public void ResolveOrder(Actor self, Order order)
+		{
+			if (order.OrderString == "Guard")
+			{
+				var target = Target.FromActor(order.TargetActor);
+				self.SetTargetLine(target, Color.Yellow);
+				self.QueueActivity(false, new AttackMove.AttackMoveActivity(self,
+					new Follow(target, target.Actor.Info.Traits.Get<GuardableInfo>().Range)));
+			}
+		}
+
+		public string VoicePhraseForOrder(Actor self, Order order)
+		{
+			return order.OrderString == "Guard" ? "Move" : null;
+		}
+	}
+
+	class GuardOrderGenerator : IOrderGenerator
+	{
+		readonly IEnumerable<Actor> subjects;
+
+		public GuardOrderGenerator(IEnumerable<Actor> subjects)
+		{
+			this.subjects = subjects;
+		}
+
+		public IEnumerable<Order> Order(World world, CPos xy, MouseInput mi)
+		{
+			if (mi.Button == Game.mouseButtonPreference.Cancel)
+			{
+				world.CancelInputMode();
+				yield break;
+			}
+
+			var target = FriendlyGuardableUnitsAtMouse(world, mi).FirstOrDefault();
+
+			if (target == null || subjects.All(s => s.IsDead()))
+				yield break;
+
+			foreach (var actor in subjects)
+				yield return new Order("Guard", actor, false) { TargetActor = target };
+		}
+
+		public void Tick(World world)
+		{
+			if (subjects.All(s => s.IsDead() || !s.HasTrait<Guard>()))
+				world.CancelInputMode();
+		}
+
+		public void RenderBeforeWorld(WorldRenderer wr, World world) { }
+		public void RenderAfterWorld(WorldRenderer wr, World world) { }
+
+		public string GetCursor(World world, CPos xy, MouseInput mi)
+		{
+			return world.Map.IsInMap(xy)
+				&& FriendlyGuardableUnitsAtMouse(world, mi).Any()
+				? "guard"
+				: "move-blocked";
+		}
+
+		static IEnumerable<Actor> FriendlyGuardableUnitsAtMouse(World world, MouseInput mi)
+		{
+			return world.FindUnitsAtMouse(mi.Location)
+				.Where(a => !a.IsDead() && a.AppearsFriendlyTo(world.LocalPlayer.PlayerActor) && a.HasTrait<Guardable>());
+		}
+	}
+
+	class GuardableInfo : TraitInfo<Guardable>
+	{
+		public readonly int Range = 2;
+	}
+
+	class Guardable { }
+}

OpenRA.Mods.RA/OpenRA.Mods.RA.csproj

@@ -1,4 +1,4 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
   <PropertyGroup>
     <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
@@ -229,6 +229,7 @@
     <Compile Include="GainsExperience.cs" />
     <Compile Include="GivesBounty.cs" />
     <Compile Include="GivesExperience.cs" />
+    <Compile Include="Guard.cs" />
     <Compile Include="Harvester.cs" />
     <Compile Include="HarvesterHuskModifier.cs" />
     <Compile Include="Husk.cs" />

OpenRA.Mods.RA/Widgets/Logic/SettingsMenuLogic.cs

@@ -208,6 +208,10 @@ namespace OpenRA.Mods.RA.Widgets.Logic
 			SetupKeyBinding(deployKey, "Deploy:", () => keyConfig.DeployKey, k => keyConfig.DeployKey = k);
 			unitCommandHotkeyList.AddChild(deployKey);
 
+			var guardKey = ScrollItemWidget.Setup(unitCommandHotkeyTemplate, () => false, () => { });
+			SetupKeyBinding(guardKey, "Guard: ", () => keyConfig.GuardKey, k => keyConfig.GuardKey = k);
+			unitCommandHotkeyList.AddChild(guardKey);
+
 			// Debug
 			var debug = bg.Get("DEBUG_PANE");
 

OpenRA.Mods.RA/Widgets/WorldCommandWidget.cs

@@ -70,6 +70,9 @@ namespace OpenRA.Mods.RA.Widgets
 
 				if (e.KeyName == Game.Settings.Keys.StanceCycleKey)
 					return PerformStanceCycle();
+
+				if (e.KeyName == Game.Settings.Keys.GuardKey)
+					return PerformGuard();
 			}
 
 			return false;
@@ -79,12 +82,11 @@ namespace OpenRA.Mods.RA.Widgets
 
 		bool PerformAttackMove()
 		{
-			var actors = World.Selection.Actors
-				.Where(a => a.Owner == World.LocalPlayer).ToArray();
+			var actors = World.Selection.Actors.Where(a => a.Owner == World.LocalPlayer).ToArray();
 
-			if (actors.Length > 0)
-				World.OrderGenerator = new GenericSelectTarget(actors, "AttackMove",
-				                                               "attackmove", Game.mouseButtonPreference.Action);
+			if (actors.Any())
+				World.OrderGenerator = new GenericSelectTarget(actors,
+					"AttackMove", "attackmove", Game.mouseButtonPreference.Action);
 
 			return true;
 		}
@@ -146,6 +148,16 @@ namespace OpenRA.Mods.RA.Widgets
 			return true;
 		}
 
+		bool PerformGuard()
+		{
+			var actors = World.Selection.Actors.Where(a => a.Owner == World.LocalPlayer && a.HasTrait<Guard>());
+
+			if (actors.Any())
+				World.OrderGenerator = new GuardOrderGenerator(actors);
+
+			return true;
+		}
+
 		bool CycleBases()
 		{
 			var bases = World.ActorsWithTrait<BaseBuilding>()