Added demo truck to soviet's arensal; still problems to fix

OpenRA.Mods.RA/DemoTruck.cs

@@ -8,44 +8,63 @@
  */
 #endregion
 
+using System.Collections.Generic;
+using System.Drawing;
+using OpenRA.Mods.RA.Activities;
+using OpenRA.Mods.RA.Buildings;
+using OpenRA.Mods.RA.Orders;
 using OpenRA.Traits;
 
 namespace OpenRA.Mods.RA
 {
-	class DemoTruckInfo : TraitInfo<DemoTruck> { }
+	// Requiring Explodes is busted.
+	// Exception when overriding Chronoshift event; removed for now, will look into it.
+	class DemoTruckInfo : TraitInfo<DemoTruck> {} //, Requires<Explodes> {}
 
-	class DemoTruck : Chronoshiftable, INotifyKilled
+	class DemoTruck : IIssueOrder, IResolveOrder, IOrderVoice
 	{
-		// Explode on chronoshift
+		void Explode(Actor self)
-		public override bool Teleport(Actor self, CPos targetLocation, int duration, bool killCargo, Actor chronosphere)
 		{
-			Detonate(self, chronosphere);
+			self.World.AddFrameEndTask(w =>
-			return false;
-		}
-
-		// Fire primary on death
-		public void Killed(Actor self, AttackInfo e)
-		{
-			Detonate(self, e.Attacker);
-		}
-
-		public void Detonate(Actor self, Actor detonatedBy)
-		{
-			var move = self.TraitOrDefault<IMove>();
-			var info = self.Info.Traits.Get<AttackBaseInfo>();
-			var altitude = move != null ? move.Altitude : 0;
-
-			self.World.AddFrameEndTask( w =>
 			{
-				if (self.Destroyed) return;
+				self.InflictDamage(self, int.MaxValue, null);
-				Combat.DoExplosion(self, info.PrimaryWeapon, self.CenterLocation, altitude);
+			});
+		}
 
-				// Remove from world
+		public IEnumerable<IOrderTargeter> Orders
-				self.Kill(self);
+		{
-				detonatedBy.Owner.Kills++;
+			get
-				self.Owner.Deaths++;
+			{
-				self.Destroy();
+				yield return new UnitTraitOrderTargeter<Building>("DemoAttack", 5, "attack", true, false) { ForceAttack = false };
-			} );
+				yield return new DeployOrderTargeter("DemoDeploy", 5);
+			}
+		}
+
+		public Order IssueOrder(Actor self, IOrderTargeter order, Target target, bool queued)
+		{
+			if (order.OrderID == "DemoAttack" || order.OrderID == "DemoDeploy")
+				return new Order(order.OrderID, self, queued) { TargetActor = target.Actor };
+
+			return null;
+		}
+
+		public string VoicePhraseForOrder(Actor self, Order order)
+		{
+			return "Attack";
+		}
+
+		public void ResolveOrder(Actor self, Order order)
+		{
+			if (order.OrderString == "DemoDeploy")
+			{
+				self.World.AddFrameEndTask(w =>
+				{
+					self.QueueActivity(new MoveAdjacentTo(Target.FromOrder(order)));
+					self.QueueActivity(new CallFunc(() => Explode(self)));
+				});
+			}
+			if (order.OrderString == "DemoAttack")
+				Explode(self);
 		}
 	}
 }

mods/ra/rules/vehicles.yaml

@@ -514,6 +514,7 @@ TTNK:
 	Inherits: ^Tank
 	Buildable:
 		Queue: Vehicle
+		BuildPaletteOrder: 130
 		Prerequisites: stek,tsla
 		Owner: soviet
 	Valued:
@@ -571,3 +572,33 @@ FTRK:
 		EmptyWeapon: UnitExplodeSmall
 	Selectable:
 		Bounds: 28,28,0,0
+
+DTRK:
+	Inherits: ^Vehicle
+	Buildable:
+		Queue: Vehicle
+		BuildPaletteOrder: 140
+		Prerequisites: stek
+		Owner: soviet
+	Valued:
+		Cost: 1500
+	Tooltip:
+		Name: Demolition Truck
+		Description: Demolition Truck, actively armed with explosives.\n  Strong vs Everything,\n Weak vs Everything
+	Health:
+		HP: 110
+	Armor:
+		Type: Light
+	Mobile:
+		Speed: 8
+	RevealsShroud:
+		Range: 3
+	RenderUnit:
+	AttackMove:
+		JustMove: yes
+	Explodes:
+		Weapon: Atomic
+		EmptyWeapon: Atomic
+	DemoTruck:
+	-IronCurtainable:
+	-Chronoshiftable:

mods/ra/sequences.yaml

@@ -2267,4 +2267,9 @@ e8:
 		Length: 18
 	die6: electro
 		Start: 0
-		Length: *
+		Length: *
+
+dtrk:
+	idle:
+		Start: 0
+		Facings: 32