Further updating of Demonstration Missions

Moose Test Missions/AIB - AI Balancing/AIB-001 - Spawned AI/AIB-001 - Spawned AI.lua

@@ -0,0 +1,35 @@
+--- AI Spawning and Decomissioning
+-- 
+-- ===
+-- 
+-- Name: Spawned AI
+-- Author: FlightControl
+-- Date Created: 07 Dec 2016
+--
+-- # Situation:
+--
+-- For the red coalition, 2 client slots are foreseen.
+-- We test the AI spawning frequency, validating the number of spawned AI, 
+-- matching the amount of players that not have joined the mission.
+-- When players join, AI should fly to the nearest home base.
+-- 
+-- # Test cases:
+-- 
+-- 1. If no player is logging into the red slots, 2 red AI planes should be alive.
+-- 2. If a player joins one red slot, one red AI plane should return to the nearest home base.
+-- 3. If two players join the red slots, no AI plane should be spawned, and all airborne AI planes should return to the nearest home base.
+--
+-- # Status: TESTED 07 Dec 2016
+-- 
+-- @module TEST.AIBALANCER.T001
+
+-- Define the SET of CLIENTs from the red coalition. This SET is filled during startup.
+local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCategories( "plane" ):FilterStart()
+
+-- Define the SPAWN object for the red AI plane template.
+-- We use InitCleanUp to check every 20 seconds, if there are no planes blocked at the airbase, waithing for take-off.
+-- If a blocked plane exists, this red plane will be ReSpawned.
+local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 )
+
+-- Start the AIBALANCER, using the SET of red CLIENTs, and the SPAWN object as a parameter.
+local RU_AIBalancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn )

Moose Test Missions/AIB - AI Balancing/AIB-002 - Patrol AI/AIB-002 - Patrol AI.lua

@@ -0,0 +1,49 @@
+--- AI Patrolling
+-- 
+-- ===
+-- 
+-- Name: Patrol AI
+-- Author: FlightControl
+-- Date Created: 7 December 2016
+--
+-- # Situation:
+--
+-- For the red coalition, 2 client slots are foreseen.
+-- For those players that have not joined the mission, red AI is spawned.
+-- The red AI should start patrolling an area until fuel is empty and return to the home base.
+-- 
+-- # Test cases:
+-- 
+-- 1. If no player is logging into the red slots, 2 red AI planes should be alive.
+-- 2. If a player joins one red slot, one red AI plane should return to the nearest home base.
+-- 3. If two players join the red slots, no AI plane should be spawned, and all airborne AI planes should return to the nearest home base.
+-- 4. Spawned AI should take-off from the airbase, and start patrolling the area around Anapa.
+-- 5. When the AI is out-of-fuel, it should report it is returning to the home base, and land at Anapa.
+-- 
+-- # Status: DEVELOP 07 Dec 2016
+--
+-- @module TEST.AIBALANCER.T002
+
+-- Define the SET of CLIENTs from the red coalition. This SET is filled during startup.
+local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCategories( "plane" ):FilterStart()
+
+-- Define the SPAWN object for the red AI plane template.
+-- We use InitCleanUp to check every 20 seconds, if there are no planes blocked at the airbase, waithing for take-off.
+-- If a blocked plane exists, this red plane will be ReSpawned.
+local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 )
+
+-- Start the AIBALANCER, using the SET of red CLIENTs, and the SPAWN object as a parameter.
+local RU_AIBalancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn )
+
+function RU_AIBalancer:OnAfterSpawned( SetGroup, Event, From, To, AIGroup )
+
+  local PatrolZoneGroup = GROUP:FindByName( "PatrolZone" )
+  local PatrolZone = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup )
+
+
+  local Patrol = PATROLZONE:New( PatrolZone, 3000, 6000, 400, 600 )
+  Patrol:ManageFuel( 0.2, 60 )
+  Patrol:SetControllable( AIGroup )
+  Patrol:__Start( 5 )
+ 
+end

Moose Test Missions/AIB - AI Balancing/AIB-003 - Two coalitions InitCleanUp test/AIB-003 - Two coalitions InitCleanUp test.lua

@@ -0,0 +1,24 @@
+
+local US_PlanesClientSet = SET_CLIENT:New():FilterCountries( "USA" ):FilterCategories( "plane" ):FilterStart()
+
+local US_PlanesSpawn = SPAWN:New( "AI US" ):InitCleanUp( 20 )
+local US_AIBalancer = AIBALANCER:New( US_PlanesClientSet, US_PlanesSpawn )
+
+local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCategories( "plane" ):FilterStart()
+local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 )
+local RU_AIBalancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn )
+
+local RU_AirbasesSet = SET_AIRBASE:New():FilterCoalitions("red"):FilterStart()
+RU_AirbasesSet:Flush()
+RU_AIBalancer:ReturnToNearestAirbases( 10000, RU_AirbasesSet )
+--RU_AIBalancer:ReturnToHomeAirbase( 10000 )
+
+--local PatrolZoneGroup = GROUP:FindByName( "Patrol Zone Blue" )
+--local PatrolZoneBlue = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup )
+--local PatrolZoneB = PATROLZONE:New( PatrolZoneBlue, 3000, 6000, 900, 1100 ):ManageFuel( 0.2, 180 )
+--US_AIBalancer:SetPatrolZone( PatrolZoneB )
+--
+--local PatrolZoneGroup = GROUP:FindByName( "Patrol Zone Red" )
+--local PatrolZoneRed = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup )
+--local PatrolZoneR = PATROLZONE:New( PatrolZoneRed, 3000, 6000, 900, 1100 ):ManageFuel( 0.2, 180 )
+--RU_AIBalancer:SetPatrolZone( PatrolZoneR )