mirror of
https://github.com/akaAgar/the-universal-mission-for-dcs-world.git
synced 2025-11-25 19:31:01 +00:00
339 lines
13 KiB
Lua
339 lines
13 KiB
Lua
-- ====================================================================================
|
|
-- TUM.SUPPORTWINGMEN - HANDLES THE PLAYER'S WINGMEN
|
|
-- ====================================================================================
|
|
-- ====================================================================================
|
|
|
|
TUM.supportWingmen = {}
|
|
|
|
do
|
|
TUM.supportWingmen.orderID = {
|
|
ORBIT = 1,
|
|
REJOIN = 2,
|
|
ENGAGE_BANDITS = 3,
|
|
}
|
|
|
|
local wingmenGroupID = nil
|
|
|
|
local function getWingmenGroup()
|
|
if TUM.settings.getValue(TUM.settings.id.MULTIPLAYER) then return nil end -- No wingmen in multiplayer
|
|
if not wingmenGroupID then return nil end
|
|
local wingmenGroup = DCSEx.world.getGroupByID(wingmenGroupID)
|
|
if not wingmenGroup then return nil end
|
|
if #wingmenGroup:getUnits() == 0 then return nil end
|
|
|
|
return wingmenGroup
|
|
end
|
|
|
|
local function getWingmenCallsign()
|
|
local wingmenGroup = getWingmenGroup()
|
|
if not wingmenGroup then return "Wingmen" end
|
|
return wingmenGroup:getUnit(1):getCallsign()
|
|
end
|
|
|
|
local function isValidTarget(detectedTarget, attributes)
|
|
attributes = attributes or {}
|
|
if not detectedTarget then return false end
|
|
if not detectedTarget.object then return false end
|
|
|
|
if #attributes == 0 then return true end
|
|
for _,a in ipairs(attributes) do
|
|
if detectedTarget.object:hasAttribute(a) then
|
|
return true
|
|
end
|
|
end
|
|
|
|
return false
|
|
end
|
|
|
|
local function getDetectedTargets(attributes)
|
|
local wingmenGroup = getWingmenGroup()
|
|
trigger.action.outText("A", 1)
|
|
if not wingmenGroup then return {} end
|
|
|
|
trigger.action.outText("B", 1)
|
|
local detectedTargets = {}
|
|
for _,u in ipairs(wingmenGroup:getUnits()) do
|
|
trigger.action.outText("C", 1)
|
|
local ctrl = u:getController()
|
|
if ctrl then
|
|
trigger.action.outText("D", 1)
|
|
local targets = ctrl:getDetectedTargets() -- Controller.Detection.VISUAL, Controller.Detection.OPTIC, Controller.Detection.RADAR, Controller.Detection.RWR, Controller.Detection.IRST)
|
|
for _,t in ipairs(targets) do
|
|
trigger.action.outText("E", 1)
|
|
if isValidTarget(t, attributes) then
|
|
trigger.action.outText("F", 1)
|
|
table.insert(detectedTargets, t.object)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
return detectedTargets
|
|
end
|
|
|
|
local function doWingmenOrder(orderID)
|
|
local player = world:getPlayer()
|
|
if not player then return end
|
|
|
|
if orderID == TUM.supportWingmen.orderID.ORBIT then
|
|
TUM.radio.playForAll("playerFlightOrbit", nil, player:getCallsign(), false)
|
|
elseif orderID == TUM.supportWingmen.orderID.REJOIN then
|
|
TUM.radio.playForAll("playerFlightRejoin", nil, player:getCallsign(), false)
|
|
elseif orderID == TUM.supportWingmen.orderID.ENGAGE_BANDITS then
|
|
TUM.radio.playForAll("playerFlightEngageBandits", nil, player:getCallsign(), false)
|
|
end
|
|
|
|
if not wingmenGroupID then return end
|
|
local wingmenGroup = DCSEx.world.getGroupByID(wingmenGroupID)
|
|
if not wingmenGroup then return end
|
|
if #wingmenGroup:getUnits() == 0 then return end
|
|
local wingmenCtrl = wingmenGroup:getController()
|
|
if not wingmenCtrl then return end
|
|
|
|
local wingmanCallsign = wingmenGroup:getUnit(1):getCallsign()
|
|
|
|
local taskTable = nil
|
|
|
|
if orderID == TUM.supportWingmen.orderID.ORBIT then
|
|
taskTable = {
|
|
id = "Orbit",
|
|
params = {
|
|
pattern = "Circle",
|
|
point = DCSEx.math.vec3ToVec2(player:getPoint()),
|
|
altitude = player:getPoint().y
|
|
}
|
|
}
|
|
TUM.radio.playForAll("pilotWingmanOrbit", nil, wingmanCallsign, true)
|
|
elseif orderID == TUM.supportWingmen.orderID.REJOIN then
|
|
taskTable = {
|
|
id = "Follow",
|
|
params = {
|
|
groupId = DCSEx.dcs.getObjectIDAsNumber(world:getPlayer():getGroup()),
|
|
pos = { x = -100, y = 0, z = -100 },
|
|
lastWptIndexFlag = false,
|
|
lastWptIndex = -1
|
|
}
|
|
}
|
|
TUM.radio.playForAll("pilotWingmanRejoin", nil, wingmanCallsign, true)
|
|
elseif orderID == TUM.supportWingmen.orderID.ENGAGE_BANDITS then
|
|
local banditGroups = coalition.getGroups(TUM.settings.getEnemyCoalition(), Group.Category.AIRPLANE)
|
|
if not banditGroups or #banditGroups == 0 then
|
|
TUM.radio.playForAll("pilotWingmanEngageNoTarget", nil, wingmanCallsign, true)
|
|
return
|
|
end
|
|
-- TODO: sort by nearest
|
|
local targetGroup = banditGroups[1]
|
|
|
|
taskTable = {
|
|
id = "AttackGroup",
|
|
params = {
|
|
groupId = DCSEx.dcs.getObjectIDAsNumber(targetGroup),
|
|
}
|
|
}
|
|
TUM.radio.playForAll("pilotWingmanEngageBandits", nil, wingmanCallsign, true)
|
|
end
|
|
|
|
if not taskTable then return end
|
|
|
|
wingmenCtrl:setTask(taskTable)
|
|
end
|
|
|
|
local function doWingmenCommandOrbit()
|
|
local player = world:getPlayer()
|
|
if not player then return end
|
|
|
|
TUM.radio.playForAll("playerFlightOrbit", nil, player:getCallsign(), false)
|
|
|
|
local wingmenGroup = getWingmenGroup()
|
|
if not wingmenGroup then return end
|
|
local wingmenCtrl = wingmenGroup:getController()
|
|
if not wingmenCtrl then return end
|
|
|
|
local taskTable = {
|
|
id = "Orbit",
|
|
params = {
|
|
pattern = "Circle",
|
|
point = DCSEx.math.vec3ToVec2(player:getPoint()),
|
|
altitude = player:getPoint().y
|
|
}
|
|
}
|
|
wingmenCtrl:setTask(taskTable)
|
|
TUM.radio.playForAll("pilotWingmanOrbit", nil, getWingmenCallsign(), true)
|
|
end
|
|
|
|
local function doWingmenCommandRejoin()
|
|
local player = world:getPlayer()
|
|
if not player then return end
|
|
|
|
TUM.radio.playForAll("playerFlightRejoin", nil, player:getCallsign(), false)
|
|
|
|
local wingmenGroup = getWingmenGroup()
|
|
if not wingmenGroup then return end
|
|
local wingmenCtrl = wingmenGroup:getController()
|
|
if not wingmenCtrl then return end
|
|
|
|
local taskTable = {
|
|
id = "Follow",
|
|
params = {
|
|
groupId = DCSEx.dcs.getObjectIDAsNumber(player:getGroup()),
|
|
pos = { x = -100, y = 0, z = -100 },
|
|
lastWptIndexFlag = false,
|
|
lastWptIndex = -1
|
|
}
|
|
}
|
|
wingmenCtrl:setTask(taskTable)
|
|
TUM.radio.playForAll("pilotWingmanRejoin", nil, getWingmenCallsign(), true)
|
|
end
|
|
|
|
local function doWingmenOrderEngage(orderID)
|
|
end
|
|
|
|
local function doWingmenCommandReportTargets(attributes)
|
|
local detectedTargets = getDetectedTargets(attributes)
|
|
|
|
local reportText = "Detected targets:"
|
|
if #detectedTargets == 0 then
|
|
reportText = reportText.." none"
|
|
else
|
|
for _,t in ipairs(detectedTargets) do
|
|
reportText = reportText.."\n - "..Library.objectNames.get(t)
|
|
end
|
|
end
|
|
trigger.action.outText(reportText, 5)
|
|
end
|
|
|
|
local function doWingmenCommandReportStatus(sponatenousReport)
|
|
sponatenousReport = sponatenousReport or false
|
|
local player = world:getPlayer()
|
|
if not player then return end
|
|
|
|
if not sponatenousReport then
|
|
TUM.radio.playForAll("playerFlightReportStatus", nil, player:getCallsign(), false)
|
|
end
|
|
local wingmenGroup = getWingmenGroup()
|
|
if not wingmenGroup then return end
|
|
|
|
local statusMsg = ""
|
|
for i,u in ipairs(wingmenGroup:getUnits()) do
|
|
statusMsg = statusMsg..u:getCallsign():upper()
|
|
if u:getLife() >= u:getLife0() then
|
|
statusMsg = statusMsg.."\n- No damage sustained"
|
|
else
|
|
statusMsg = statusMsg.."\n- Aircraft suffered damage"
|
|
end
|
|
statusMsg = statusMsg.."\n- BRAA from you: "..DCSEx.dcs.getBRAA(u:getPoint(), DCSEx.math.vec3ToVec2(player:getPoint()), true)
|
|
statusMsg = statusMsg.."\n- Armament: "
|
|
local ammo = u:getAmmo()
|
|
if #ammo == 0 then
|
|
statusMsg = statusMsg.."None"
|
|
else
|
|
for j,a in ipairs(ammo) do
|
|
if a.count and a.desc and (a.desc.displayName or a.desc.typeName) then
|
|
local ammoName = a.desc.displayName or a.desc.typeName
|
|
if j > 1 then statusMsg = statusMsg..", " end
|
|
statusMsg = statusMsg..tostring(a.count).."x "..ammoName
|
|
end
|
|
end
|
|
end
|
|
|
|
if i < wingmenGroup:getSize() then statusMsg = statusMsg.."\n\n" end
|
|
end
|
|
|
|
TUM.radio.playForAll("pilotWingmanReportStatus", { statusMsg }, getWingmenCallsign(), not sponatenousReport)
|
|
end
|
|
|
|
local function createWingmen()
|
|
TUM.supportWingmen.removeAll() -- Destroy all pre-existing wingmen
|
|
TUM.log("Creating wingmen...")
|
|
|
|
local player = world:getPlayer()
|
|
if not player then return end
|
|
|
|
-- Retrive player unit type
|
|
local playerTypeName = player:getTypeName()
|
|
if not Library.aircraft[playerTypeName] then
|
|
TUM.log("Cannot spawn AI wingmen, aircraft \""..playerTypeName.."\" not found in the database.", TUM.logLevel.WARNING)
|
|
return
|
|
end
|
|
local playerCategory = Group.Category.AIRPLANE
|
|
if player:hasAttribute("Helicopters") then playerCategory = Group.Category.HELICOPTER end -- Player is a helicopter
|
|
|
|
-- Generate wingman callsign
|
|
local wingmanCallsign = DCSEx.envMission.getPlayerGroups()[1].units[1].callsign
|
|
if type(wingmanCallsign) == "table" then
|
|
wingmanCallsign[3] = nil
|
|
wingmanCallsign["name"] = wingmanCallsign["name"]:sub(1, #wingmanCallsign["name"] - 1)
|
|
if wingmanCallsign[4] then wingmanCallsign[4] = wingmanCallsign["name"] end
|
|
else
|
|
wingmanCallsign = DCSEx.unitCallsignMaker.getCallsign(playerTypeName)
|
|
end
|
|
|
|
local groupInfo = DCSEx.unitGroupMaker.create(
|
|
TUM.settings.getPlayerCoalition(),
|
|
playerCategory,
|
|
DCSEx.math.randomPointInCircle(DCSEx.math.vec3ToVec2(player:getPoint()), 500, 250),
|
|
{ playerTypeName, playerTypeName },
|
|
{
|
|
callsign = wingmanCallsign,
|
|
callsignOffset = 1,
|
|
silenced = true,
|
|
skill = "Excellent",
|
|
taskFollow = DCSEx.dcs.getObjectIDAsNumber(player:getGroup()),
|
|
unlimitedFuel = true
|
|
}
|
|
)
|
|
|
|
if not groupInfo then
|
|
TUM.log("Failed to spawn AI wingmen", TUM.logLevel.WARNING)
|
|
return
|
|
end
|
|
wingmenGroupID = groupInfo.groupID
|
|
|
|
TUM.log("Spawned AI wingmen")
|
|
TUM.radio.playForAll("pilotWingmanRejoin", nil, getWingmenCallsign(), true)
|
|
end
|
|
|
|
function TUM.supportWingmen.removeAll()
|
|
if not wingmenGroupID then return end
|
|
|
|
TUM.log("Removing all wingmen...")
|
|
|
|
DCSEx.world.destroyGroupByID(wingmenGroupID)
|
|
-- TODO: delayed "returned to base" message from wingmen?
|
|
|
|
wingmenGroupID = nil
|
|
end
|
|
|
|
function TUM.supportWingmen.createMenu()
|
|
if TUM.settings.getValue(TUM.settings.id.MULTIPLAYER) then return end -- No wingmen in multiplayer
|
|
|
|
local rootPath = missionCommands.addSubMenu("Flight")
|
|
|
|
missionCommands.addCommand("Engage bandits", rootPath, doWingmenOrder, TUM.supportWingmen.orderID.ENGAGE_BANDITS)
|
|
missionCommands.addCommand("Engage air defense", rootPath, doWingmenOrder, TUM.supportWingmen.orderID.ENGAGE_BANDITS)
|
|
missionCommands.addCommand("Engage ground targets", rootPath, doWingmenOrder, TUM.supportWingmen.orderID.ENGAGE_BANDITS)
|
|
missionCommands.addCommand("Report targets", rootPath, doWingmenCommandReportTargets, nil)
|
|
missionCommands.addCommand("Report status", rootPath, doWingmenCommandReportStatus, false)
|
|
missionCommands.addCommand("Orbit", rootPath, doWingmenCommandOrbit, nil)
|
|
missionCommands.addCommand("Rejoin", rootPath, doWingmenCommandRejoin, nil)
|
|
end
|
|
|
|
-------------------------------------
|
|
-- Called when an event is raised
|
|
-- @param event The DCS World event
|
|
-------------------------------------
|
|
function TUM.supportWingmen.onEvent(event)
|
|
if TUM.settings.getValue(TUM.settings.id.MULTIPLAYER) then return end -- No wingmen in multiplayer
|
|
if TUM.mission.getStatus() == TUM.mission.status.NONE then return end
|
|
if not event.initiator then return end
|
|
if Object.getCategory(event.initiator) ~= Object.Category.UNIT then return end
|
|
if not event.initiator:getPlayerName() then return end
|
|
|
|
if event.id == world.event.S_EVENT_TAKEOFF then -- Create wingmen on takeoff
|
|
createWingmen()
|
|
elseif event.id == world.event.S_EVENT_LAND then
|
|
TUM.supportWingmen.removeAll() -- Remove wingmen on landing
|
|
end
|
|
end
|
|
end
|