mirror of
https://github.com/FlightControl-Master/MOOSE_MISSIONS.git
synced 2025-08-15 10:37:46 +00:00
49 lines
1.8 KiB
Lua
49 lines
1.8 KiB
Lua
---
|
|
-- Name: AID-014 - AI_A2A - DisengageRange Test
|
|
-- Author: FlightControl
|
|
-- Date Created: 31 Jul 2017
|
|
|
|
|
|
-- Define a SET_GROUP object that builds a collection of groups that define the EWR network.
|
|
-- Here we build the network with all the groups that have a name starting with DF CCCP AWACS and DF CCCP EWR.
|
|
DetectionSetGroup = SET_GROUP:New()
|
|
DetectionSetGroup:FilterPrefixes( { "DF CCCP AWACS", "DF CCCP EWR" } )
|
|
DetectionSetGroup:FilterStart()
|
|
|
|
Detection = DETECTION_AREAS:New( DetectionSetGroup, 30000 )
|
|
|
|
-- Setup the A2A dispatcher, and initialize it.
|
|
A2ADispatcher = AI_A2A_DISPATCHER:New( Detection )
|
|
|
|
-- Initialize the dispatcher, setting up a border zone. This is a polygon,
|
|
-- which takes the waypoints of a late activated group with the name CCCP Border as the boundaries of the border area.
|
|
-- Any enemy crossing this border will be engaged.
|
|
CCCPBorderZone = ZONE_POLYGON:New( "CCCP Border", GROUP:FindByName( "CCCP Border" ) )
|
|
--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( 200000 )
|
|
|
|
|
|
A2ADispatcher:SetTacticalDisplay( true )
|
|
|
|
-- Test intercept.
|
|
A2ADispatcher:SetIntercept( 450 )
|
|
|
|
-- Test an other disengage radius.
|
|
A2ADispatcher:SetDisengageRadius( 150000 )
|
|
|
|
-- Setup the squadrons.
|
|
|
|
A2ADispatcher:SetSquadron( "Sochi", AIRBASE.Caucasus.Sochi_Adler, { "SQ CCCP MIG-31" }, 20 )
|
|
A2ADispatcher:SetSquadronGci( "Sochi", 900, 1200 )
|
|
A2ADispatcher:SetSquadronTakeoffFromParkingCold( "Sochi" )
|
|
|
|
|
|
A2ADispatcher:SetSquadron( "Gelend", AIRBASE.Caucasus.Gelendzhik, { "SQ CCCP SU-27" }, 20 )
|
|
A2ADispatcher:SetSquadronGci( "Gelend", 800, 1200 )
|
|
A2ADispatcher:SetSquadronTakeoffFromParkingCold( "Gelend" )
|
|
|
|
|