Work in progress

- problem with UNIT tables... Unit not alive... Need to fix CLIENTs...
CLIENTs need to be copied into UNITs...
This commit is contained in:
FlightControl
2016-12-09 14:48:49 +01:00
parent 8cda04be45
commit 2582e7a90a
57 changed files with 53 additions and 16 deletions

View File

@@ -155,6 +155,13 @@ function COMMANDCENTER:HasGroup( MissionGroup )
return Has
end
--- Send a CC message to a GROUP.
-- @param #COMMANDCENTER self
function COMMANDCENTER:MessageToGroup( Message, TaskGroup )
self:GetPositionable():MessageToGroup( Message , 20, TaskGroup )
end
--- Report the status of all MISSIONs to a GROUP.
-- @param #COMMANDCENTER self
@@ -172,3 +179,19 @@ function COMMANDCENTER:ReportMissions( ReportGroup )
end
--- Report the status of a Task to a Group.
-- @param #COMMANDCENTER self
function COMMANDCENTER:ReportTaskStatus( ReportGroup, Task )
self:E( ReportGroup )
local Report = REPORT:New()
for MissionID, Mission in pairs( self.Missions ) do
local Mission = Mission -- Tasking.Mission#MISSION
Report:Add( " - " .. Mission:ReportStatus() )
end
self:GetPositionable():MessageToGroup( Report:Text(), 30, ReportGroup )
end