MOOSE demonstration missions [skip ci]

AID - AI Dispatching/AID-A2A - AI A2A Dispatching/AID-A2A-050 - Resources/AID-A2A-050 - Resources.lua

@@ -38,30 +38,31 @@ A2ADispatcher:SetSquadronOverhead( "Mineralnye", 1.2 )
 A2ADispatcher:SetSquadronGrouping( "Mineralnye", 1 )
 
 -- Setup the Takeoff methods
-A2ADispatcher:SetSquadronTakeoff( "Mineralnye", AI_A2A_DISPATCHER.Takeoff.Air )
+A2ADispatcher:SetSquadronTakeoff( "Mineralnye", AI_A2A_DISPATCHER.Takeoff.Hot )
 
 -- Setup the Landing methods
-A2ADispatcher:SetSquadronLandingAtRunway( "Mineralnye" )
+A2ADispatcher:SetSquadronLandingAtEngineShutdown( "Mineralnye" )
 
 
+-- Setup the visibility before start.
+A2ADispatcher:SetSquadronVisible( "Mineralnye" )
+
 -- CAP Squadron execution.
---CAPZoneEast = ZONE_POLYGON:New( "CAP Zone East", GROUP:FindByName( "CAP Zone East" ) )
---A2ADispatcher:SetSquadronCap( "Mineralnye", CAPZoneEast, 4000, 10000, 500, 600, 800, 900 )
---A2ADispatcher:SetSquadronCapInterval( "Mineralnye", 2, 30, 60, 1 )
+CAPZoneEast = ZONE_POLYGON:New( "CAP Zone East", GROUP:FindByName( "CAP Zone East" ) )
+A2ADispatcher:SetSquadronCap( "Mineralnye", CAPZoneEast, 4000, 10000, 500, 600, 800, 900 )
+A2ADispatcher:SetSquadronCapInterval( "Mineralnye", 1, 30, 60, 1 )
+A2ADispatcher:SetSquadronFuelThreshold( "Mineralnye", 0.20 )
 
 -- GCI Squadron execution.
-A2ADispatcher:SetSquadronGci( "Mineralnye", 900, 1200 )
-
-CleanUp = CLEANUP_AIRBASE:New( { AIRBASE.Caucasus.Novorossiysk } )
-
+--A2ADispatcher:SetSquadronGci( "Mineralnye", 900, 1200 )
 
 -- Blue attack simulation
 local Frequency = 60
 
-BlueSpawn1 = SPAWN
-  :New( "RT NATO 1" )
-  :InitLimit( 2, 10 )
-  :InitRandomizeTemplate( { "SQ NATO A-10C", "SQ NATO F-15C", "SQ NATO F-16A", "SQ NATO F/A-18", "SQ NATO F-16C" } )
-  :InitRandomizeRoute( 0, 0, 30000 )
-  --:InitDelayOn()
-  :SpawnScheduled( Frequency, 0.4 )
+--BlueSpawn1 = SPAWN
+--  :New( "RT NATO 1" )
+--  :InitLimit( 2, 10 )
+--  :InitRandomizeTemplate( { "SQ NATO A-10C", "SQ NATO F-15C", "SQ NATO F-16A", "SQ NATO F/A-18", "SQ NATO F-16C" } )
+--  :InitRandomizeRoute( 0, 0, 30000 )
+--  --:InitDelayOn()
+--  :SpawnScheduled( Frequency, 0.4 )

AID - AI Dispatching/AID-A2A - AI A2A Dispatching/AID-A2A-100 - Demonstration/AID-A2A-100 - Demonstration.lua

@@ -26,30 +26,30 @@ A2ADispatcher:SetBorderZone( CCCPBorderZone )
 
 -- Initialize the dispatcher, setting up a radius of 100km where any airborne friendly 
 -- without an assignment within 100km radius from a detected target, will engage that target.
-A2ADispatcher:SetEngageRadius( 80000 )
+A2ADispatcher:SetEngageRadius( 120000 )
 
 -- Setup the squadrons.
-A2ADispatcher:SetSquadron( "Mineralnye", AIRBASE.Caucasus.Mineralnye_Vody, { "SQ CCCP SU-27" }, 20 )
+A2ADispatcher:SetSquadron( "Mineralnye", AIRBASE.Caucasus.Mineralnye_Vody, { "SQ CCCP SU-27", "SQ CCCP SU-33", "SQ CCCP MIG-23MLD", "SQ CCCP MIG-25PD" }, 16 )
 A2ADispatcher:SetSquadron( "Maykop", AIRBASE.Caucasus.Maykop_Khanskaya, { "SQ CCCP MIG-31" }, 20 )
-A2ADispatcher:SetSquadron( "Mozdok", AIRBASE.Caucasus.Mozdok, { "SQ CCCP MIG-31" }, 20 )
-A2ADispatcher:SetSquadron( "Sochi", AIRBASE.Caucasus.Sochi_Adler, { "SQ CCCP SU-27" }, 20 )
-A2ADispatcher:SetSquadron( "Novo", AIRBASE.Caucasus.Novorossiysk, { "SQ CCCP SU-27" }, 20 )
+A2ADispatcher:SetSquadron( "Mozdok", AIRBASE.Caucasus.Mozdok, { "SQ CCCP MIG-31" }, 16 )
+A2ADispatcher:SetSquadron( "Sochi", AIRBASE.Caucasus.Sochi_Adler, { "SQ CCCP SU-27", "SQ CCCP SU-33", "SQ CCCP MIG-23MLD", "SQ CCCP MIG-25PD", "SQ CCCP SU-34", "SQ CCCP MIG-31", "SQ CCCP MIG-29S" }, 40 )
+A2ADispatcher:SetSquadron( "Novo", AIRBASE.Caucasus.Novorossiysk, { "SQ CCCP SU-27" }, 16 )
 
 -- Setup the overhead
 A2ADispatcher:SetSquadronOverhead( "Mineralnye", 1.2 )
 A2ADispatcher:SetSquadronOverhead( "Maykop", 1 )
 A2ADispatcher:SetSquadronOverhead( "Mozdok", 1 )
-A2ADispatcher:SetSquadronOverhead( "Sochi", 1 )
+A2ADispatcher:SetSquadronOverhead( "Sochi", 2 )
 A2ADispatcher:SetSquadronOverhead( "Novo", 1.5 )
 
 -- Setup the Grouping
-A2ADispatcher:SetSquadronGrouping( "Mineralnye", 1 )
+A2ADispatcher:SetSquadronGrouping( "Mineralnye", 4 )
 A2ADispatcher:SetSquadronGrouping( "Sochi", 2 )
 A2ADispatcher:SetSquadronGrouping( "Novo", 3 )
 
 -- Setup the Takeoff methods
-A2ADispatcher:SetSquadronTakeoff( "Mineralnye", AI_A2A_DISPATCHER.Takeoff.Air )
-A2ADispatcher:SetSquadronTakeoffInAir( "Sochi" )
+A2ADispatcher:SetSquadronTakeoff( "Mineralnye", AI_A2A_DISPATCHER.Takeoff.Hot )
+A2ADispatcher:SetSquadronTakeoffFromParkingHot( "Sochi" )
 A2ADispatcher:SetSquadronTakeoffFromRunway( "Mozdok" )
 A2ADispatcher:SetSquadronTakeoffFromParkingCold( "Maykop" )
 A2ADispatcher:SetSquadronTakeoffFromParkingHot( "Novo" )
@@ -65,7 +65,7 @@ A2ADispatcher:SetSquadronLanding( "Novo", AI_A2A_DISPATCHER.Landing.AtRunway )
 -- CAP Squadron execution.
 CAPZoneEast = ZONE_POLYGON:New( "CAP Zone East", GROUP:FindByName( "CAP Zone East" ) )
 A2ADispatcher:SetSquadronCap( "Mineralnye", CAPZoneEast, 4000, 10000, 500, 600, 800, 900 )
-A2ADispatcher:SetSquadronCapInterval( "Mineralnye", 2, 30, 60, 1 )
+A2ADispatcher:SetSquadronCapInterval( "Mineralnye", 6, 30, 60, 1 )
 
 CAPZoneWest = ZONE_POLYGON:New( "CAP Zone West", GROUP:FindByName( "CAP Zone West" ) )
 A2ADispatcher:SetSquadronCap( "Sochi", CAPZoneWest, 4000, 8000, 600, 800, 800, 1200, "BARO" )
@@ -80,7 +80,15 @@ A2ADispatcher:SetSquadronGci( "Mozdok", 900, 1200 )
 A2ADispatcher:SetSquadronGci( "Novo", 900, 2100 )
 A2ADispatcher:SetSquadronGci( "Maykop", 900, 1200 )
 
-CleanUp = CLEANUP_AIRBASE:New( { AIRBASE.Caucasus.Novorossiysk } )
+-- Set the squadrons visible before startup.
+A2ADispatcher:SetSquadronVisible( "Mineralnye" )
+A2ADispatcher:SetSquadronVisible( "Sochi" )
+A2ADispatcher:SetSquadronVisible( "Mozdok" )
+A2ADispatcher:SetSquadronVisible( "Maykop" )
+--A2ADispatcher:SetSquadronVisible( "Novo" )
+
+
+--CleanUp = CLEANUP_AIRBASE:New( { AIRBASE.Caucasus.Novorossiysk } )
 
 
 -- Blue attack simulation

AID - AI Dispatching/AID-A2G - AI A2G Dispatching/AID-A2G-003 - DefenseRadius/AID-A2G-003 - DefenseRadius.lua

@@ -0,0 +1,36 @@
+--- Test the defense radius.
+-- Defenses should pickup targets within the defense radius, but not outside of it!
+-- Defenses should engage targets closer to the HQ with higher probability than targets at longer distance from the HQ.
+-- The tests are with SEAD only.
+-- Name: AID-A2G-003 - DefenseRadius
+-- Author: FlightControl
+-- Date Created: 11 Nov 2018
+
+-- Define a SET_GROUP object that builds a collection of groups that define the recce network.
+-- Here we build the network with all the groups that have a name starting with CCCP Recce.
+DetectionSetGroup = SET_GROUP:New()
+DetectionSetGroup:FilterPrefixes( { "CCCP Recce" } )
+DetectionSetGroup:FilterStart()
+
+Detection = DETECTION_AREAS:New( DetectionSetGroup, 1000 )
+
+-- Setup the A2A dispatcher, and initialize it.
+A2GDispatcher = AI_A2G_DISPATCHER:New( Detection )
+
+-- Add defense coordinates.
+A2GDispatcher:AddDefenseCoordinate( "HQ", GROUP:FindByName( "HQ" ):GetCoordinate() )
+
+A2GDispatcher:SetDefenseReactivityHigh()
+
+A2GDispatcher:SetDefenseRadius( 100000 )
+
+A2GDispatcher:SetTacticalDisplay( true )
+
+local PatrolZone = ZONE:New( "PatrolZone" )
+
+-- Setup the squadrons.
+A2GDispatcher:SetSquadron( "Maykop SEAD", AIRBASE.Caucasus.Maykop_Khanskaya, { "CCCP SU-25T SEAD" }, 10 )
+A2GDispatcher:SetSquadronSeadPatrol( "Maykop SEAD", PatrolZone, 1000, 2500, 400, 600, 1100, 1500 )
+A2GDispatcher:SetSquadronSeadPatrolInterval( "Maykop SEAD", 4, 30, 60, 1 )
+A2GDispatcher:SetSquadronTakeoffInAir( "Maykop SEAD" )
+A2GDispatcher:SetSquadronOverhead( "Maykop SEAD", 0.25 )