weyne/DCS-CTLD
1
0
Fork 0
mirror of https://github.com/ciribob/DCS-CTLD.git synced 2026-08-19 05:35:54 +00:00
Code Issues Packages Projects Releases Wiki Activity

debug #159 jtac autoorbiting

Browse Source
This commit is contained in:
FullGas1
2025-04-13 22:07:53 +02:00
parent cc8b916870
commit 1e471df264
1 changed files with 49 additions and 42 deletions
Download Patch File Download Diff File Expand all files Collapse all files
CTLD.lua
+49 -42
View File
@@ -7709,6 +7709,7 @@ end
-- 2> Create a TRIGGER (once) at Time sup à 6, and a ACTION.EXECUTE SCRIPT : -- 2> Create a TRIGGER (once) at Time sup à 6, and a ACTION.EXECUTE SCRIPT :
-- ctld.JTACAutoLase("gdrone1", 1688,false) -- défine group "gdrone1" as a JTAC -- ctld.JTACAutoLase("gdrone1", 1688,false) -- défine group "gdrone1" as a JTAC
------------------------------------------------------------------------------------ ------------------------------------------------------------------------------------
ctld.JTACInRoute = {} -- for each JTAC in route, indicates the time of the run
ctld.OrbitInUse = {} -- for each Orbit group in use, indicates the time of the run ctld.OrbitInUse = {} -- for each Orbit group in use, indicates the time of the run
ctld.enableAutoOrbitingFlyingJtacOnTarget = true -- if true activate the AutoOrbitingFlyinfJtacOnTarget function for all flying JTACS ctld.enableAutoOrbitingFlyingJtacOnTarget = true -- if true activate the AutoOrbitingFlyinfJtacOnTarget function for all flying JTACS
------------------------------------------------------------------------------------ ------------------------------------------------------------------------------------
@@ -7718,25 +7719,29 @@ function ctld.TreatOrbitJTAC(params, t)
for k,v in pairs(ctld.jtacUnits) do -- vérify state of each active JTAC for k,v in pairs(ctld.jtacUnits) do -- vérify state of each active JTAC
if ctld.isFlyingJtac(k) then if ctld.isFlyingJtac(k) then
if ctld.jtacCurrentTargets[k] ~= nil then -- if detected target by JTAC if ctld.JTACInRoute[k] == nil and ctld.OrbitInUse[k] == nil then -- if JTAC is in route
ctld.JTACInRoute[k] = timer.getTime() -- update time of the last run
end
if ctld.jtacCurrentTargets[k] ~= nil then -- if target lased by JTAC
local droneAlti = Unit.getByName(k):getPoint().y local droneAlti = Unit.getByName(k):getPoint().y
if ctld.InOrbitList(k) == false then -- JTAC lase a target but isn't in orbit => start orbiting
ctld.StartOrbitGroup(k, ctld.jtacCurrentTargets[k].name, droneAlti, 100) -- do orbit JTAC if ctld.OrbitInUse[k] == nil then -- if JTAC is not in orbit => start orbiting and update start time
ctld.OrbitInUse[k] = timer.getTime() -- update time of the last orbit run ctld.StartOrbitGroup(k, ctld.jtacCurrentTargets[k].name, droneAlti, 100) -- do orbit JTAC
else -- JTAC already is orbiting => update coord for following the target mouvements ctld.OrbitInUse[k] = timer.getTime() -- update time of the last orbit run
ctld.JTACInRoute[k] = nil -- JTAC is in orbit => reset the route time
else -- JTAC already orbiting => update coord for following the target mouvements each 60"
if timer.getTime() > (ctld.OrbitInUse[k] + 60) then -- each 60" update orbit coord if timer.getTime() > (ctld.OrbitInUse[k] + 60) then -- each 60" update orbit coord
ctld.StartOrbitGroup(k, ctld.jtacCurrentTargets[k].name, droneAlti, 100) -- do orbit JTAC ctld.StartOrbitGroup(k, ctld.jtacCurrentTargets[k].name, droneAlti, 100) -- do orbit JTAC
ctld.OrbitInUse[k] = timer.getTime() -- update time of the last orbit run ctld.OrbitInUse[k] = timer.getTime() -- update time of the last orbit run
end end
end
else -- if JTAC have no target
if ctld.InOrbitList(k) == true then -- JTAC orbiting, without target => stop orbit
Unit.getByName(k):getController():popTask() -- stop orbiting JTAC Task => return to route
ctld.OrbitInUse[k] = nil -- Reset orbit
ctld.JTACInRoute[k] = timer.getTime() -- update time of the last start inroute
end end
else -- if JTAC have no target
-- if ctld.InOrbitList(k) == true then -- JTAC orbiting, without target => stop orbit
-- Group.getByName(k):getController():resetTask() -- stop orbiting JTAC
-- --Group.getByName(k):getController():popTask() -- stop orbiting JTAC
-- ctld.OrbitInUse[k] = nil -- Reset orbit
-- end
Group.getByName(k):getController():popTask() -- stop orbiting JTAC
ctld.backToRoute(k) -- return to the initial route of the JTAC group
end end
end end
end end
@@ -7744,8 +7749,8 @@ function ctld.TreatOrbitJTAC(params, t)
end end
------------------------------------------------------------------------------------ ------------------------------------------------------------------------------------
-- Make orbit the group "_grpName", on target "_unitTargetName". _alti in meters, speed in km/h -- Make orbit the group "_grpName", on target "_unitTargetName". _alti in meters, speed in km/h
function ctld.StartOrbitGroup(_grpName, _unitTargetName, _alti, _speed) function ctld.StartOrbitGroup(_jtacUnitName, _unitTargetName, _alti, _speed)
if (Unit.getByName(_unitTargetName) ~= nil) and (Group.getByName(_grpName) ~= nil) then -- si target unit and JTAC group exist if (Unit.getByName(_unitTargetName) ~= nil) and (Unit.getByName(_jtacUnitName) ~= nil) then -- si target unit and JTAC group exist
local orbit = { local orbit = {
id = 'Orbit', id = 'Orbit',
params = {pattern = 'Circle', params = {pattern = 'Circle',
@@ -7754,8 +7759,9 @@ function ctld.StartOrbitGroup(_grpName, _unitTargetName, _alti, _speed)
altitude = _alti altitude = _alti
} }
} }
Group.getByName(_grpName):getController():pushTask(orbit) local jtacGroupName = Unit.getByName(_jtacUnitName):getGroup():getName()
ctld.OrbitInUse[_grpName] = true Unit.getByName(_jtacUnitName):getController():popTask() -- stop current Task
Group.getByName(jtacGroupName):getController():pushTask(orbit)
end end
end end
------------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------------
@@ -7770,41 +7776,42 @@ function ctld.InOrbitList(_grpName)
end end
------------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------------
-- return the WayPoint number (on the JTAC route) the most near from the target -- return the WayPoint number (on the JTAC route) the most near from the target
function ctld.NearWP(_unitTargetName, _grpName) function ctld.NearWP(_unitTargetName, _jtacUnitName)
local WP = 0 local WP = 0
local memoDist = nil -- Lower distance checked local memoDist = nil -- Lower distance checked
local JTACRoute = mist.getGroupRoute (_grpName, true) -- get the initial editor route of the current group local jtacGroupName = Unit.getByName(_jtacUnitName):getGroup():getName()
local JTACRoute = mist.getGroupRoute (jtacGroupName, true) -- get the initial editor route of the current group
if Group.getByName(_grpName):getUnit(1) ~= nil and Unit.getByName(_unitTargetName) ~= nil then --JTAC et unit must exist if Unit.getByName(_jtacUnitName) ~= nil and Unit.getByName(_unitTargetName) ~= nil then --JTAC et unit must exist
for i=1, #JTACRoute do for i=1, #JTACRoute do
local ptJTAC = {x = JTACRoute[i].x, y = JTACRoute[i].y} local ptJTAC = {x = JTACRoute[i].x, y = JTACRoute[i].y}
local ptTarget = mist.utils.makeVec2(Unit.getByName(_unitTargetName):getPoint()) local ptTarget = mist.utils.makeVec2(Unit.getByName(_unitTargetName):getPoint())
local dist = mist.utils.get2DDist(ptJTAC, ptTarget) -- distance between 2 points local dist = mist.utils.get2DDist(ptJTAC, ptTarget) -- distance between 2 points
if memoDist == nil then if memoDist == nil then
memoDist = dist memoDist = dist
WP = i WP = i
elseif dist < memoDist then elseif dist < memoDist then
memoDist = dist memoDist = dist
WP = i WP = i
end
end end
end end
end
return WP return WP
end end
---------------------------------------------------------------------------- ----------------------------------------------------------------------------
-- Modify the route deleting all the WP before "firstWP" param, for aligne the orbit on the nearest WP of the target -- Modify the route deleting all the WP before "firstWP" param, for aligne the orbit on the nearest WP of the target
function ctld.backToRoute(_grpName) function ctld.backToRoute(_jtacUnitName)
local JTACRoute = mist.getGroupRoute (_grpName, true) -- get the initial editor route of the current group local jtacGroupName = Unit.getByName(_jtacUnitName):getGroup():getName()
local JTACRoute = mist.getGroupRoute (jtacGroupName, true) -- get the initial editor route of the current group
local Mission = {} local Mission = {}
Mission = { id = 'Mission', params = {route = {points = JTACRoute}}} Mission = { id = 'Mission', params = {route = {points = JTACRoute}}}
-- unactive orbit mode if it's on -- unactive orbit mode if it's on
if ctld.InOrbitList(_grpName) == true then -- if JTAC orbiting => stop it if ctld.InOrbitList(_jtacUnitName) == true then -- if JTAC orbiting => stop it
Group.getByName(_grpName):getController():resetTask() -- stop JTAC orbiting ctld.OrbitInUse[_jtacUnitName] = nil
ctld.OrbitInUse[_grpName] = nil
end end
Unit.getByName(_jtacUnitName):getController():popTask() -- stop current Task
Group.getByName(_grpName):getController():setTask(Mission) -- submit the new route Unit.getByName(_jtacUnitName):getController():setTask(Mission) -- submit the new route
return Mission return Mission
end end
---------------------------------------------------------------------------- ----------------------------------------------------------------------------
function ctld.isFlyingJtac(_jtacUnitName) function ctld.isFlyingJtac(_jtacUnitName)