Progress

Moose Test Missions/GRP - Group Commands/GRP-310 - Command StopRoute/GRP-310 - Command StopRoute.lua

@@ -1,4 +1,5 @@
----GRP-310 - Command StopRouteCAP-001 - Combat Air Patrol
+--- 
+-- Name: GRP-310 - Command StopRoute
 -- Author: FlightControl
 -- Date Created: 25 Mar 2017
 --
@@ -12,7 +13,6 @@
 -- 
 
 --- @param Wrapper.Group#GROUP GroundGroup
--- 
 function StopMove( GroundGroup )
   
   BASE:E("Stop")
@@ -21,6 +21,7 @@ function StopMove( GroundGroup )
 
 end
 
+--- @param Wrapper.Group#GROUP GroundGroup
 function StartMove( GroundGroup )
   
   BASE:E("Start")

Moose Test Missions/GRP - Group Commands/GRP-400 - RouteReturnToAirbase/GRP-400 - RouteReturnToAirbase.lua

@@ -0,0 +1,46 @@
+--- 
+-- Name: GRP-400 - RouteReturnToAirbase
+-- Author: FlightControl
+-- Date Created: 25 Mar 2017
+--
+-- # Situation:
+-- Three air units are flying and are commanded to return a specific airbase.
+-- The return commands are given after 10 seconds.
+-- 
+-- # Test cases:
+-- 
+-- 1. Observe the Air1 group return to Batumi.
+-- 2. Observe the Air2 group returning to Sochi.
+-- 3. Observe the Air3 group returning to the nearest airbase after 120 seconds.
+-- 
+
+--- @param Wrapper.Group#GROUP AirGroup
+function ReturnToBatumi( AirGroup )
+  BASE:E("ReturnToBatumi")
+  AirGroup:RouteReturnToAirbase( AIRBASE:FindByName("Batumi") )
+end
+
+--- @param Wrapper.Group#GROUP AirGroup
+function ReturnToSochi( AirGroup )
+  BASE:E("ReturnToSochi")
+  AirGroup:RouteReturnToAirbase( AIRBASE:FindByName("Sochi-Adler") )
+end
+
+--- @param Wrapper.Group#GROUP AirGroup
+function ReturnToNearest( AirGroup )
+  BASE:E("ReturnToHomeBase")
+  AirGroup:RouteReturnToAirbase()
+end
+
+Air1Group = GROUP:FindByName( "Air1" )
+Air2Group = GROUP:FindByName( "Air2" )
+Air3Group = GROUP:FindByName( "Air3" )
+
+Scheduler = SCHEDULER:New( nil )
+ScheduleIDAir1 = Scheduler:Schedule(nil, ReturnToBatumi, { Air1Group }, 10 )
+ScheduleIDAir2 = Scheduler:Schedule(nil, ReturnToSochi, { Air2Group }, 120 )
+ScheduleIDAir3 = Scheduler:Schedule(nil, ReturnToNearest, { Air3Group }, 120 )
+
+
+
+