mirror of
https://github.com/FlightControl-Master/MOOSE.git
synced 2025-08-15 10:47:21 +00:00
202 lines
7.9 KiB
Lua
202 lines
7.9 KiB
Lua
--- **Functional** -- Make SAM sites execute evasive and defensive behaviour when being fired upon.
|
|
--
|
|
-- ===
|
|
--
|
|
-- ## Features:
|
|
--
|
|
-- * When SAM sites are being fired upon, the SAMs will take evasive action will reposition themselves when possible.
|
|
-- * When SAM sites are being fired upon, the SAMs will take defensive action by shutting down their radars.
|
|
--
|
|
-- ===
|
|
--
|
|
-- ## Missions:
|
|
--
|
|
-- [SEV - SEAD Evasion](https://github.com/FlightControl-Master/MOOSE_MISSIONS/tree/master/SEV%20-%20SEAD%20Evasion)
|
|
--
|
|
-- ===
|
|
--
|
|
-- ### Authors: **FlightControl**
|
|
--
|
|
-- ===
|
|
--
|
|
-- @module Functional.Sead
|
|
-- @image SEAD.JPG
|
|
|
|
--- @type SEAD
|
|
-- @extends Core.Base#BASE
|
|
|
|
--- Make SAM sites execute evasive and defensive behaviour when being fired upon.
|
|
--
|
|
-- This class is very easy to use. Just setup a SEAD object by using @{#SEAD.New}() and SAMs will evade and take defensive action when being fired upon.
|
|
--
|
|
-- # Constructor:
|
|
--
|
|
-- Use the @{#SEAD.New}() constructor to create a new SEAD object.
|
|
--
|
|
-- SEAD_RU_SAM_Defenses = SEAD:New( { 'RU SA-6 Kub', 'RU SA-6 Defenses', 'RU MI-26 Troops', 'RU Attack Gori' } )
|
|
--
|
|
-- @field #SEAD
|
|
SEAD = {
|
|
ClassName = "SEAD",
|
|
TargetSkill = {
|
|
Average = { Evade = 50, DelayOff = { 10, 25 }, DelayOn = { 10, 30 } } ,
|
|
Good = { Evade = 30, DelayOff = { 8, 20 }, DelayOn = { 20, 40 } } ,
|
|
High = { Evade = 15, DelayOff = { 5, 17 }, DelayOn = { 30, 50 } } ,
|
|
Excellent = { Evade = 10, DelayOff = { 3, 10 }, DelayOn = { 30, 60 } }
|
|
},
|
|
SEADGroupPrefixes = {}
|
|
}
|
|
|
|
--- Creates the main object which is handling defensive actions for SA sites or moving SA vehicles.
|
|
-- When an anti radiation missile is fired (KH-58, KH-31P, KH-31A, KH-25MPU, HARM missiles), the SA will shut down their radars and will take evasive actions...
|
|
-- Chances are big that the missile will miss.
|
|
-- @param table{string,...}|string SEADGroupPrefixes which is a table of Prefixes of the SA Groups in the DCSRTE on which evasive actions need to be taken.
|
|
-- @return SEAD
|
|
-- @usage
|
|
-- -- CCCP SEAD Defenses
|
|
-- -- Defends the Russian SA installations from SEAD attacks.
|
|
-- SEAD_RU_SAM_Defenses = SEAD:New( { 'RU SA-6 Kub', 'RU SA-6 Defenses', 'RU MI-26 Troops', 'RU Attack Gori' } )
|
|
function SEAD:New( SEADGroupPrefixes )
|
|
|
|
local self = BASE:Inherit( self, BASE:New() )
|
|
self:F( SEADGroupPrefixes )
|
|
|
|
if type( SEADGroupPrefixes ) == 'table' then
|
|
for SEADGroupPrefixID, SEADGroupPrefix in pairs( SEADGroupPrefixes ) do
|
|
self.SEADGroupPrefixes[SEADGroupPrefix] = SEADGroupPrefix
|
|
end
|
|
else
|
|
self.SEADGroupNames[SEADGroupPrefixes] = SEADGroupPrefixes
|
|
end
|
|
|
|
self:HandleEvent( EVENTS.Shot )
|
|
|
|
return self
|
|
end
|
|
|
|
--- Detects if an SA site was shot with an anti radiation missile. In this case, take evasive actions based on the skill level set within the ME.
|
|
-- @see SEAD
|
|
-- @param #SEAD
|
|
-- @param Core.Event#EVENTDATA EventData
|
|
function SEAD:OnEventShot( EventData )
|
|
self:F( { EventData } )
|
|
|
|
local SEADUnit = EventData.IniDCSUnit
|
|
local SEADUnitName = EventData.IniDCSUnitName
|
|
local SEADWeapon = EventData.Weapon -- Identify the weapon fired
|
|
local SEADWeaponName = EventData.WeaponName -- return weapon type
|
|
-- Start of the 2nd loop
|
|
self:T( "Missile Launched = " .. SEADWeaponName )
|
|
|
|
--if SEADWeaponName == "KH-58" or SEADWeaponName == "KH-25MPU" or SEADWeaponName == "AGM-88" or SEADWeaponName == "KH-31A" or SEADWeaponName == "KH-31P" then -- Check if the missile is a SEAD
|
|
if SEADWeaponName == "weapons.missiles.X_58" --Kh-58U anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.Kh25MP_PRGS1VP" --Kh-25MP anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.X_25MP" --Kh-25MPU anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.X_28" --Kh-28 anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.X_31P" --Kh-31P anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.AGM_45A" --AGM-45A anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.AGM_45" --AGM-45B anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.AGM_88" --AGM-88C anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.AGM_122" --AGM-122 Sidearm anti-radiation missiles fired
|
|
or
|
|
SEADWeaponName == "weapons.missiles.ALARM" --ALARM anti-radiation missiles fired
|
|
then
|
|
|
|
local _evade = math.random (1,100) -- random number for chance of evading action
|
|
local _targetMim = EventData.Weapon:getTarget() -- Identify target
|
|
local _targetMimname = Unit.getName(_targetMim)
|
|
local _targetMimgroup = Unit.getGroup(Weapon.getTarget(SEADWeapon))
|
|
local _targetMimgroupName = _targetMimgroup:getName()
|
|
local _targetMimcont= _targetMimgroup:getController()
|
|
local _targetskill = _DATABASE.Templates.Units[_targetMimname].Template.skill
|
|
self:T( self.SEADGroupPrefixes )
|
|
self:T( _targetMimgroupName )
|
|
local SEADGroupFound = false
|
|
for SEADGroupPrefixID, SEADGroupPrefix in pairs( self.SEADGroupPrefixes ) do
|
|
if string.find( _targetMimgroupName, SEADGroupPrefix, 1, true ) then
|
|
SEADGroupFound = true
|
|
self:T( 'Group Found' )
|
|
break
|
|
end
|
|
end
|
|
if SEADGroupFound == true then
|
|
if _targetskill == "Random" then -- when skill is random, choose a skill
|
|
local Skills = { "Average", "Good", "High", "Excellent" }
|
|
_targetskill = Skills[ math.random(1,4) ]
|
|
end
|
|
self:T( _targetskill )
|
|
if self.TargetSkill[_targetskill] then
|
|
if (_evade > self.TargetSkill[_targetskill].Evade) then
|
|
|
|
self:T( string.format("Evading, target skill " ..string.format(_targetskill)) )
|
|
|
|
local _targetMim = Weapon.getTarget(SEADWeapon)
|
|
local _targetMimname = Unit.getName(_targetMim)
|
|
local _targetMimgroup = Unit.getGroup(Weapon.getTarget(SEADWeapon))
|
|
local _targetMimcont= _targetMimgroup:getController()
|
|
|
|
routines.groupRandomDistSelf(_targetMimgroup,300,'Diamond',250,20) -- move randomly
|
|
|
|
local SuppressedGroups1 = {} -- unit suppressed radar off for a random time
|
|
|
|
local function SuppressionEnd1(id)
|
|
id.ctrl:setOption(AI.Option.Ground.id.ALARM_STATE,AI.Option.Ground.val.ALARM_STATE.GREEN)
|
|
SuppressedGroups1[id.groupName] = nil
|
|
end
|
|
|
|
local id = {
|
|
groupName = _targetMimgroup,
|
|
ctrl = _targetMimcont
|
|
}
|
|
|
|
local delay1 = math.random(self.TargetSkill[_targetskill].DelayOff[1], self.TargetSkill[_targetskill].DelayOff[2])
|
|
|
|
if SuppressedGroups1[id.groupName] == nil then
|
|
|
|
SuppressedGroups1[id.groupName] = {
|
|
SuppressionEndTime1 = timer.getTime() + delay1,
|
|
SuppressionEndN1 = SuppressionEndCounter1 --Store instance of SuppressionEnd() scheduled function
|
|
}
|
|
|
|
Controller.setOption(_targetMimcont, AI.Option.Ground.id.ALARM_STATE,AI.Option.Ground.val.ALARM_STATE.GREEN)
|
|
timer.scheduleFunction(SuppressionEnd1, id, SuppressedGroups1[id.groupName].SuppressionEndTime1) --Schedule the SuppressionEnd() function
|
|
--trigger.action.outText( string.format("Radar Off " ..string.format(delay1)), 20)
|
|
end
|
|
|
|
local SuppressedGroups = {}
|
|
|
|
local function SuppressionEnd(id)
|
|
id.ctrl:setOption(AI.Option.Ground.id.ALARM_STATE,AI.Option.Ground.val.ALARM_STATE.RED)
|
|
SuppressedGroups[id.groupName] = nil
|
|
end
|
|
|
|
local id = {
|
|
groupName = _targetMimgroup,
|
|
ctrl = _targetMimcont
|
|
}
|
|
|
|
local delay = math.random(self.TargetSkill[_targetskill].DelayOn[1], self.TargetSkill[_targetskill].DelayOn[2])
|
|
|
|
if SuppressedGroups[id.groupName] == nil then
|
|
SuppressedGroups[id.groupName] = {
|
|
SuppressionEndTime = timer.getTime() + delay,
|
|
SuppressionEndN = SuppressionEndCounter --Store instance of SuppressionEnd() scheduled function
|
|
}
|
|
|
|
timer.scheduleFunction(SuppressionEnd, id, SuppressedGroups[id.groupName].SuppressionEndTime) --Schedule the SuppressionEnd() function
|
|
--trigger.action.outText( string.format("Radar On " ..string.format(delay)), 20)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|