OPS

CHIEF
- Added `:RemoveStrategicZone()` function
- Added `:SetLimitMission()` function to limit number of total or specific mission types.
- Improved Tactical Overview

OPSZONE
- Improved `Stop()` function

Moose Development/Moose/Ops/Commander.lua

@@ -29,6 +29,7 @@
 -- @field #table awacsZones AWACS zones. Each element is of type `#AIRWING.PatrolZone`.
 -- @field #table tankerZones Tanker zones. Each element is of type `#AIRWING.TankerZone`.
 -- @field Ops.Chief#CHIEF chief Chief of staff.
+-- @field #table limitMission Table of limits for mission types.
 -- @extends Core.Fsm#FSM
 
 --- *He who has never leared to obey cannot be a good commander* -- Aristotle
@@ -128,6 +129,7 @@ COMMANDER = {
   gcicapZones     =    {},
   awacsZones      =    {},
   tankerZones     =    {},
+  limitMission    =    {},
 }
 
 --- COMMANDER class version.
@@ -359,6 +361,22 @@ function COMMANDER:SetVerbosity(VerbosityLevel)
   return self
 end
 
+--- Set limit for number of total or specific missions to be executed simultaniously.
+-- @param #COMMANDER self
+-- @param #number Limit Number of max. mission of this type. Default 10.
+-- @param #string MissionType Type of mission, e.g. `AUFTRAG.Type.BAI`. Default `"Total"` for total number of missions.
+-- @return #COMMANDER self
+function COMMANDER:SetLimitMission(Limit, MissionType)
+  MissionType=MissionType or "Total"
+  if MissionType then
+    self.limitMission[MissionType]=Limit or 10
+  else
+    self:E(self.lid.."ERROR: No mission type given for setting limit!")
+  end
+  return self
+end
+
+
 --- Get coalition.
 -- @param #COMMANDER self
 -- @return #number Coalition.
@@ -1046,6 +1064,11 @@ function COMMANDER:CheckMissionQueue()
   if Nmissions==0 then
     return nil
   end
+  
+  local NoLimit=self:_CheckMissionLimit("Total")  
+  if NoLimit==false then
+    return nil
+  end
 
   -- Sort results table wrt prio and start time.
   local function _sort(a, b)
@@ -1070,7 +1093,7 @@ function COMMANDER:CheckMissionQueue()
     local mission=_mission --Ops.Auftrag#AUFTRAG
     
     -- We look for PLANNED missions.
-    if mission:IsPlanned() and mission:IsReadyToGo() and (mission.importance==nil or mission.importance<=vip) then
+    if mission:IsPlanned() and mission:IsReadyToGo() and (mission.importance==nil or mission.importance<=vip) and self:_CheckMissionLimit(mission.type) then
     
       ---
       -- PLANNNED Mission
@@ -1394,6 +1417,31 @@ end
 -- Resources
 -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
 
+--- Check if limit of missions has been reached.
+-- @param #COMMANDER self 
+-- @param #string MissionType Type of mission.
+-- @return #boolean If `true`, mission limit has **not** been reached. If `false`, limit has been reached.
+function COMMANDER:_CheckMissionLimit(MissionType)
+
+  local limit=self.limitMission[MissionType]
+  
+  if limit then
+  
+    if MissionType=="Total" then
+      MissionType=AUFTRAG.Type    
+    end
+  
+    local N=self:CountMissions(MissionType, true)
+    
+    if N>=limit then
+      return false
+    end
+  end
+  
+  return true
+end
+
+
 --- Count assets of all assigned legions.
 -- @param #COMMANDER self
 -- @param #boolean InStock If true, only assets that are in the warehouse stock/inventory are counted.
@@ -1414,16 +1462,21 @@ end
 --- Count assets of all assigned legions.
 -- @param #COMMANDER self
 -- @param #table MissionTypes (Optional) Count only missions of these types. Default is all types.
+-- @param #boolean OnlyRunning If `true`, only count running missions.
 -- @return #number Amount missions.
-function COMMANDER:CountMissions(MissionTypes)
+function COMMANDER:CountMissions(MissionTypes, OnlyRunning)
 
   local N=0
   for _,_mission in pairs(self.missionqueue) do
     local mission=_mission --Ops.Auftrag#AUFTRAG
+    
+    if (not OnlyRunning) or (mission.statusCommander~=AUFTRAG.Status.PLANNED) then
 
-    -- Check if this mission type is requested.
-    if AUFTRAG.CheckMissionType(mission.type, MissionTypes) then
-      N=N+1
+      -- Check if this mission type is requested.
+      if AUFTRAG.CheckMissionType(mission.type, MissionTypes) then
+        N=N+1
+      end
+      
     end
   end