FlightControl-Master/MOOSE
1
0
Fork 0
mirror of https://github.com/FlightControl-Master/MOOSE.git synced 2025-10-29 16:58:06 +00:00
Code Issues Packages Projects Releases Wiki Activity

Progress

Browse Source
This commit is contained in:
FlightControl
2016-12-16 12:56:36 +01:00
parent 995e21e200
commit 33f42351e4
30 changed files with 538 additions and 601 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Moose Development/Moose/Functional/AIBalancer.lua → Moose Development/Moose/AI/AI_Balancer.lua
View File

@@ -2,15 +2,15 @@
-- --
-- === -- ===
-- --
-- 1) @{Functional.AIBalancer#AIBALANCER} class, extends @{Fsm.Fsm#FSM_SET} -- 1) @{AI.AI_Balancer#AIBALANCER} class, extends @{Core.Fsm#FSM_SET}
-- =================================================================================== -- ===================================================================================
-- The @{Functional.AIBalancer#AIBALANCER} class monitors and manages as many AI GROUPS as there are -- The @{AI.AI_Balancer#AIBALANCER} class monitors and manages as many AI GROUPS as there are
-- CLIENTS in a SET_CLIENT collection not occupied by players. -- CLIENTS in a SET_CLIENT collection not occupied by players.
-- The AIBALANCER class manages internally a collection of AI management objects, which govern the behaviour -- The AIBALANCER class manages internally a collection of AI management objects, which govern the behaviour
-- of the underlying AI GROUPS. -- of the underlying AI GROUPS.
-- --
-- The parent class @{Fsm.Fsm#FSM_SET} manages the functionality to control the Finite State Machine (FSM) -- The parent class @{Core.Fsm#FSM_SET} manages the functionality to control the Finite State Machine (FSM)
-- and calls for each event the state transition methods providing the internal @{Fsm.Fsm#FSM_SET.Set} object containing the -- and calls for each event the state transition methods providing the internal @{Core.Fsm#FSM_SET.Set} object containing the
-- SET_GROUP and additional event parameters provided during the event. -- SET_GROUP and additional event parameters provided during the event.
-- --
-- 1.1) AIBALANCER construction method -- 1.1) AIBALANCER construction method
@@ -67,14 +67,14 @@
-- --
-- * FlightControl: Framework Design & Programming -- * FlightControl: Framework Design & Programming
-- --
-- @module AIBalancer -- @module AI_Balancer
--- AIBALANCER class --- AIBALANCER class
-- @type AIBALANCER -- @type AIBALANCER
-- @field Core.Set#SET_CLIENT SetClient -- @field Core.Set#SET_CLIENT SetClient
-- @extends Fsm.Fsm#FSM_SET -- @extends Core.Fsm#FSM_SET
AIBALANCER = { AIBALANCER = {
ClassName = "AIBALANCER", ClassName = "AIBALANCER",
PatrolZones = {}, PatrolZones = {},
@@ -91,7 +91,7 @@ AIBALANCER = {
function AIBALANCER:New( SetClient, SpawnAI ) function AIBALANCER:New( SetClient, SpawnAI )
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_SET:New( SET_GROUP:New() ) ) -- Fsm.Fsm#FSM_SET local self = BASE:Inherit( self, FSM_SET:New( SET_GROUP:New() ) ) -- Core.Fsm#FSM_SET
self:SetStartState( "None" ) self:SetStartState( "None" )
self:AddTransition( "*", "Start", "Monitoring" ) self:AddTransition( "*", "Start", "Monitoring" )

10
Moose Development/Moose/Fsm/Cargo.lua → Moose Development/Moose/AI/AI_Cargo.lua
View File

@@ -12,7 +12,7 @@
-- --
-- * CARGO_GROUPED, represented by a Group of CARGO_UNITs. -- * CARGO_GROUPED, represented by a Group of CARGO_UNITs.
-- --
-- 1) @{Fsm.Cargo#CARGO_BASE} class, extends @{Fsm.Fsm#FSM_PROCESS} -- 1) @{AI.AI_Cargo#CARGO_BASE} class, extends @{Core.Fsm#FSM_PROCESS}
-- ========================================================================== -- ==========================================================================
-- The @{#CARGO_BASE} class defines the core functions that defines a cargo object within MOOSE. -- The @{#CARGO_BASE} class defines the core functions that defines a cargo object within MOOSE.
-- A cargo is a logical object defined that is available for transport, and has a life status within a simulation. -- A cargo is a logical object defined that is available for transport, and has a life status within a simulation.
@@ -185,7 +185,7 @@ CARGOS = {}
do -- CARGO_BASE do -- CARGO_BASE
--- @type CARGO_BASE --- @type CARGO_BASE
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
-- @field #string Type A string defining the type of the cargo. eg. Engineers, Equipment, Screwdrivers. -- @field #string Type A string defining the type of the cargo. eg. Engineers, Equipment, Screwdrivers.
-- @field #string Name A string defining the name of the cargo. The name is the unique identifier of the cargo. -- @field #string Name A string defining the name of the cargo. The name is the unique identifier of the cargo.
-- @field #number Weight A number defining the weight of the cargo. The weight is expressed in kg. -- @field #number Weight A number defining the weight of the cargo. The weight is expressed in kg.
@@ -224,7 +224,7 @@ do -- CARGO_BASE
-- @return #CARGO_BASE -- @return #CARGO_BASE
function CARGO_BASE:New( Type, Name, Weight, ReportRadius, NearRadius ) function CARGO_BASE:New( Type, Name, Weight, ReportRadius, NearRadius )
local self = BASE:Inherit( self, FSM:New() ) -- Fsm.Fsm#FSM_CONTROLLABLE local self = BASE:Inherit( self, FSM:New() ) -- Core.Fsm#FSM_CONTROLLABLE
self:F( { Type, Name, Weight, ReportRadius, NearRadius } ) self:F( { Type, Name, Weight, ReportRadius, NearRadius } )
self:SetStartState( "UnLoaded" ) self:SetStartState( "UnLoaded" )
@@ -803,7 +803,7 @@ end
do -- CARGO_GROUP do -- CARGO_GROUP
--- @type CARGO_GROUP --- @type CARGO_GROUP
-- @extends Fsm.Cargo#CARGO_BASE -- @extends AI.AI_Cargo#CARGO_BASE
-- @field Set#SET_BASE CargoSet A set of cargo objects. -- @field Set#SET_BASE CargoSet A set of cargo objects.
-- @field #string Name A string defining the name of the cargo group. The name is the unique identifier of the cargo. -- @field #string Name A string defining the name of the cargo group. The name is the unique identifier of the cargo.
CARGO_GROUP = { CARGO_GROUP = {
@@ -834,7 +834,7 @@ end -- CARGO_GROUP
do -- CARGO_GROUPED do -- CARGO_GROUPED
--- @type CARGO_GROUPED --- @type CARGO_GROUPED
-- @extends Fsm.Cargo#CARGO_GROUP -- @extends AI.AI_Cargo#CARGO_GROUP
CARGO_GROUPED = { CARGO_GROUPED = {
ClassName = "CARGO_GROUPED", ClassName = "CARGO_GROUPED",
} }

8
Moose Development/Moose/Fsm/Patrol.lua → Moose Development/Moose/AI/AI_Patrol.lua
View File

@@ -2,7 +2,7 @@
-- --
-- === -- ===
-- --
-- 1) @{#PATROLZONE} class, extends @{Fsm.Fsm#FSM} -- 1) @{#PATROLZONE} class, extends @{Core.Fsm#FSM_CONTROLLABLE}
-- ================================================================ -- ================================================================
-- The @{#PATROLZONE} class implements the core functions to patrol a @{Zone} by an AIR @{Controllable} @{Group}. -- The @{#PATROLZONE} class implements the core functions to patrol a @{Zone} by an AIR @{Controllable} @{Group}.
-- The patrol algorithm works that for each airplane patrolling, upon arrival at the patrol zone, -- The patrol algorithm works that for each airplane patrolling, upon arrival at the patrol zone,
@@ -155,7 +155,7 @@
-- @field Dcs.DCSTypes#Altitude PatrolCeilingAltitude The highest altitude in meters where to execute the patrol. -- @field Dcs.DCSTypes#Altitude PatrolCeilingAltitude The highest altitude in meters where to execute the patrol.
-- @field Dcs.DCSTypes#Speed PatrolMinSpeed The minimum speed of the @{Controllable} in km/h. -- @field Dcs.DCSTypes#Speed PatrolMinSpeed The minimum speed of the @{Controllable} in km/h.
-- @field Dcs.DCSTypes#Speed PatrolMaxSpeed The maximum speed of the @{Controllable} in km/h. -- @field Dcs.DCSTypes#Speed PatrolMaxSpeed The maximum speed of the @{Controllable} in km/h.
-- @extends Fsm.Fsm#FSM_CONTROLLABLE -- @extends Core.Fsm#FSM_CONTROLLABLE
PATROLZONE = { PATROLZONE = {
ClassName = "PATROLZONE", ClassName = "PATROLZONE",
} }
@@ -178,7 +178,7 @@ PATROLZONE = {
function PATROLZONE:New( PatrolZone, PatrolFloorAltitude, PatrolCeilingAltitude, PatrolMinSpeed, PatrolMaxSpeed ) function PATROLZONE:New( PatrolZone, PatrolFloorAltitude, PatrolCeilingAltitude, PatrolMinSpeed, PatrolMaxSpeed )
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_CONTROLLABLE:New() ) -- Fsm.Fsm#FSM_CONTROLLABLE local self = BASE:Inherit( self, FSM_CONTROLLABLE:New() ) -- Core.Fsm#FSM_CONTROLLABLE
self:SetStartState( "None" ) self:SetStartState( "None" )
self:AddTransition( "*", "Start", "Route" ) self:AddTransition( "*", "Start", "Route" )
@@ -345,7 +345,7 @@ function PATROLZONE:onenterRoute()
self.Controllable:SetState( self.Controllable, "PatrolZone", self ) self.Controllable:SetState( self.Controllable, "PatrolZone", self )
self.Controllable:WayPointFunction( #PatrolRoute, 1, "_NewPatrolRoute" ) self.Controllable:WayPointFunction( #PatrolRoute, 1, "_NewPatrolRoute" )
--- NOW FSM_ROUTE THE GROUP! --- NOW ACT_ROUTE THE GROUP!
self.Controllable:WayPointExecute( 1 ) self.Controllable:WayPointExecute( 1 )
self:__Patrol( 30 ) self:__Patrol( 30 )

94
Moose Development/Moose/Fsm/FsmAccount.lua → Moose Development/Moose/Actions/Act_Account.lua
View File

@@ -2,16 +2,16 @@
-- --
-- === -- ===
-- --
-- # @{#FSM_ACCOUNT} FSM class, extends @{Fsm.Fsm#FSM_PROCESS} -- # @{#ACT_ACCOUNT} FSM class, extends @{Core.Fsm#FSM_PROCESS}
-- --
-- ## FSM_ACCOUNT state machine: -- ## ACT_ACCOUNT state machine:
-- --
-- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur. -- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur.
-- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below. -- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below.
-- Each derived class follows exactly the same process, using the same events and following the same state transitions, -- Each derived class follows exactly the same process, using the same events and following the same state transitions,
-- but will have **different implementation behaviour** upon each event or state transition. -- but will have **different implementation behaviour** upon each event or state transition.
-- --
-- ### FSM_ACCOUNT **Events**: -- ### ACT_ACCOUNT **Events**:
-- --
-- These are the events defined in this class: -- These are the events defined in this class:
-- --
@@ -21,7 +21,7 @@
-- * **More**: There are more DCS events that need to be accounted for. The process will go back into the Report state. -- * **More**: There are more DCS events that need to be accounted for. The process will go back into the Report state.
-- * **NoMore**: There are no more DCS events that need to be accounted for. The process will go into the Success state. -- * **NoMore**: There are no more DCS events that need to be accounted for. The process will go into the Success state.
-- --
-- ### FSM_ACCOUNT **Event methods**: -- ### ACT_ACCOUNT **Event methods**:
-- --
-- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process. -- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process.
-- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine: -- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine:
@@ -29,7 +29,7 @@
-- * **Immediate**: The event method has exactly the name of the event. -- * **Immediate**: The event method has exactly the name of the event.
-- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed. -- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed.
-- --
-- ### FSM_ACCOUNT **States**: -- ### ACT_ACCOUNT **States**:
-- --
-- * **Assigned**: The player is assigned to the task. This is the initialization state for the process. -- * **Assigned**: The player is assigned to the task. This is the initialization state for the process.
-- * **Waiting**: the process is waiting for a DCS event to occur within the simulator. This state is set automatically. -- * **Waiting**: the process is waiting for a DCS event to occur within the simulator. This state is set automatically.
@@ -40,7 +40,7 @@
-- --
-- (*) End states of the process. -- (*) End states of the process.
-- --
-- ### FSM_ACCOUNT state transition methods: -- ### ACT_ACCOUNT state transition methods:
-- --
-- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state. -- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state.
-- There are 2 moments when state transition methods will be called by the state machine: -- There are 2 moments when state transition methods will be called by the state machine:
@@ -55,41 +55,41 @@
-- The state transition method needs to start with the name **OnAfter + the name of the state**. -- The state transition method needs to start with the name **OnAfter + the name of the state**.
-- These state transition methods need to provide a return value, which is specified at the function description. -- These state transition methods need to provide a return value, which is specified at the function description.
-- --
-- # 1) @{#FSM_ACCOUNT_DEADS} FSM class, extends @{Fsm.Account#FSM_ACCOUNT} -- # 1) @{#ACT_ACCOUNT_DEADS} FSM class, extends @{Fsm.Account#ACT_ACCOUNT}
-- --
-- The FSM_ACCOUNT_DEADS class accounts (detects, counts and reports) successful kills of DCS units. -- The ACT_ACCOUNT_DEADS class accounts (detects, counts and reports) successful kills of DCS units.
-- The process is given a @{Set} of units that will be tracked upon successful destruction. -- The process is given a @{Set} of units that will be tracked upon successful destruction.
-- The process will end after each target has been successfully destroyed. -- The process will end after each target has been successfully destroyed.
-- Each successful dead will trigger an Account state transition that can be scored, modified or administered. -- Each successful dead will trigger an Account state transition that can be scored, modified or administered.
-- --
-- --
-- ## FSM_ACCOUNT_DEADS constructor: -- ## ACT_ACCOUNT_DEADS constructor:
-- --
-- * @{#FSM_ACCOUNT_DEADS.New}(): Creates a new FSM_ACCOUNT_DEADS object. -- * @{#ACT_ACCOUNT_DEADS.New}(): Creates a new ACT_ACCOUNT_DEADS object.
-- --
-- === -- ===
-- --
-- @module Account -- @module Account
do -- FSM_ACCOUNT do -- ACT_ACCOUNT
--- FSM_ACCOUNT class --- ACT_ACCOUNT class
-- @type FSM_ACCOUNT -- @type ACT_ACCOUNT
-- @field Set#SET_UNIT TargetSetUnit -- @field Set#SET_UNIT TargetSetUnit
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
FSM_ACCOUNT = { ACT_ACCOUNT = {
ClassName = "FSM_ACCOUNT", ClassName = "ACT_ACCOUNT",
TargetSetUnit = nil, TargetSetUnit = nil,
} }
--- Creates a new DESTROY process. --- Creates a new DESTROY process.
-- @param #FSM_ACCOUNT self -- @param #ACT_ACCOUNT self
-- @return #FSM_ACCOUNT -- @return #ACT_ACCOUNT
function FSM_ACCOUNT:New() function ACT_ACCOUNT:New()
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_PROCESS:New() ) -- Fsm.Fsm#FSM_PROCESS local self = BASE:Inherit( self, FSM_PROCESS:New() ) -- Core.Fsm#FSM_PROCESS
self:AddTransition( "Assigned", "Start", "Waiting") self:AddTransition( "Assigned", "Start", "Waiting")
self:AddTransition( "*", "Wait", "Waiting") self:AddTransition( "*", "Wait", "Waiting")
@@ -110,12 +110,12 @@ do -- FSM_ACCOUNT
--- Process Events --- Process Events
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ACCOUNT self -- @param #ACT_ACCOUNT self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ACCOUNT:onafterStart( ProcessUnit, Event, From, To ) function ACT_ACCOUNT:onafterStart( ProcessUnit, Event, From, To )
self:EventOnDead( self.onfuncEventDead ) self:EventOnDead( self.onfuncEventDead )
@@ -124,12 +124,12 @@ do -- FSM_ACCOUNT
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ACCOUNT self -- @param #ACT_ACCOUNT self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ACCOUNT:onenterWaiting( ProcessUnit, Event, From, To ) function ACT_ACCOUNT:onenterWaiting( ProcessUnit, Event, From, To )
if self.DisplayCount >= self.DisplayInterval then if self.DisplayCount >= self.DisplayInterval then
self:Report() self:Report()
@@ -142,37 +142,37 @@ do -- FSM_ACCOUNT
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ACCOUNT self -- @param #ACT_ACCOUNT self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ACCOUNT:onafterEvent( ProcessUnit, Event, From, To, Event ) function ACT_ACCOUNT:onafterEvent( ProcessUnit, Event, From, To, Event )
self:__NoMore( 1 ) self:__NoMore( 1 )
end end
end -- FSM_ACCOUNT end -- ACT_ACCOUNT
do -- FSM_ACCOUNT_DEADS do -- ACT_ACCOUNT_DEADS
--- FSM_ACCOUNT_DEADS class --- ACT_ACCOUNT_DEADS class
-- @type FSM_ACCOUNT_DEADS -- @type ACT_ACCOUNT_DEADS
-- @field Set#SET_UNIT TargetSetUnit -- @field Set#SET_UNIT TargetSetUnit
-- @extends #FSM_ACCOUNT -- @extends #ACT_ACCOUNT
FSM_ACCOUNT_DEADS = { ACT_ACCOUNT_DEADS = {
ClassName = "FSM_ACCOUNT_DEADS", ClassName = "ACT_ACCOUNT_DEADS",
TargetSetUnit = nil, TargetSetUnit = nil,
} }
--- Creates a new DESTROY process. --- Creates a new DESTROY process.
-- @param #FSM_ACCOUNT_DEADS self -- @param #ACT_ACCOUNT_DEADS self
-- @param Set#SET_UNIT TargetSetUnit -- @param Set#SET_UNIT TargetSetUnit
-- @param #string TaskName -- @param #string TaskName
function FSM_ACCOUNT_DEADS:New( TargetSetUnit, TaskName ) function ACT_ACCOUNT_DEADS:New( TargetSetUnit, TaskName )
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_ACCOUNT:New() ) -- #FSM_ACCOUNT_DEADS local self = BASE:Inherit( self, ACT_ACCOUNT:New() ) -- #ACT_ACCOUNT_DEADS
self.TargetSetUnit = TargetSetUnit self.TargetSetUnit = TargetSetUnit
self.TaskName = TaskName self.TaskName = TaskName
@@ -186,7 +186,7 @@ do -- FSM_ACCOUNT_DEADS
return self return self
end end
function FSM_ACCOUNT_DEADS:Init( FsmAccount ) function ACT_ACCOUNT_DEADS:Init( FsmAccount )
self.TargetSetUnit = FsmAccount.TargetSetUnit self.TargetSetUnit = FsmAccount.TargetSetUnit
self.TaskName = FsmAccount.TaskName self.TaskName = FsmAccount.TaskName
@@ -194,7 +194,7 @@ do -- FSM_ACCOUNT_DEADS
function FSM_ACCOUNT_DEADS:_Destructor() function ACT_ACCOUNT_DEADS:_Destructor()
self:E("_Destructor") self:E("_Destructor")
self:EventRemoveAll() self:EventRemoveAll()
@@ -204,12 +204,12 @@ do -- FSM_ACCOUNT_DEADS
--- Process Events --- Process Events
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ACCOUNT_DEADS self -- @param #ACT_ACCOUNT_DEADS self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ACCOUNT_DEADS:onenterReport( ProcessUnit, Event, From, To ) function ACT_ACCOUNT_DEADS:onenterReport( ProcessUnit, Event, From, To )
self:E( { ProcessUnit, Event, From, To } ) self:E( { ProcessUnit, Event, From, To } )
self:Message( "Your group with assigned " .. self.TaskName .. " task has " .. self.TargetSetUnit:GetUnitTypesText() .. " targets left to be destroyed." ) self:Message( "Your group with assigned " .. self.TaskName .. " task has " .. self.TargetSetUnit:GetUnitTypesText() .. " targets left to be destroyed." )
@@ -217,12 +217,12 @@ do -- FSM_ACCOUNT_DEADS
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ACCOUNT_DEADS self -- @param #ACT_ACCOUNT_DEADS self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ACCOUNT_DEADS:onenterAccount( ProcessUnit, Event, From, To, EventData ) function ACT_ACCOUNT_DEADS:onenterAccount( ProcessUnit, Event, From, To, EventData )
self:T( { ProcessUnit, EventData, Event, From, To } ) self:T( { ProcessUnit, EventData, Event, From, To } )
self:T({self.Controllable}) self:T({self.Controllable})
@@ -237,12 +237,12 @@ do -- FSM_ACCOUNT_DEADS
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ACCOUNT_DEADS self -- @param #ACT_ACCOUNT_DEADS self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ACCOUNT_DEADS:onafterEvent( ProcessUnit, Event, From, To, EventData ) function ACT_ACCOUNT_DEADS:onafterEvent( ProcessUnit, Event, From, To, EventData )
if self.TargetSetUnit:Count() > 0 then if self.TargetSetUnit:Count() > 0 then
self:__More( 1 ) self:__More( 1 )
@@ -253,9 +253,9 @@ do -- FSM_ACCOUNT_DEADS
--- DCS Events --- DCS Events
--- @param #FSM_ACCOUNT_DEADS self --- @param #ACT_ACCOUNT_DEADS self
-- @param Event#EVENTDATA EventData -- @param Event#EVENTDATA EventData
function FSM_ACCOUNT_DEADS:onfuncEventDead( EventData ) function ACT_ACCOUNT_DEADS:onfuncEventDead( EventData )
self:T( { "EventDead", EventData } ) self:T( { "EventDead", EventData } )
if EventData.IniDCSUnit then if EventData.IniDCSUnit then
@@ -263,4 +263,4 @@ do -- FSM_ACCOUNT_DEADS
end end
end end
end -- FSM_ACCOUNT DEADS end -- ACT_ACCOUNT DEADS

136
Moose Development/Moose/Fsm/FsmAssign.lua → Moose Development/Moose/Actions/Act_Assign.lua
View File

@@ -2,16 +2,16 @@
-- --
-- === -- ===
-- --
-- # @{#FSM_ASSIGN} FSM template class, extends @{Fsm.Fsm#FSM_PROCESS} -- # @{#ACT_ASSIGN} FSM template class, extends @{Core.Fsm#FSM_PROCESS}
-- --
-- ## FSM_ASSIGN state machine: -- ## ACT_ASSIGN state machine:
-- --
-- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur. -- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur.
-- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below. -- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below.
-- Each derived class follows exactly the same process, using the same events and following the same state transitions, -- Each derived class follows exactly the same process, using the same events and following the same state transitions,
-- but will have **different implementation behaviour** upon each event or state transition. -- but will have **different implementation behaviour** upon each event or state transition.
-- --
-- ### FSM_ASSIGN **Events**: -- ### ACT_ASSIGN **Events**:
-- --
-- These are the events defined in this class: -- These are the events defined in this class:
-- --
@@ -19,7 +19,7 @@
-- * **Assign**: Assign the task. -- * **Assign**: Assign the task.
-- * **Reject**: Reject the task.. -- * **Reject**: Reject the task..
-- --
-- ### FSM_ASSIGN **Event methods**: -- ### ACT_ASSIGN **Event methods**:
-- --
-- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process. -- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process.
-- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine: -- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine:
@@ -27,7 +27,7 @@
-- * **Immediate**: The event method has exactly the name of the event. -- * **Immediate**: The event method has exactly the name of the event.
-- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed. -- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed.
-- --
-- ### FSM_ASSIGN **States**: -- ### ACT_ASSIGN **States**:
-- --
-- * **UnAssigned**: The player has not accepted the task. -- * **UnAssigned**: The player has not accepted the task.
-- * **Assigned (*)**: The player has accepted the task. -- * **Assigned (*)**: The player has accepted the task.
@@ -37,7 +37,7 @@
-- --
-- (*) End states of the process. -- (*) End states of the process.
-- --
-- ### FSM_ASSIGN state transition methods: -- ### ACT_ASSIGN state transition methods:
-- --
-- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state. -- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state.
-- There are 2 moments when state transition methods will be called by the state machine: -- There are 2 moments when state transition methods will be called by the state machine:
@@ -54,52 +54,52 @@
-- --
-- === -- ===
-- --
-- # 1) @{#FSM_ASSIGN_ACCEPT} class, extends @{Fsm.Assign#FSM_ASSIGN} -- # 1) @{#ACT_ASSIGN_ACCEPT} class, extends @{Fsm.Assign#ACT_ASSIGN}
-- --
-- The FSM_ASSIGN_ACCEPT class accepts by default a task for a player. No player intervention is allowed to reject the task. -- The ACT_ASSIGN_ACCEPT class accepts by default a task for a player. No player intervention is allowed to reject the task.
-- --
-- ## 1.1) FSM_ASSIGN_ACCEPT constructor: -- ## 1.1) ACT_ASSIGN_ACCEPT constructor:
-- --
-- * @{#FSM_ASSIGN_ACCEPT.New}(): Creates a new FSM_ASSIGN_ACCEPT object. -- * @{#ACT_ASSIGN_ACCEPT.New}(): Creates a new ACT_ASSIGN_ACCEPT object.
-- --
-- === -- ===
-- --
-- # 2) @{#FSM_ASSIGN_MENU_ACCEPT} class, extends @{Fsm.Assign#FSM_ASSIGN} -- # 2) @{#ACT_ASSIGN_MENU_ACCEPT} class, extends @{Fsm.Assign#ACT_ASSIGN}
-- --
-- The FSM_ASSIGN_MENU_ACCEPT class accepts a task when the player accepts the task through an added menu option. -- The ACT_ASSIGN_MENU_ACCEPT class accepts a task when the player accepts the task through an added menu option.
-- This assignment type is useful to conditionally allow the player to choose whether or not he would accept the task. -- This assignment type is useful to conditionally allow the player to choose whether or not he would accept the task.
-- The assignment type also allows to reject the task. -- The assignment type also allows to reject the task.
-- --
-- ## 2.1) FSM_ASSIGN_MENU_ACCEPT constructor: -- ## 2.1) ACT_ASSIGN_MENU_ACCEPT constructor:
-- ----------------------------------------- -- -----------------------------------------
-- --
-- * @{#FSM_ASSIGN_MENU_ACCEPT.New}(): Creates a new FSM_ASSIGN_MENU_ACCEPT object. -- * @{#ACT_ASSIGN_MENU_ACCEPT.New}(): Creates a new ACT_ASSIGN_MENU_ACCEPT object.
-- --
-- === -- ===
-- --
-- @module Assign -- @module Assign
do -- FSM_ASSIGN do -- ACT_ASSIGN
--- FSM_ASSIGN class --- ACT_ASSIGN class
-- @type FSM_ASSIGN -- @type ACT_ASSIGN
-- @field Tasking.Task#TASK_BASE Task -- @field Tasking.Task#TASK Task
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Zone#ZONE_BASE TargetZone -- @field Core.Zone#ZONE_BASE TargetZone
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
FSM_ASSIGN = { ACT_ASSIGN = {
ClassName = "FSM_ASSIGN", ClassName = "ACT_ASSIGN",
} }
--- Creates a new task assignment state machine. The process will accept the task by default, no player intervention accepted. --- Creates a new task assignment state machine. The process will accept the task by default, no player intervention accepted.
-- @param #FSM_ASSIGN self -- @param #ACT_ASSIGN self
-- @return #FSM_ASSIGN The task acceptance process. -- @return #ACT_ASSIGN The task acceptance process.
function FSM_ASSIGN:New() function ACT_ASSIGN:New()
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_PROCESS:New( "FSM_ASSIGN" ) ) -- Fsm.Fsm#FSM_PROCESS local self = BASE:Inherit( self, FSM_PROCESS:New( "ACT_ASSIGN" ) ) -- Core.Fsm#FSM_PROCESS
self:AddTransition( "UnAssigned", "Start", "Waiting" ) self:AddTransition( "UnAssigned", "Start", "Waiting" )
self:AddTransition( "Waiting", "Assign", "Assigned" ) self:AddTransition( "Waiting", "Assign", "Assigned" )
@@ -115,59 +115,59 @@ do -- FSM_ASSIGN
return self return self
end end
end -- FSM_ASSIGN end -- ACT_ASSIGN
do -- FSM_ASSIGN_ACCEPT do -- ACT_ASSIGN_ACCEPT
--- FSM_ASSIGN_ACCEPT class --- ACT_ASSIGN_ACCEPT class
-- @type FSM_ASSIGN_ACCEPT -- @type ACT_ASSIGN_ACCEPT
-- @field Tasking.Task#TASK_BASE Task -- @field Tasking.Task#TASK Task
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Zone#ZONE_BASE TargetZone -- @field Core.Zone#ZONE_BASE TargetZone
-- @extends #FSM_ASSIGN -- @extends #ACT_ASSIGN
FSM_ASSIGN_ACCEPT = { ACT_ASSIGN_ACCEPT = {
ClassName = "FSM_ASSIGN_ACCEPT", ClassName = "ACT_ASSIGN_ACCEPT",
} }
--- Creates a new task assignment state machine. The process will accept the task by default, no player intervention accepted. --- Creates a new task assignment state machine. The process will accept the task by default, no player intervention accepted.
-- @param #FSM_ASSIGN_ACCEPT self -- @param #ACT_ASSIGN_ACCEPT self
-- @param #string TaskBriefing -- @param #string TaskBriefing
function FSM_ASSIGN_ACCEPT:New( TaskBriefing ) function ACT_ASSIGN_ACCEPT:New( TaskBriefing )
local self = BASE:Inherit( self, FSM_ASSIGN:New() ) -- #FSM_ASSIGN_ACCEPT local self = BASE:Inherit( self, ACT_ASSIGN:New() ) -- #ACT_ASSIGN_ACCEPT
self.TaskBriefing = TaskBriefing self.TaskBriefing = TaskBriefing
return self return self
end end
function FSM_ASSIGN_ACCEPT:Init( FsmAssign ) function ACT_ASSIGN_ACCEPT:Init( FsmAssign )
self.TaskBriefing = FsmAssign.TaskBriefing self.TaskBriefing = FsmAssign.TaskBriefing
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ASSIGN_ACCEPT self -- @param #ACT_ASSIGN_ACCEPT self
-- @param Wrapper.Unit#UNIT ProcessUnit -- @param Wrapper.Unit#UNIT ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ASSIGN_ACCEPT:onafterStart( ProcessUnit, Event, From, To ) function ACT_ASSIGN_ACCEPT:onafterStart( ProcessUnit, Event, From, To )
self:E( { ProcessUnit, Event, From, To } ) self:E( { ProcessUnit, Event, From, To } )
self:__Assign( 1 ) self:__Assign( 1 )
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ASSIGN_ACCEPT self -- @param #ACT_ASSIGN_ACCEPT self
-- @param Wrapper.Unit#UNIT ProcessUnit -- @param Wrapper.Unit#UNIT ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ASSIGN_ACCEPT:onenterAssigned( ProcessUnit, Event, From, To ) function ACT_ASSIGN_ACCEPT:onenterAssigned( ProcessUnit, Event, From, To )
env.info( "in here" ) env.info( "in here" )
self:E( { ProcessUnit, Event, From, To } ) self:E( { ProcessUnit, Event, From, To } )
@@ -178,30 +178,30 @@ do -- FSM_ASSIGN_ACCEPT
self.Task:Assign() self.Task:Assign()
end end
end -- FSM_ASSIGN_ACCEPT end -- ACT_ASSIGN_ACCEPT
do -- FSM_ASSIGN_MENU_ACCEPT do -- ACT_ASSIGN_MENU_ACCEPT
--- FSM_ASSIGN_MENU_ACCEPT class --- ACT_ASSIGN_MENU_ACCEPT class
-- @type FSM_ASSIGN_MENU_ACCEPT -- @type ACT_ASSIGN_MENU_ACCEPT
-- @field Tasking.Task#TASK_BASE Task -- @field Tasking.Task#TASK Task
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Zone#ZONE_BASE TargetZone -- @field Core.Zone#ZONE_BASE TargetZone
-- @extends #FSM_ASSIGN -- @extends #ACT_ASSIGN
FSM_ASSIGN_MENU_ACCEPT = { ACT_ASSIGN_MENU_ACCEPT = {
ClassName = "FSM_ASSIGN_MENU_ACCEPT", ClassName = "ACT_ASSIGN_MENU_ACCEPT",
} }
--- Init. --- Init.
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
-- @param #string TaskName -- @param #string TaskName
-- @param #string TaskBriefing -- @param #string TaskBriefing
-- @return #FSM_ASSIGN_MENU_ACCEPT self -- @return #ACT_ASSIGN_MENU_ACCEPT self
function FSM_ASSIGN_MENU_ACCEPT:New( TaskName, TaskBriefing ) function ACT_ASSIGN_MENU_ACCEPT:New( TaskName, TaskBriefing )
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_ASSIGN:New() ) -- #FSM_ASSIGN_MENU_ACCEPT local self = BASE:Inherit( self, ACT_ASSIGN:New() ) -- #ACT_ASSIGN_MENU_ACCEPT
self.TaskName = TaskName self.TaskName = TaskName
self.TaskBriefing = TaskBriefing self.TaskBriefing = TaskBriefing
@@ -209,7 +209,7 @@ do -- FSM_ASSIGN_MENU_ACCEPT
return self return self
end end
function FSM_ASSIGN_MENU_ACCEPT:Init( FsmAssign ) function ACT_ASSIGN_MENU_ACCEPT:Init( FsmAssign )
self.TaskName = FsmAssign.TaskName self.TaskName = FsmAssign.TaskName
self.TaskBriefing = FsmAssign.TaskBriefing self.TaskBriefing = FsmAssign.TaskBriefing
@@ -217,11 +217,11 @@ do -- FSM_ASSIGN_MENU_ACCEPT
--- Creates a new task assignment state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator. --- Creates a new task assignment state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator.
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
-- @param #string TaskName -- @param #string TaskName
-- @param #string TaskBriefing -- @param #string TaskBriefing
-- @return #FSM_ASSIGN_MENU_ACCEPT self -- @return #ACT_ASSIGN_MENU_ACCEPT self
function FSM_ASSIGN_MENU_ACCEPT:Init( TaskName, TaskBriefing ) function ACT_ASSIGN_MENU_ACCEPT:Init( TaskName, TaskBriefing )
self.TaskBriefing = TaskBriefing self.TaskBriefing = TaskBriefing
self.TaskName = TaskName self.TaskName = TaskName
@@ -230,12 +230,12 @@ do -- FSM_ASSIGN_MENU_ACCEPT
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ASSIGN_MENU_ACCEPT:onafterStart( ProcessUnit, Event, From, To ) function ACT_ASSIGN_MENU_ACCEPT:onafterStart( ProcessUnit, Event, From, To )
self:E( { ProcessUnit, Event, From, To } ) self:E( { ProcessUnit, Event, From, To } )
self:Message( "Access the radio menu to accept the task. You have 30 seconds or the assignment will be cancelled." ) self:Message( "Access the radio menu to accept the task. You have 30 seconds or the assignment will be cancelled." )
@@ -248,40 +248,40 @@ do -- FSM_ASSIGN_MENU_ACCEPT
end end
--- Menu function. --- Menu function.
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
function FSM_ASSIGN_MENU_ACCEPT:MenuAssign() function ACT_ASSIGN_MENU_ACCEPT:MenuAssign()
self:E( ) self:E( )
self:__Assign( 1 ) self:__Assign( 1 )
end end
--- Menu function. --- Menu function.
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
function FSM_ASSIGN_MENU_ACCEPT:MenuReject() function ACT_ASSIGN_MENU_ACCEPT:MenuReject()
self:E( ) self:E( )
self:__Reject( 1 ) self:__Reject( 1 )
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ASSIGN_MENU_ACCEPT:onafterAssign( ProcessUnit, Event, From, To ) function ACT_ASSIGN_MENU_ACCEPT:onafterAssign( ProcessUnit, Event, From, To )
self:E( { ProcessUnit.UnitNameEvent, From, To } ) self:E( { ProcessUnit.UnitNameEvent, From, To } )
self.Menu:Remove() self.Menu:Remove()
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ASSIGN_MENU_ACCEPT self -- @param #ACT_ASSIGN_MENU_ACCEPT self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ASSIGN_MENU_ACCEPT:onafterReject( ProcessUnit, Event, From, To ) function ACT_ASSIGN_MENU_ACCEPT:onafterReject( ProcessUnit, Event, From, To )
self:E( { ProcessUnit.UnitName, Event, From, To } ) self:E( { ProcessUnit.UnitName, Event, From, To } )
self.Menu:Remove() self.Menu:Remove()
@@ -290,4 +290,4 @@ do -- FSM_ASSIGN_MENU_ACCEPT
ProcessUnit:Destroy() ProcessUnit:Destroy()
end end
end -- FSM_ASSIGN_MENU_ACCEPT end -- ACT_ASSIGN_MENU_ACCEPT

76
Moose Development/Moose/Fsm/FsmSmoke.lua → Moose Development/Moose/Actions/Act_Assist.lua
View File

@@ -2,23 +2,23 @@
-- --
-- === -- ===
-- --
-- # @{#FSM_SMOKE} FSM class, extends @{Fsm.Fsm#FSM_PROCESS} -- # @{#ACT_ASSIST} FSM class, extends @{Core.Fsm#FSM_PROCESS}
-- --
-- ## FSM_SMOKE state machine: -- ## ACT_ASSIST state machine:
-- --
-- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur. -- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur.
-- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below. -- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below.
-- Each derived class follows exactly the same process, using the same events and following the same state transitions, -- Each derived class follows exactly the same process, using the same events and following the same state transitions,
-- but will have **different implementation behaviour** upon each event or state transition. -- but will have **different implementation behaviour** upon each event or state transition.
-- --
-- ### FSM_SMOKE **Events**: -- ### ACT_ASSIST **Events**:
-- --
-- These are the events defined in this class: -- These are the events defined in this class:
-- --
-- * **Start**: The process is started. -- * **Start**: The process is started.
-- * **Next**: The process is smoking the targets in the given zone. -- * **Next**: The process is smoking the targets in the given zone.
-- --
-- ### FSM_SMOKE **Event methods**: -- ### ACT_ASSIST **Event methods**:
-- --
-- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process. -- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process.
-- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine: -- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine:
@@ -26,7 +26,7 @@
-- * **Immediate**: The event method has exactly the name of the event. -- * **Immediate**: The event method has exactly the name of the event.
-- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed. -- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed.
-- --
-- ### FSM_SMOKE **States**: -- ### ACT_ASSIST **States**:
-- --
-- * **None**: The controllable did not receive route commands. -- * **None**: The controllable did not receive route commands.
-- * **AwaitSmoke (*)**: The process is awaiting to smoke the targets in the zone. -- * **AwaitSmoke (*)**: The process is awaiting to smoke the targets in the zone.
@@ -35,7 +35,7 @@
-- --
-- (*) End states of the process. -- (*) End states of the process.
-- --
-- ### FSM_SMOKE state transition methods: -- ### ACT_ASSIST state transition methods:
-- --
-- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state. -- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state.
-- There are 2 moments when state transition methods will be called by the state machine: -- There are 2 moments when state transition methods will be called by the state machine:
@@ -52,36 +52,36 @@
-- --
-- === -- ===
-- --
-- # 1) @{#FSM_SMOKE_TARGETS_ZONE} class, extends @{Fsm.Route#FSM_SMOKE} -- # 1) @{#ACT_ASSIST_SMOKE_TARGETS_ZONE} class, extends @{Fsm.Route#ACT_ASSIST}
-- --
-- The FSM_SMOKE_TARGETS_ZONE class implements the core functions to smoke targets in a @{Zone}. -- The ACT_ASSIST_SMOKE_TARGETS_ZONE class implements the core functions to smoke targets in a @{Zone}.
-- The targets are smoked within a certain range around each target, simulating a realistic smoking behaviour. -- The targets are smoked within a certain range around each target, simulating a realistic smoking behaviour.
-- At random intervals, a new target is smoked. -- At random intervals, a new target is smoked.
-- --
-- # 1.1) FSM_SMOKE_TARGETS_ZONE constructor: -- # 1.1) ACT_ASSIST_SMOKE_TARGETS_ZONE constructor:
-- --
-- * @{#FSM_SMOKE_TARGETS_ZONE.New}(): Creates a new FSM_SMOKE_TARGETS_ZONE object. -- * @{#ACT_ASSIST_SMOKE_TARGETS_ZONE.New}(): Creates a new ACT_ASSIST_SMOKE_TARGETS_ZONE object.
-- --
-- === -- ===
-- --
-- @module Smoke -- @module Smoke
do -- FSM_SMOKE do -- ACT_ASSIST
--- FSM_SMOKE class --- ACT_ASSIST class
-- @type FSM_SMOKE -- @type ACT_ASSIST
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
FSM_SMOKE = { ACT_ASSIST = {
ClassName = "FSM_SMOKE", ClassName = "ACT_ASSIST",
} }
--- Creates a new target smoking state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator. --- Creates a new target smoking state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator.
-- @param #FSM_SMOKE self -- @param #ACT_ASSIST self
-- @return #FSM_SMOKE -- @return #ACT_ASSIST
function FSM_SMOKE:New() function ACT_ASSIST:New()
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_PROCESS:New( "FSM_SMOKE" ) ) -- Fsm.Fsm#FSM_PROCESS local self = BASE:Inherit( self, FSM_PROCESS:New( "ACT_ASSIST" ) ) -- Core.Fsm#FSM_PROCESS
self:AddTransition( "None", "Start", "AwaitSmoke" ) self:AddTransition( "None", "Start", "AwaitSmoke" )
self:AddTransition( "AwaitSmoke", "Next", "Smoking" ) self:AddTransition( "AwaitSmoke", "Next", "Smoking" )
@@ -100,12 +100,12 @@ do -- FSM_SMOKE
--- Task Events --- Task Events
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_SMOKE self -- @param #ACT_ASSIST self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_SMOKE:onafterStart( ProcessUnit, Event, From, To ) function ACT_ASSIST:onafterStart( ProcessUnit, Event, From, To )
local ProcessGroup = ProcessUnit:GetGroup() local ProcessGroup = ProcessUnit:GetGroup()
local MissionMenu = self:GetMission():GetMissionMenu( ProcessGroup ) local MissionMenu = self:GetMission():GetMissionMenu( ProcessGroup )
@@ -128,18 +128,18 @@ do -- FSM_SMOKE
end end
do -- FSM_SMOKE_TARGETS_ZONE do -- ACT_ASSIST_SMOKE_TARGETS_ZONE
--- FSM_SMOKE_TARGETS_ZONE class --- ACT_ASSIST_SMOKE_TARGETS_ZONE class
-- @type FSM_SMOKE_TARGETS_ZONE -- @type ACT_ASSIST_SMOKE_TARGETS_ZONE
-- @field Set#SET_UNIT TargetSetUnit -- @field Set#SET_UNIT TargetSetUnit
-- @field Core.Zone#ZONE_BASE TargetZone -- @field Core.Zone#ZONE_BASE TargetZone
-- @extends #FSM_SMOKE -- @extends #ACT_ASSIST
FSM_SMOKE_TARGETS_ZONE = { ACT_ASSIST_SMOKE_TARGETS_ZONE = {
ClassName = "FSM_SMOKE_TARGETS_ZONE", ClassName = "ACT_ASSIST_SMOKE_TARGETS_ZONE",
} }
-- function FSM_SMOKE_TARGETS_ZONE:_Destructor() -- function ACT_ASSIST_SMOKE_TARGETS_ZONE:_Destructor()
-- self:E("_Destructor") -- self:E("_Destructor")
-- --
-- self.Menu:Remove() -- self.Menu:Remove()
@@ -147,11 +147,11 @@ do -- FSM_SMOKE_TARGETS_ZONE
-- end -- end
--- Creates a new target smoking state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator. --- Creates a new target smoking state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator.
-- @param #FSM_SMOKE_TARGETS_ZONE self -- @param #ACT_ASSIST_SMOKE_TARGETS_ZONE self
-- @param Set#SET_UNIT TargetSetUnit -- @param Set#SET_UNIT TargetSetUnit
-- @param Core.Zone#ZONE_BASE TargetZone -- @param Core.Zone#ZONE_BASE TargetZone
function FSM_SMOKE_TARGETS_ZONE:New( TargetSetUnit, TargetZone ) function ACT_ASSIST_SMOKE_TARGETS_ZONE:New( TargetSetUnit, TargetZone )
local self = BASE:Inherit( self, FSM_SMOKE:New() ) -- #FSM_SMOKE local self = BASE:Inherit( self, ACT_ASSIST:New() ) -- #ACT_ASSIST
self.TargetSetUnit = TargetSetUnit self.TargetSetUnit = TargetSetUnit
self.TargetZone = TargetZone self.TargetZone = TargetZone
@@ -159,18 +159,18 @@ do -- FSM_SMOKE_TARGETS_ZONE
return self return self
end end
function FSM_SMOKE_TARGETS_ZONE:Init( FsmSmoke ) function ACT_ASSIST_SMOKE_TARGETS_ZONE:Init( FsmSmoke )
self.TargetSetUnit = FsmSmoke.TargetSetUnit self.TargetSetUnit = FsmSmoke.TargetSetUnit
self.TargetZone = FsmSmoke.TargetZone self.TargetZone = FsmSmoke.TargetZone
end end
--- Creates a new target smoking state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator. --- Creates a new target smoking state machine. The process will request from the menu if it accepts the task, if not, the unit is removed from the simulator.
-- @param #FSM_SMOKE_TARGETS_ZONE self -- @param #ACT_ASSIST_SMOKE_TARGETS_ZONE self
-- @param Set#SET_UNIT TargetSetUnit -- @param Set#SET_UNIT TargetSetUnit
-- @param Core.Zone#ZONE_BASE TargetZone -- @param Core.Zone#ZONE_BASE TargetZone
-- @return #FSM_SMOKE_TARGETS_ZONE self -- @return #ACT_ASSIST_SMOKE_TARGETS_ZONE self
function FSM_SMOKE_TARGETS_ZONE:Init( TargetSetUnit, TargetZone ) function ACT_ASSIST_SMOKE_TARGETS_ZONE:Init( TargetSetUnit, TargetZone )
self.TargetSetUnit = TargetSetUnit self.TargetSetUnit = TargetSetUnit
self.TargetZone = TargetZone self.TargetZone = TargetZone
@@ -179,12 +179,12 @@ do -- FSM_SMOKE_TARGETS_ZONE
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_SMOKE_TARGETS_ZONE self -- @param #ACT_ASSIST_SMOKE_TARGETS_ZONE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_SMOKE_TARGETS_ZONE:onenterSmoking( ProcessUnit, Event, From, To ) function ACT_ASSIST_SMOKE_TARGETS_ZONE:onenterSmoking( ProcessUnit, Event, From, To )
self.TargetSetUnit:ForEachUnit( self.TargetSetUnit:ForEachUnit(
--- @param Wrapper.Unit#UNIT SmokeUnit --- @param Wrapper.Unit#UNIT SmokeUnit

12
Moose Development/Moose/Fsm/Process_JTAC.lua → Moose Development/Moose/Actions/Act_JTAC.lua
View File

@@ -4,7 +4,7 @@
-- @type PROCESS_JTAC -- @type PROCESS_JTAC
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Set#SET_UNIT TargetSetUnit -- @field Core.Set#SET_UNIT TargetSetUnit
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
PROCESS_JTAC = { PROCESS_JTAC = {
ClassName = "PROCESS_JTAC", ClassName = "PROCESS_JTAC",
Fsm = {}, Fsm = {},
@@ -66,7 +66,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_JTAC self -- @param #PROCESS_JTAC self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -77,7 +77,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_JTAC self -- @param #PROCESS_JTAC self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -123,7 +123,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_JTAC self -- @param #PROCESS_JTAC self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -147,7 +147,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_JTAC self -- @param #PROCESS_JTAC self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -174,7 +174,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_JTAC self -- @param #PROCESS_JTAC self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To

16
Moose Development/Moose/Fsm/Process_Pickup.lua → Moose Development/Moose/Actions/Act_Pickup.lua
View File

@@ -4,7 +4,7 @@
-- @type PROCESS_PICKUP -- @type PROCESS_PICKUP
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Set#SET_UNIT TargetSetUnit -- @field Core.Set#SET_UNIT TargetSetUnit
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
PROCESS_PICKUP = { PROCESS_PICKUP = {
ClassName = "PROCESS_PICKUP", ClassName = "PROCESS_PICKUP",
Fsm = {}, Fsm = {},
@@ -57,7 +57,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -68,7 +68,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -89,7 +89,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -115,7 +115,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -126,7 +126,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -139,7 +139,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -151,7 +151,7 @@ end
--- StateMachine callback function for a PROCESS --- StateMachine callback function for a PROCESS
-- @param #PROCESS_PICKUP self -- @param #PROCESS_PICKUP self
-- @param Fsm.Fsm#FSM_PROCESS Fsm -- @param Core.Fsm#FSM_PROCESS Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To

84
Moose Development/Moose/Fsm/FsmRoute.lua → Moose Development/Moose/Actions/Act_Route.lua
View File

@@ -2,16 +2,16 @@
-- --
-- === -- ===
-- --
-- # @{#FSM_ROUTE} FSM class, extends @{Fsm.Fsm#FSM_PROCESS} -- # @{#ACT_ROUTE} FSM class, extends @{Core.Fsm#FSM_PROCESS}
-- --
-- ## FSM_ROUTE state machine: -- ## ACT_ROUTE state machine:
-- --
-- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur. -- This class is a state machine: it manages a process that is triggered by events causing state transitions to occur.
-- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below. -- All derived classes from this class will start with the class name, followed by a \_. See the relevant derived class descriptions below.
-- Each derived class follows exactly the same process, using the same events and following the same state transitions, -- Each derived class follows exactly the same process, using the same events and following the same state transitions,
-- but will have **different implementation behaviour** upon each event or state transition. -- but will have **different implementation behaviour** upon each event or state transition.
-- --
-- ### FSM_ROUTE **Events**: -- ### ACT_ROUTE **Events**:
-- --
-- These are the events defined in this class: -- These are the events defined in this class:
-- --
@@ -23,7 +23,7 @@
-- * **More**: There are more route points that need to be followed. The process will go back into the Report state. -- * **More**: There are more route points that need to be followed. The process will go back into the Report state.
-- * **NoMore**: There are no more route points that need to be followed. The process will go into the Success state. -- * **NoMore**: There are no more route points that need to be followed. The process will go into the Success state.
-- --
-- ### FSM_ROUTE **Event methods**: -- ### ACT_ROUTE **Event methods**:
-- --
-- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process. -- Event methods are available (dynamically allocated by the state machine), that accomodate for state transitions occurring in the process.
-- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine: -- There are two types of event methods, which you can use to influence the normal mechanisms in the state machine:
@@ -31,7 +31,7 @@
-- * **Immediate**: The event method has exactly the name of the event. -- * **Immediate**: The event method has exactly the name of the event.
-- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed. -- * **Delayed**: The event method starts with a __ + the name of the event. The first parameter of the event method is a number value, expressing the delay in seconds when the event will be executed.
-- --
-- ### FSM_ROUTE **States**: -- ### ACT_ROUTE **States**:
-- --
-- * **None**: The controllable did not receive route commands. -- * **None**: The controllable did not receive route commands.
-- * **Arrived (*)**: The controllable has arrived at a route point. -- * **Arrived (*)**: The controllable has arrived at a route point.
@@ -43,7 +43,7 @@
-- --
-- (*) End states of the process. -- (*) End states of the process.
-- --
-- ### FSM_ROUTE state transition methods: -- ### ACT_ROUTE state transition methods:
-- --
-- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state. -- State transition functions can be set **by the mission designer** customizing or improving the behaviour of the state.
-- There are 2 moments when state transition methods will be called by the state machine: -- There are 2 moments when state transition methods will be called by the state machine:
@@ -60,41 +60,41 @@
-- --
-- === -- ===
-- --
-- # 1) @{#FSM_ROUTE_ZONE} class, extends @{Fsm.Route#FSM_ROUTE} -- # 1) @{#ACT_ROUTE_ZONE} class, extends @{Fsm.Route#ACT_ROUTE}
-- --
-- The FSM_ROUTE_ZONE class implements the core functions to route an AIR @{Controllable} player @{Unit} to a @{Zone}. -- The ACT_ROUTE_ZONE class implements the core functions to route an AIR @{Controllable} player @{Unit} to a @{Zone}.
-- The player receives on perioding times messages with the coordinates of the route to follow. -- The player receives on perioding times messages with the coordinates of the route to follow.
-- Upon arrival at the zone, a confirmation of arrival is sent, and the process will be ended. -- Upon arrival at the zone, a confirmation of arrival is sent, and the process will be ended.
-- --
-- # 1.1) FSM_ROUTE_ZONE constructor: -- # 1.1) ACT_ROUTE_ZONE constructor:
-- --
-- * @{#FSM_ROUTE_ZONE.New}(): Creates a new FSM_ROUTE_ZONE object. -- * @{#ACT_ROUTE_ZONE.New}(): Creates a new ACT_ROUTE_ZONE object.
-- --
-- === -- ===
-- --
-- @module Route -- @module Route
do -- FSM_ROUTE do -- ACT_ROUTE
--- FSM_ROUTE class --- ACT_ROUTE class
-- @type FSM_ROUTE -- @type ACT_ROUTE
-- @field Tasking.Task#TASK TASK -- @field Tasking.Task#TASK TASK
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Zone#ZONE_BASE TargetZone -- @field Core.Zone#ZONE_BASE TargetZone
-- @extends Fsm.Fsm#FSM_PROCESS -- @extends Core.Fsm#FSM_PROCESS
FSM_ROUTE = { ACT_ROUTE = {
ClassName = "FSM_ROUTE", ClassName = "ACT_ROUTE",
} }
--- Creates a new routing state machine. The process will route a CLIENT to a ZONE until the CLIENT is within that ZONE. --- Creates a new routing state machine. The process will route a CLIENT to a ZONE until the CLIENT is within that ZONE.
-- @param #FSM_ROUTE self -- @param #ACT_ROUTE self
-- @return #FSM_ROUTE self -- @return #ACT_ROUTE self
function FSM_ROUTE:New() function ACT_ROUTE:New()
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM_PROCESS:New( "FSM_ROUTE" ) ) -- Fsm.Fsm#FSM_PROCESS local self = BASE:Inherit( self, FSM_PROCESS:New( "ACT_ROUTE" ) ) -- Core.Fsm#FSM_PROCESS
self:AddTransition( "None", "Start", "Routing" ) self:AddTransition( "None", "Start", "Routing" )
self:AddTransition( "*", "Report", "Reporting" ) self:AddTransition( "*", "Report", "Reporting" )
@@ -118,32 +118,32 @@ do -- FSM_ROUTE
--- Task Events --- Task Events
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ROUTE self -- @param #ACT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ROUTE:onafterStart( ProcessUnit, Event, From, To ) function ACT_ROUTE:onafterStart( ProcessUnit, Event, From, To )
self:__Route( 1 ) self:__Route( 1 )
end end
--- Check if the controllable has arrived. --- Check if the controllable has arrived.
-- @param #FSM_ROUTE self -- @param #ACT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @return #boolean -- @return #boolean
function FSM_ROUTE:onfuncHasArrived( ProcessUnit ) function ACT_ROUTE:onfuncHasArrived( ProcessUnit )
return false return false
end end
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ROUTE self -- @param #ACT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ROUTE:onbeforeRoute( ProcessUnit, Event, From, To ) function ACT_ROUTE:onbeforeRoute( ProcessUnit, Event, From, To )
if ProcessUnit:IsAlive() then if ProcessUnit:IsAlive() then
local HasArrived = self:onfuncHasArrived( ProcessUnit ) -- Polymorphic local HasArrived = self:onfuncHasArrived( ProcessUnit ) -- Polymorphic
@@ -172,28 +172,28 @@ do -- FSM_ROUTE
end end
end -- FSM_ROUTE end -- ACT_ROUTE
do -- FSM_ROUTE_ZONE do -- ACT_ROUTE_ZONE
--- FSM_ROUTE_ZONE class --- ACT_ROUTE_ZONE class
-- @type FSM_ROUTE_ZONE -- @type ACT_ROUTE_ZONE
-- @field Tasking.Task#TASK TASK -- @field Tasking.Task#TASK TASK
-- @field Wrapper.Unit#UNIT ProcessUnit -- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Core.Zone#ZONE_BASE TargetZone -- @field Core.Zone#ZONE_BASE TargetZone
-- @extends #FSM_ROUTE -- @extends #ACT_ROUTE
FSM_ROUTE_ZONE = { ACT_ROUTE_ZONE = {
ClassName = "FSM_ROUTE_ZONE", ClassName = "ACT_ROUTE_ZONE",
} }
--- Creates a new routing state machine. The task will route a controllable to a ZONE until the controllable is within that ZONE. --- Creates a new routing state machine. The task will route a controllable to a ZONE until the controllable is within that ZONE.
-- @param #FSM_ROUTE_ZONE self -- @param #ACT_ROUTE_ZONE self
-- @param Core.Zone#ZONE_BASE TargetZone -- @param Core.Zone#ZONE_BASE TargetZone
function FSM_ROUTE_ZONE:New( TargetZone ) function ACT_ROUTE_ZONE:New( TargetZone )
local self = BASE:Inherit( self, FSM_ROUTE:New() ) -- #FSM_ROUTE_ZONE local self = BASE:Inherit( self, ACT_ROUTE:New() ) -- #ACT_ROUTE_ZONE
self.TargetZone = TargetZone self.TargetZone = TargetZone
@@ -205,7 +205,7 @@ do -- FSM_ROUTE_ZONE
return self return self
end end
function FSM_ROUTE_ZONE:Init( FsmRoute ) function ACT_ROUTE_ZONE:Init( FsmRoute )
self.TargetZone = FsmRoute.TargetZone self.TargetZone = FsmRoute.TargetZone
self.DisplayInterval = 30 self.DisplayInterval = 30
@@ -215,10 +215,10 @@ do -- FSM_ROUTE_ZONE
end end
--- Method override to check if the controllable has arrived. --- Method override to check if the controllable has arrived.
-- @param #FSM_ROUTE self -- @param #ACT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @return #boolean -- @return #boolean
function FSM_ROUTE_ZONE:onfuncHasArrived( ProcessUnit ) function ACT_ROUTE_ZONE:onfuncHasArrived( ProcessUnit )
if ProcessUnit:IsInZone( self.TargetZone ) then if ProcessUnit:IsInZone( self.TargetZone ) then
local RouteText = "You have arrived within the zone." local RouteText = "You have arrived within the zone."
@@ -231,12 +231,12 @@ do -- FSM_ROUTE_ZONE
--- Task Events --- Task Events
--- StateMachine callback function --- StateMachine callback function
-- @param #FSM_ROUTE_ZONE self -- @param #ACT_ROUTE_ZONE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit -- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function FSM_ROUTE_ZONE:onenterReporting( ProcessUnit, Event, From, To ) function ACT_ROUTE_ZONE:onenterReporting( ProcessUnit, Event, From, To )
local ZoneVec2 = self.TargetZone:GetVec2() local ZoneVec2 = self.TargetZone:GetVec2()
local ZonePointVec2 = POINT_VEC2:New( ZoneVec2.x, ZoneVec2.y ) local ZonePointVec2 = POINT_VEC2:New( ZoneVec2.x, ZoneVec2.y )
@@ -246,4 +246,4 @@ do -- FSM_ROUTE_ZONE
self:Message( RouteText ) self:Message( RouteText )
end end
end -- FSM_ROUTE_ZONE end -- ACT_ROUTE_ZONE

18
Moose Development/Moose/Core/Base.lua
View File

@@ -90,24 +90,6 @@ FORMATION = {
--- The base constructor. This is the top top class of all classed defined within the MOOSE.
-- Any new class needs to be derived from this class for proper inheritance.
-- @param #BASE self
-- @return #BASE The new instance of the BASE class.
-- @usage
-- -- This declares the constructor of the class TASK, inheriting from BASE.
-- --- TASK constructor
-- -- @param #TASK self
-- -- @param Parameter The parameter of the New constructor.
-- -- @return #TASK self
-- function TASK:New( Parameter )
--
-- local self = BASE:Inherit( self, BASE:New() )
--
-- self.Variable = Parameter
--
-- return self
-- end
-- @todo need to investigate if the deepCopy is really needed... Don't think so. -- @todo need to investigate if the deepCopy is really needed... Don't think so.
function BASE:New() function BASE:New()
local self = routines.utils.deepCopy( self ) -- Create a new self instance local self = routines.utils.deepCopy( self ) -- Create a new self instance

32
Moose Development/Moose/Fsm/Fsm.lua → Moose Development/Moose/Core/Fsm.lua
View File

@@ -85,7 +85,7 @@ do -- FSM
end end
--- Set the default @{Process} template with key ProcessName providing the ProcessClass and the process object when it is assigned to a @{Controllable} by the task. --- Set the default @{Process} template with key ProcessName providing the ProcessClass and the process object when it is assigned to a @{Controllable} by the task.
-- @return Fsm.Fsm#FSM_PROCESS -- @return Core.Fsm#FSM_PROCESS
function FSM:AddProcess( From, Event, Process, ReturnEvents ) function FSM:AddProcess( From, Event, Process, ReturnEvents )
self:E( { From, Event, Process, ReturnEvents } ) self:E( { From, Event, Process, ReturnEvents } )
@@ -386,7 +386,7 @@ do -- FSM_CONTROLLABLE
--- FSM_CONTROLLABLE class --- FSM_CONTROLLABLE class
-- @type FSM_CONTROLLABLE -- @type FSM_CONTROLLABLE
-- @field Wrapper.Controllable#CONTROLLABLE Controllable -- @field Wrapper.Controllable#CONTROLLABLE Controllable
-- @extends Fsm.Fsm#FSM -- @extends Core.Fsm#FSM
FSM_CONTROLLABLE = { FSM_CONTROLLABLE = {
ClassName = "FSM_CONTROLLABLE", ClassName = "FSM_CONTROLLABLE",
} }
@@ -399,7 +399,7 @@ do -- FSM_CONTROLLABLE
function FSM_CONTROLLABLE:New( FSMT, Controllable ) function FSM_CONTROLLABLE:New( FSMT, Controllable )
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM:New( FSMT ) ) -- Fsm.Fsm#FSM_CONTROLLABLE local self = BASE:Inherit( self, FSM:New( FSMT ) ) -- Core.Fsm#FSM_CONTROLLABLE
if Controllable then if Controllable then
self:SetControllable( Controllable ) self:SetControllable( Controllable )
@@ -449,8 +449,8 @@ do -- FSM_PROCESS
--- FSM_PROCESS class --- FSM_PROCESS class
-- @type FSM_PROCESS -- @type FSM_PROCESS
-- @field Tasking.Task#TASK_BASE Task -- @field Tasking.Task#TASK Task
-- @extends Fsm.Fsm#FSM_CONTROLLABLE -- @extends Core.Fsm#FSM_CONTROLLABLE
FSM_PROCESS = { FSM_PROCESS = {
ClassName = "FSM_PROCESS", ClassName = "FSM_PROCESS",
} }
@@ -460,7 +460,7 @@ do -- FSM_PROCESS
-- @return #FSM_PROCESS -- @return #FSM_PROCESS
function FSM_PROCESS:New( Controllable, Task ) function FSM_PROCESS:New( Controllable, Task )
local self = BASE:Inherit( self, FSM_CONTROLLABLE:New() ) -- Fsm.Fsm#FSM_PROCESS local self = BASE:Inherit( self, FSM_CONTROLLABLE:New() ) -- Core.Fsm#FSM_PROCESS
self:F( Controllable, Task ) self:F( Controllable, Task )
@@ -479,7 +479,7 @@ do -- FSM_PROCESS
function FSM_PROCESS:Copy( Controllable, Task ) function FSM_PROCESS:Copy( Controllable, Task )
self:E( { self:GetClassNameAndID() } ) self:E( { self:GetClassNameAndID() } )
local NewFsm = self:New( Controllable, Task ) -- Fsm.Fsm#FSM_PROCESS local NewFsm = self:New( Controllable, Task ) -- Core.Fsm#FSM_PROCESS
NewFsm:Assign( Controllable, Task ) NewFsm:Assign( Controllable, Task )
@@ -517,7 +517,7 @@ do -- FSM_PROCESS
--- Sets the task of the process. --- Sets the task of the process.
-- @param #FSM_PROCESS self -- @param #FSM_PROCESS self
-- @param Tasking.Task#TASK_BASE Task -- @param Tasking.Task#TASK Task
-- @return #FSM_PROCESS -- @return #FSM_PROCESS
function FSM_PROCESS:SetTask( Task ) function FSM_PROCESS:SetTask( Task )
@@ -528,7 +528,7 @@ do -- FSM_PROCESS
--- Gets the task of the process. --- Gets the task of the process.
-- @param #FSM_PROCESS self -- @param #FSM_PROCESS self
-- @return Tasking.Task#TASK_BASE -- @return Tasking.Task#TASK
function FSM_PROCESS:GetTask() function FSM_PROCESS:GetTask()
return self.Task return self.Task
@@ -566,7 +566,7 @@ end
--- Assign the process to a @{Unit} and activate the process. --- Assign the process to a @{Unit} and activate the process.
-- @param #FSM_PROCESS self -- @param #FSM_PROCESS self
-- @param Task.Tasking#TASK_BASE Task -- @param Task.Tasking#TASK Task
-- @param Wrapper.Unit#UNIT ProcessUnit -- @param Wrapper.Unit#UNIT ProcessUnit
-- @return #FSM_PROCESS self -- @return #FSM_PROCESS self
function FSM_PROCESS:Assign( ProcessUnit, Task ) function FSM_PROCESS:Assign( ProcessUnit, Task )
@@ -645,8 +645,8 @@ do -- FSM_TASK
--- FSM_TASK class --- FSM_TASK class
-- @type FSM_TASK -- @type FSM_TASK
-- @field Tasking.Task#TASK_BASE Task -- @field Tasking.Task#TASK Task
-- @extends Fsm.Fsm#FSM -- @extends Core.Fsm#FSM
FSM_TASK = { FSM_TASK = {
ClassName = "FSM_TASK", ClassName = "FSM_TASK",
} }
@@ -654,12 +654,12 @@ do -- FSM_TASK
--- Creates a new FSM_TASK object. --- Creates a new FSM_TASK object.
-- @param #FSM_TASK self -- @param #FSM_TASK self
-- @param #table FSMT -- @param #table FSMT
-- @param Tasking.Task#TASK_BASE Task -- @param Tasking.Task#TASK Task
-- @param Wrapper.Unit#UNIT TaskUnit -- @param Wrapper.Unit#UNIT TaskUnit
-- @return #FSM_TASK -- @return #FSM_TASK
function FSM_TASK:New( FSMT ) function FSM_TASK:New( FSMT )
local self = BASE:Inherit( self, FSM_CONTROLLABLE:New( FSMT ) ) -- Fsm.Fsm#FSM_TASK local self = BASE:Inherit( self, FSM_CONTROLLABLE:New( FSMT ) ) -- Core.Fsm#FSM_TASK
self["onstatechange"] = self.OnStateChange self["onstatechange"] = self.OnStateChange
@@ -680,7 +680,7 @@ do -- FSM_SET
--- FSM_SET class --- FSM_SET class
-- @type FSM_SET -- @type FSM_SET
-- @field Core.Set#SET_BASE Set -- @field Core.Set#SET_BASE Set
-- @extends Fsm.Fsm#FSM -- @extends Core.Fsm#FSM
FSM_SET = { FSM_SET = {
ClassName = "FSM_SET", ClassName = "FSM_SET",
} }
@@ -693,7 +693,7 @@ do -- FSM_SET
function FSM_SET:New( FSMSet ) function FSM_SET:New( FSMSet )
-- Inherits from BASE -- Inherits from BASE
local self = BASE:Inherit( self, FSM:New() ) -- Fsm.Fsm#FSM_SET local self = BASE:Inherit( self, FSM:New() ) -- Core.Fsm#FSM_SET
if FSMSet then if FSMSet then
self:Set( FSMSet ) self:Set( FSMSet )

45
Moose Development/Moose/Fsm/Process.lua
View File

@@ -1,45 +0,0 @@
--- @module Process
--- The PROCESS class
-- @type PROCESS
-- @field Tasking.Task#TASK_BASE ProcessTask
-- @field Wrapper.Group#GROUP ProcessGroup
-- @field Core.Menu#MENU_GROUP MissionMenu
-- @field #string ProcessName
-- @extends Fsm.Fsm#FSM_CONTROLLABLE
PROCESS = {
ClassName = "PROCESS",
NextEvent = nil,
Scores = {},
}
--- Instantiates a new TASK Base. Should never be used. Interface Class.
-- @param #PROCESS self
-- @param #string ProcessName
-- @param Wrapper.Unit#UNIT ProcessUnit (Optional) If provided, it defines the UNIT for which the process is running.
-- @return #PROCESS
function PROCESS:New( FSMT, ProcessName, ProcessUnit )
local self = BASE:Inherit( self, FSM_PROCESS:New( FSMT, ProcessUnit ) )
self:F()
if ProcessUnit then
self.ProcessGroup = ProcessUnit:GetGroup()
end
--self.MissionMenu = Task.Mission:GetMissionMenu( self.ProcessGroup )
self.ProcessName = ProcessName
return self
end
--- Gets the Group of the process.
-- @param #PROCESS self
-- @return Wrapper.Group#GROUP
function PROCESS:GetGroup()
return self.ProcessGroup
end

20
Moose Development/Moose/Moose.lua
View File

@@ -15,6 +15,7 @@ Include.File( "Core/Database" )
Include.File( "Core/Set" ) Include.File( "Core/Set" )
Include.File( "Core/Point" ) Include.File( "Core/Point" )
Include.File( "Core/Message" ) Include.File( "Core/Message" )
Include.File( "Core/Fsm" )
--- Wrapper Classes --- Wrapper Classes
Include.File( "Wrapper/Object" ) Include.File( "Wrapper/Object" )
@@ -37,18 +38,17 @@ Include.File( "Functional/Escort" )
Include.File( "Functional/MissileTrainer" ) Include.File( "Functional/MissileTrainer" )
Include.File( "Functional/AirbasePolice" ) Include.File( "Functional/AirbasePolice" )
Include.File( "Functional/Detection" ) Include.File( "Functional/Detection" )
Include.File( "Functional/AIBalancer" )
--- AI Classes
Include.File( "AI/AI_Balancer" )
Include.File( "AI/AI_Patrol" )
Include.File( "AI/AI_Cargo" )
--- Fsm Classes --- Fsm Classes
Include.File( "Fsm/Fsm" ) Include.File( "Actions/Act_Assign" )
Include.File( "Fsm/Process" ) Include.File( "Actions/Act_Route" )
Include.File( "Fsm/Process_JTAC" ) Include.File( "Actions/Act_Account" )
Include.File( "Fsm/Patrol" ) Include.File( "Actions/Act_Smoke" )
Include.File( "Fsm/Cargo" )
Include.File( "Fsm/FsmAssign" )
Include.File( "Fsm/FsmRoute" )
Include.File( "Fsm/FsmAccount" )
Include.File( "Fsm/FsmSmoke" )
--- Task Handling Classes --- Task Handling Classes
Include.File( "Tasking/CommandCenter" ) Include.File( "Tasking/CommandCenter" )

4
Moose Development/Moose/Tasking/CommandCenter.lua
View File

@@ -110,7 +110,7 @@ function COMMANDCENTER:New( CommandCenterPositionable, CommandCenterName )
-- The PlayerUnit will be UnAssigned from the Task. -- The PlayerUnit will be UnAssigned from the Task.
-- When there is no Unit left running the Task, the Task goes into Abort... -- When there is no Unit left running the Task, the Task goes into Abort...
self:EventOnPlayerLeaveUnit( self:EventOnPlayerLeaveUnit(
--- @param #TASK_BASE self --- @param #TASK self
-- @param Core.Event#EVENTDATA EventData -- @param Core.Event#EVENTDATA EventData
function( self, EventData ) function( self, EventData )
local PlayerUnit = EventData.IniUnit local PlayerUnit = EventData.IniUnit
@@ -124,7 +124,7 @@ function COMMANDCENTER:New( CommandCenterPositionable, CommandCenterName )
-- The PlayerUnit will be UnAssigned from the Task. -- The PlayerUnit will be UnAssigned from the Task.
-- When there is no Unit left running the Task, the Task goes into Abort... -- When there is no Unit left running the Task, the Task goes into Abort...
self:EventOnCrash( self:EventOnCrash(
--- @param #TASK_BASE self --- @param #TASK self
-- @param Core.Event#EVENTDATA EventData -- @param Core.Event#EVENTDATA EventData
function( self, EventData ) function( self, EventData )
local PlayerUnit = EventData.IniUnit local PlayerUnit = EventData.IniUnit

8
Moose Development/Moose/Tasking/DetectionManager.lua
View File

@@ -317,7 +317,7 @@ do -- DETECTION_DISPATCHER
--- Creates a CAS task when there are targets for it. --- Creates a CAS task when there are targets for it.
-- @param #DETECTION_DISPATCHER self -- @param #DETECTION_DISPATCHER self
-- @param Functional.Detection#DETECTION_AREAS.DetectedArea DetectedArea -- @param Functional.Detection#DETECTION_AREAS.DetectedArea DetectedArea
-- @return Tasking.Task#TASK_BASE -- @return Tasking.Task#TASK
function DETECTION_DISPATCHER:EvaluateCAS( DetectedArea ) function DETECTION_DISPATCHER:EvaluateCAS( DetectedArea )
self:F( { DetectedArea.AreaID } ) self:F( { DetectedArea.AreaID } )
@@ -345,7 +345,7 @@ do -- DETECTION_DISPATCHER
--- Creates a BAI task when there are targets for it. --- Creates a BAI task when there are targets for it.
-- @param #DETECTION_DISPATCHER self -- @param #DETECTION_DISPATCHER self
-- @param Functional.Detection#DETECTION_AREAS.DetectedArea DetectedArea -- @param Functional.Detection#DETECTION_AREAS.DetectedArea DetectedArea
-- @return Tasking.Task#TASK_BASE -- @return Tasking.Task#TASK
function DETECTION_DISPATCHER:EvaluateBAI( DetectedArea, FriendlyCoalition ) function DETECTION_DISPATCHER:EvaluateBAI( DetectedArea, FriendlyCoalition )
self:F( { DetectedArea.AreaID } ) self:F( { DetectedArea.AreaID } )
@@ -374,9 +374,9 @@ do -- DETECTION_DISPATCHER
-- Can only occur when the DetectedArea is Changed AND the state of the Task is "Planned". -- Can only occur when the DetectedArea is Changed AND the state of the Task is "Planned".
-- @param #DETECTION_DISPATCHER self -- @param #DETECTION_DISPATCHER self
-- @param Tasking.Mission#MISSION Mission -- @param Tasking.Mission#MISSION Mission
-- @param Tasking.Task#TASK_BASE Task -- @param Tasking.Task#TASK Task
-- @param Functional.Detection#DETECTION_AREAS.DetectedArea DetectedArea -- @param Functional.Detection#DETECTION_AREAS.DetectedArea DetectedArea
-- @return Tasking.Task#TASK_BASE -- @return Tasking.Task#TASK
function DETECTION_DISPATCHER:EvaluateRemoveTask( Mission, Task, DetectedArea ) function DETECTION_DISPATCHER:EvaluateRemoveTask( Mission, Task, DetectedArea )
if Task then if Task then

38
Moose Development/Moose/Tasking/Mission.lua
View File

@@ -7,7 +7,7 @@
-- @field #MISSION.Clients _Clients -- @field #MISSION.Clients _Clients
-- @field Core.Menu#MENU_COALITION MissionMenu -- @field Core.Menu#MENU_COALITION MissionMenu
-- @field #string MissionBriefing -- @field #string MissionBriefing
-- @extends Fsm.Fsm#FSM -- @extends Core.Fsm#FSM
MISSION = { MISSION = {
ClassName = "MISSION", ClassName = "MISSION",
Name = "", Name = "",
@@ -40,7 +40,7 @@ MISSION = {
-- @return #MISSION self -- @return #MISSION self
function MISSION:New( CommandCenter, MissionName, MissionPriority, MissionBriefing, MissionCoalition ) function MISSION:New( CommandCenter, MissionName, MissionPriority, MissionBriefing, MissionCoalition )
local self = BASE:Inherit( self, FSM:New() ) -- Fsm.Fsm#FSM local self = BASE:Inherit( self, FSM:New() ) -- Core.Fsm#FSM
self:SetStartState( "Idle" ) self:SetStartState( "Idle" )
@@ -72,7 +72,7 @@ end
function MISSION:onbeforeComplete( Event, From, To ) function MISSION:onbeforeComplete( Event, From, To )
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
if not Task:IsStateSuccess() and not Task:IsStateFailed() and not Task:IsStateAborted() and not Task:IsStateCancelled() then if not Task:IsStateSuccess() and not Task:IsStateFailed() and not Task:IsStateAborted() and not Task:IsStateCancelled() then
return false -- Mission cannot be completed. Other Tasks are still active. return false -- Mission cannot be completed. Other Tasks are still active.
end end
@@ -110,7 +110,7 @@ function MISSION:JoinUnit( PlayerUnit )
local PlayerUnitAdded = false local PlayerUnitAdded = false
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
if Task:JoinUnit( PlayerUnit ) then if Task:JoinUnit( PlayerUnit ) then
PlayerUnitAdded = true PlayerUnitAdded = true
end end
@@ -184,7 +184,7 @@ function MISSION:GetGroups()
local SetGroup = SET_GROUP:New() local SetGroup = SET_GROUP:New()
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
local GroupSet = Task:GetGroups() local GroupSet = Task:GetGroups()
GroupSet:ForEachGroup( GroupSet:ForEachGroup(
function( TaskGroup ) function( TaskGroup )
@@ -205,7 +205,7 @@ function MISSION:SetMenu()
self:F() self:F()
for _, Task in pairs( self:GetTasks() ) do for _, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
Task:SetMenu() Task:SetMenu()
end end
end end
@@ -220,13 +220,13 @@ end
--- Sets the Assigned Task menu. --- Sets the Assigned Task menu.
-- @param #MISSION self -- @param #MISSION self
-- @param Tasking.Task#TASK_BASE Task -- @param Tasking.Task#TASK Task
-- @param #string MenuText The menu text. -- @param #string MenuText The menu text.
-- @return #MISSION self -- @return #MISSION self
function MISSION:SetAssignedMenu( Task ) function MISSION:SetAssignedMenu( Task )
for _, Task in pairs( self.Tasks ) do for _, Task in pairs( self.Tasks ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
Task:RemoveMenu() Task:RemoveMenu()
Task:SetAssignedMenu() Task:SetAssignedMenu()
end end
@@ -235,7 +235,7 @@ end
--- Removes a Task menu. --- Removes a Task menu.
-- @param #MISSION self -- @param #MISSION self
-- @param Tasking.Task#TASK_BASE Task -- @param Tasking.Task#TASK Task
-- @return #MISSION self -- @return #MISSION self
function MISSION:RemoveTaskMenu( Task ) function MISSION:RemoveTaskMenu( Task )
@@ -271,7 +271,7 @@ end
--- Get the TASK identified by the TaskNumber from the Mission. This function is useful in GoalFunctions. --- Get the TASK identified by the TaskNumber from the Mission. This function is useful in GoalFunctions.
-- @param #string TaskName The Name of the @{Task} within the @{Mission}. -- @param #string TaskName The Name of the @{Task} within the @{Mission}.
-- @return Tasking.Task#TASK_BASE The Task -- @return Tasking.Task#TASK The Task
-- @return #nil Returns nil if no task was found. -- @return #nil Returns nil if no task was found.
function MISSION:GetTask( TaskName ) function MISSION:GetTask( TaskName )
self:F( { TaskName } ) self:F( { TaskName } )
@@ -284,8 +284,8 @@ end
-- Note that there can be multiple @{Task}s registered to be completed. -- Note that there can be multiple @{Task}s registered to be completed.
-- Each Task can be set a certain Goals. The Mission will not be completed until all Goals are reached. -- Each Task can be set a certain Goals. The Mission will not be completed until all Goals are reached.
-- @param #MISSION self -- @param #MISSION self
-- @param Tasking.Task#TASK_BASE Task is the @{Task} object. -- @param Tasking.Task#TASK Task is the @{Task} object.
-- @return Tasking.Task#TASK_BASE The task added. -- @return Tasking.Task#TASK The task added.
function MISSION:AddTask( Task ) function MISSION:AddTask( Task )
local TaskName = Task:GetTaskName() local TaskName = Task:GetTaskName()
@@ -304,7 +304,7 @@ end
-- Note that there can be multiple @{Task}s registered to be completed. -- Note that there can be multiple @{Task}s registered to be completed.
-- Each Task can be set a certain Goals. The Mission will not be completed until all Goals are reached. -- Each Task can be set a certain Goals. The Mission will not be completed until all Goals are reached.
-- @param #MISSION self -- @param #MISSION self
-- @param Tasking.Task#TASK_BASE Task is the @{Task} object. -- @param Tasking.Task#TASK Task is the @{Task} object.
-- @return #nil The cleaned Task reference. -- @return #nil The cleaned Task reference.
function MISSION:RemoveTask( Task ) function MISSION:RemoveTask( Task )
@@ -326,8 +326,8 @@ end
--- Return the next @{Task} ID to be completed within the @{Mission}. --- Return the next @{Task} ID to be completed within the @{Mission}.
-- @param #MISSION self -- @param #MISSION self
-- @param Tasking.Task#TASK_BASE Task is the @{Task} object. -- @param Tasking.Task#TASK Task is the @{Task} object.
-- @return Tasking.Task#TASK_BASE The task added. -- @return Tasking.Task#TASK The task added.
function MISSION:GetNextTaskID( Task ) function MISSION:GetNextTaskID( Task )
local TaskName = Task:GetTaskName() local TaskName = Task:GetTaskName()
@@ -413,7 +413,7 @@ function MISSION:HasGroup( TaskGroup )
local Has = false local Has = false
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
if Task:HasGroup( TaskGroup ) then if Task:HasGroup( TaskGroup ) then
Has = true Has = true
break break
@@ -439,7 +439,7 @@ function MISSION:ReportSummary()
-- Determine how many tasks are remaining. -- Determine how many tasks are remaining.
local TasksRemaining = 0 local TasksRemaining = 0
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
if Task:IsStateSuccess() or Task:IsStateFailed() then if Task:IsStateSuccess() or Task:IsStateFailed() then
else else
TasksRemaining = TasksRemaining + 1 TasksRemaining = TasksRemaining + 1
@@ -469,7 +469,7 @@ function MISSION:ReportOverview()
-- Determine how many tasks are remaining. -- Determine how many tasks are remaining.
local TasksRemaining = 0 local TasksRemaining = 0
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
Report:Add( "- " .. Task:ReportSummary() ) Report:Add( "- " .. Task:ReportSummary() )
end end
@@ -494,7 +494,7 @@ function MISSION:ReportDetails()
-- Determine how many tasks are remaining. -- Determine how many tasks are remaining.
local TasksRemaining = 0 local TasksRemaining = 0
for TaskID, Task in pairs( self:GetTasks() ) do for TaskID, Task in pairs( self:GetTasks() ) do
local Task = Task -- Tasking.Task#TASK_BASE local Task = Task -- Tasking.Task#TASK
Report:Add( Task:ReportDetails() ) Report:Add( Task:ReportDetails() )
end end

392
Moose Development/Moose/Tasking/Task.lua
View File

@@ -1,19 +1,19 @@
--- This module contains the TASK_BASE class. --- This module contains the TASK class.
-- --
-- 1) @{#TASK_BASE} class, extends @{Core.Base#BASE} -- 1) @{#TASK} class, extends @{Core.Base#BASE}
-- ============================================ -- ============================================
-- 1.1) The @{#TASK_BASE} class implements the methods for task orchestration within MOOSE. -- 1.1) The @{#TASK} class implements the methods for task orchestration within MOOSE.
-- ---------------------------------------------------------------------------------------- -- ----------------------------------------------------------------------------------------
-- The class provides a couple of methods to: -- The class provides a couple of methods to:
-- --
-- * @{#TASK_BASE.AssignToGroup}():Assign a task to a group (of players). -- * @{#TASK.AssignToGroup}():Assign a task to a group (of players).
-- * @{#TASK_BASE.AddProcess}():Add a @{Process} to a task. -- * @{#TASK.AddProcess}():Add a @{Process} to a task.
-- * @{#TASK_BASE.RemoveProcesses}():Remove a running @{Process} from a running task. -- * @{#TASK.RemoveProcesses}():Remove a running @{Process} from a running task.
-- * @{#TASK_BASE.SetStateMachine}():Set a @{Fsm} to a task. -- * @{#TASK.SetStateMachine}():Set a @{Fsm} to a task.
-- * @{#TASK_BASE.RemoveStateMachine}():Remove @{Fsm} from a task. -- * @{#TASK.RemoveStateMachine}():Remove @{Fsm} from a task.
-- * @{#TASK_BASE.HasStateMachine}():Enquire if the task has a @{Fsm} -- * @{#TASK.HasStateMachine}():Enquire if the task has a @{Fsm}
-- * @{#TASK_BASE.AssignToUnit}(): Assign a task to a unit. (Needs to be implemented in the derived classes from @{#TASK_BASE}. -- * @{#TASK.AssignToUnit}(): Assign a task to a unit. (Needs to be implemented in the derived classes from @{#TASK}.
-- * @{#TASK_BASE.UnAssignFromUnit}(): Unassign the task from a unit. -- * @{#TASK.UnAssignFromUnit}(): Unassign the task from a unit.
-- --
-- 1.2) Set and enquire task status (beyond the task state machine processing). -- 1.2) Set and enquire task status (beyond the task state machine processing).
-- ---------------------------------------------------------------------------- -- ----------------------------------------------------------------------------
@@ -37,7 +37,7 @@
-- 1.3) Add scoring when reaching a certain task status: -- 1.3) Add scoring when reaching a certain task status:
-- ----------------------------------------------------- -- -----------------------------------------------------
-- Upon reaching a certain task status in a task, additional scoring can be given. If the Mission has a scoring system attached, the scores will be added to the mission scoring. -- Upon reaching a certain task status in a task, additional scoring can be given. If the Mission has a scoring system attached, the scores will be added to the mission scoring.
-- Use the method @{#TASK_BASE.AddScore}() to add scores when a status is reached. -- Use the method @{#TASK.AddScore}() to add scores when a status is reached.
-- --
-- 1.4) Task briefing: -- 1.4) Task briefing:
-- ------------------- -- -------------------
@@ -49,17 +49,17 @@
-- --
-- @module Task -- @module Task
--- The TASK_BASE class --- The TASK class
-- @type TASK_BASE -- @type TASK
-- @field Core.Scheduler#SCHEDULER TaskScheduler -- @field Core.Scheduler#SCHEDULER TaskScheduler
-- @field Tasking.Mission#MISSION Mission -- @field Tasking.Mission#MISSION Mission
-- @field Core.Set#SET_GROUP SetGroup The Set of Groups assigned to the Task -- @field Core.Set#SET_GROUP SetGroup The Set of Groups assigned to the Task
-- @field Fsm.Fsm#FSM_PROCESS FsmTemplate -- @field Core.Fsm#FSM_PROCESS FsmTemplate
-- @field Tasking.Mission#MISSION Mission -- @field Tasking.Mission#MISSION Mission
-- @field Tasking.CommandCenter#COMMANDCENTER CommandCenter -- @field Tasking.CommandCenter#COMMANDCENTER CommandCenter
-- @extends Fsm.Fsm#FSM_TASK -- @extends Core.Fsm#FSM_TASK
TASK_BASE = { TASK = {
ClassName = "TASK_BASE", ClassName = "TASK",
TaskScheduler = nil, TaskScheduler = nil,
ProcessClasses = {}, -- The container of the Process classes that will be used to create and assign new processes for the task to ProcessUnits. ProcessClasses = {}, -- The container of the Process classes that will be used to create and assign new processes for the task to ProcessUnits.
Processes = {}, -- The container of actual process objects instantiated and assigned to ProcessUnits. Processes = {}, -- The container of actual process objects instantiated and assigned to ProcessUnits.
@@ -72,85 +72,85 @@ TASK_BASE = {
CommandCenter = nil, CommandCenter = nil,
} }
--- FSM PlayerAborted event handler prototype for TASK_BASE. --- FSM PlayerAborted event handler prototype for TASK.
-- @function [parent=#TASK_BASE] OnAfterPlayerAborted -- @function [parent=#TASK] OnAfterPlayerAborted
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT PlayerUnit The Unit of the Player when he went back to spectators or left the mission. -- @param Wrapper.Unit#UNIT PlayerUnit The Unit of the Player when he went back to spectators or left the mission.
-- @param #string PlayerName The name of the Player. -- @param #string PlayerName The name of the Player.
--- FSM PlayerCrashed event handler prototype for TASK_BASE. --- FSM PlayerCrashed event handler prototype for TASK.
-- @function [parent=#TASK_BASE] OnAfterPlayerCrashed -- @function [parent=#TASK] OnAfterPlayerCrashed
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT PlayerUnit The Unit of the Player when he crashed in the mission. -- @param Wrapper.Unit#UNIT PlayerUnit The Unit of the Player when he crashed in the mission.
-- @param #string PlayerName The name of the Player. -- @param #string PlayerName The name of the Player.
--- FSM PlayerDead event handler prototype for TASK_BASE. --- FSM PlayerDead event handler prototype for TASK.
-- @function [parent=#TASK_BASE] OnAfterPlayerDead -- @function [parent=#TASK] OnAfterPlayerDead
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT PlayerUnit The Unit of the Player when he died in the mission. -- @param Wrapper.Unit#UNIT PlayerUnit The Unit of the Player when he died in the mission.
-- @param #string PlayerName The name of the Player. -- @param #string PlayerName The name of the Player.
--- FSM Fail synchronous event function for TASK_BASE. --- FSM Fail synchronous event function for TASK.
-- Use this event to Fail the Task. -- Use this event to Fail the Task.
-- @function [parent=#TASK_BASE] Fail -- @function [parent=#TASK] Fail
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Fail asynchronous event function for TASK_BASE. --- FSM Fail asynchronous event function for TASK.
-- Use this event to Fail the Task. -- Use this event to Fail the Task.
-- @function [parent=#TASK_BASE] __Fail -- @function [parent=#TASK] __Fail
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Abort synchronous event function for TASK_BASE. --- FSM Abort synchronous event function for TASK.
-- Use this event to Abort the Task. -- Use this event to Abort the Task.
-- @function [parent=#TASK_BASE] Abort -- @function [parent=#TASK] Abort
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Abort asynchronous event function for TASK_BASE. --- FSM Abort asynchronous event function for TASK.
-- Use this event to Abort the Task. -- Use this event to Abort the Task.
-- @function [parent=#TASK_BASE] __Abort -- @function [parent=#TASK] __Abort
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Success synchronous event function for TASK_BASE. --- FSM Success synchronous event function for TASK.
-- Use this event to make the Task a Success. -- Use this event to make the Task a Success.
-- @function [parent=#TASK_BASE] Success -- @function [parent=#TASK] Success
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Success asynchronous event function for TASK_BASE. --- FSM Success asynchronous event function for TASK.
-- Use this event to make the Task a Success. -- Use this event to make the Task a Success.
-- @function [parent=#TASK_BASE] __Success -- @function [parent=#TASK] __Success
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Cancel synchronous event function for TASK_BASE. --- FSM Cancel synchronous event function for TASK.
-- Use this event to Cancel the Task. -- Use this event to Cancel the Task.
-- @function [parent=#TASK_BASE] Cancel -- @function [parent=#TASK] Cancel
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Cancel asynchronous event function for TASK_BASE. --- FSM Cancel asynchronous event function for TASK.
-- Use this event to Cancel the Task. -- Use this event to Cancel the Task.
-- @function [parent=#TASK_BASE] __Cancel -- @function [parent=#TASK] __Cancel
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Replan synchronous event function for TASK_BASE. --- FSM Replan synchronous event function for TASK.
-- Use this event to Replan the Task. -- Use this event to Replan the Task.
-- @function [parent=#TASK_BASE] Replan -- @function [parent=#TASK] Replan
-- @param #TASK_BASE self -- @param #TASK self
--- FSM Replan asynchronous event function for TASK_BASE. --- FSM Replan asynchronous event function for TASK.
-- Use this event to Replan the Task. -- Use this event to Replan the Task.
-- @function [parent=#TASK_BASE] __Replan -- @function [parent=#TASK] __Replan
-- @param #TASK_BASE self -- @param #TASK self
--- Instantiates a new TASK_BASE. Should never be used. Interface Class. --- Instantiates a new TASK. Should never be used. Interface Class.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Tasking.Mission#MISSION Mission The mission wherein the Task is registered. -- @param Tasking.Mission#MISSION Mission The mission wherein the Task is registered.
-- @param Core.Set#SET_GROUP SetGroupAssign The set of groups for which the Task can be assigned. -- @param Core.Set#SET_GROUP SetGroupAssign The set of groups for which the Task can be assigned.
-- @param #string TaskName The name of the Task -- @param #string TaskName The name of the Task
-- @param #string TaskType The type of the Task -- @param #string TaskType The type of the Task
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:New( Mission, SetGroupAssign, TaskName, TaskType ) function TASK:New( Mission, SetGroupAssign, TaskName, TaskType )
local self = BASE:Inherit( self, FSM_TASK:New() ) -- Fsm.Fsm#FSM_TASK local self = BASE:Inherit( self, FSM_TASK:New() ) -- Core.Fsm#FSM_TASK
self:SetStartState( "Planned" ) self:SetStartState( "Planned" )
self:AddTransition( "Planned", "Assign", "Assigned" ) self:AddTransition( "Planned", "Assign", "Assigned" )
@@ -189,7 +189,7 @@ function TASK_BASE:New( Mission, SetGroupAssign, TaskName, TaskType )
-- The Task is UnAssigned from the Unit. -- The Task is UnAssigned from the Unit.
-- When there is no Unit left running the Task, and all of the Players crashed, the Task goes into Failed ... -- When there is no Unit left running the Task, and all of the Players crashed, the Task goes into Failed ...
-- self:EventOnCrash( -- self:EventOnCrash(
-- --- @param #TASK_BASE self -- --- @param #TASK self
-- -- @param Core.Event#EVENTDATA EventData -- -- @param Core.Event#EVENTDATA EventData
-- function( self, EventData ) -- function( self, EventData )
-- self:E( "In LeaveUnit" ) -- self:E( "In LeaveUnit" )
@@ -213,17 +213,17 @@ function TASK_BASE:New( Mission, SetGroupAssign, TaskName, TaskType )
end end
--- Get the Task FSM Process Template --- Get the Task FSM Process Template
-- @param #TASK_BASE self -- @param #TASK self
-- @return Fsm.Fsm#FSM_PROCESS -- @return Core.Fsm#FSM_PROCESS
function TASK_BASE:GetUnitProcess() function TASK:GetUnitProcess()
return self.FsmTemplate return self.FsmTemplate
end end
--- Sets the Task FSM Process Template --- Sets the Task FSM Process Template
-- @param #TASK_BASE self -- @param #TASK self
-- @param Fsm.Fsm#FSM_PROCESS -- @param Core.Fsm#FSM_PROCESS
function TASK_BASE:SetUnitProcess( FsmTemplate ) function TASK:SetUnitProcess( FsmTemplate )
self.FsmTemplate = FsmTemplate self.FsmTemplate = FsmTemplate
end end
@@ -232,10 +232,10 @@ end
-- For each Group within the Task, the Unit is check if it can join the Task. -- For each Group within the Task, the Unit is check if it can join the Task.
-- If the Unit was not part of the Task, false is returned. -- If the Unit was not part of the Task, false is returned.
-- If the Unit is part of the Task, true is returned. -- If the Unit is part of the Task, true is returned.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT PlayerUnit The CLIENT or UNIT of the Player joining the Mission. -- @param Wrapper.Unit#UNIT PlayerUnit The CLIENT or UNIT of the Player joining the Mission.
-- @return #boolean true if Unit is part of the Task. -- @return #boolean true if Unit is part of the Task.
function TASK_BASE:JoinUnit( PlayerUnit ) function TASK:JoinUnit( PlayerUnit )
self:F( { PlayerUnit = PlayerUnit } ) self:F( { PlayerUnit = PlayerUnit } )
local PlayerUnitAdded = false local PlayerUnitAdded = false
@@ -268,10 +268,10 @@ end
--- Abort a PlayerUnit from a Task. --- Abort a PlayerUnit from a Task.
-- If the Unit was not part of the Task, false is returned. -- If the Unit was not part of the Task, false is returned.
-- If the Unit is part of the Task, true is returned. -- If the Unit is part of the Task, true is returned.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT PlayerUnit The CLIENT or UNIT of the Player aborting the Task. -- @param Wrapper.Unit#UNIT PlayerUnit The CLIENT or UNIT of the Player aborting the Task.
-- @return #boolean true if Unit is part of the Task. -- @return #boolean true if Unit is part of the Task.
function TASK_BASE:AbortUnit( PlayerUnit ) function TASK:AbortUnit( PlayerUnit )
self:F( { PlayerUnit = PlayerUnit } ) self:F( { PlayerUnit = PlayerUnit } )
local PlayerUnitAborted = false local PlayerUnitAborted = false
@@ -306,10 +306,10 @@ end
--- A PlayerUnit crashed in a Task. Abort the Player. --- A PlayerUnit crashed in a Task. Abort the Player.
-- If the Unit was not part of the Task, false is returned. -- If the Unit was not part of the Task, false is returned.
-- If the Unit is part of the Task, true is returned. -- If the Unit is part of the Task, true is returned.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT PlayerUnit The CLIENT or UNIT of the Player aborting the Task. -- @param Wrapper.Unit#UNIT PlayerUnit The CLIENT or UNIT of the Player aborting the Task.
-- @return #boolean true if Unit is part of the Task. -- @return #boolean true if Unit is part of the Task.
function TASK_BASE:CrashUnit( PlayerUnit ) function TASK:CrashUnit( PlayerUnit )
self:F( { PlayerUnit = PlayerUnit } ) self:F( { PlayerUnit = PlayerUnit } )
local PlayerUnitCrashed = false local PlayerUnitCrashed = false
@@ -344,28 +344,28 @@ end
--- Gets the Mission to where the TASK belongs. --- Gets the Mission to where the TASK belongs.
-- @param #TASK_BASE self -- @param #TASK self
-- @return Tasking.Mission#MISSION -- @return Tasking.Mission#MISSION
function TASK_BASE:GetMission() function TASK:GetMission()
return self.Mission return self.Mission
end end
--- Gets the SET_GROUP assigned to the TASK. --- Gets the SET_GROUP assigned to the TASK.
-- @param #TASK_BASE self -- @param #TASK self
-- @return Core.Set#SET_GROUP -- @return Core.Set#SET_GROUP
function TASK_BASE:GetGroups() function TASK:GetGroups()
return self.SetGroup return self.SetGroup
end end
--- Assign the @{Task}to a @{Group}. --- Assign the @{Task}to a @{Group}.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Group#GROUP TaskGroup -- @param Wrapper.Group#GROUP TaskGroup
-- @return #TASK_BASE -- @return #TASK
function TASK_BASE:AssignToGroup( TaskGroup ) function TASK:AssignToGroup( TaskGroup )
self:F2( TaskGroup:GetName() ) self:F2( TaskGroup:GetName() )
local TaskGroupName = TaskGroup:GetName() local TaskGroupName = TaskGroup:GetName()
@@ -389,10 +389,10 @@ function TASK_BASE:AssignToGroup( TaskGroup )
end end
--- ---
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Group#GROUP FindGroup -- @param Wrapper.Group#GROUP FindGroup
-- @return #boolean -- @return #boolean
function TASK_BASE:HasGroup( FindGroup ) function TASK:HasGroup( FindGroup )
self:GetGroups():FilterOnce() -- Ensure that the filter is updated. self:GetGroups():FilterOnce() -- Ensure that the filter is updated.
return self:GetGroups():IsIncludeObject( FindGroup ) return self:GetGroups():IsIncludeObject( FindGroup )
@@ -400,16 +400,16 @@ function TASK_BASE:HasGroup( FindGroup )
end end
--- Assign the @{Task} to an alive @{Unit}. --- Assign the @{Task} to an alive @{Unit}.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT TaskUnit -- @param Wrapper.Unit#UNIT TaskUnit
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:AssignToUnit( TaskUnit ) function TASK:AssignToUnit( TaskUnit )
self:F( TaskUnit:GetName() ) self:F( TaskUnit:GetName() )
local FsmTemplate = self:GetUnitProcess() local FsmTemplate = self:GetUnitProcess()
-- Assign a new FsmUnit to TaskUnit. -- Assign a new FsmUnit to TaskUnit.
local FsmUnit = self:SetStateMachine( TaskUnit, FsmTemplate:Copy( TaskUnit, self ) ) -- Fsm.Fsm#FSM_PROCESS local FsmUnit = self:SetStateMachine( TaskUnit, FsmTemplate:Copy( TaskUnit, self ) ) -- Core.Fsm#FSM_PROCESS
self:E({"Address FsmUnit", tostring( FsmUnit ) } ) self:E({"Address FsmUnit", tostring( FsmUnit ) } )
FsmUnit:SetStartState( "Planned" ) FsmUnit:SetStartState( "Planned" )
@@ -419,10 +419,10 @@ function TASK_BASE:AssignToUnit( TaskUnit )
end end
--- UnAssign the @{Task} from an alive @{Unit}. --- UnAssign the @{Task} from an alive @{Unit}.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT TaskUnit -- @param Wrapper.Unit#UNIT TaskUnit
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:UnAssignFromUnit( TaskUnit ) function TASK:UnAssignFromUnit( TaskUnit )
self:F( TaskUnit ) self:F( TaskUnit )
self:RemoveStateMachine( TaskUnit ) self:RemoveStateMachine( TaskUnit )
@@ -431,8 +431,8 @@ function TASK_BASE:UnAssignFromUnit( TaskUnit )
end end
--- Send a message of the @{Task} to the assigned @{Group}s. --- Send a message of the @{Task} to the assigned @{Group}s.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:MessageToGroups( Message ) function TASK:MessageToGroups( Message )
self:F( { Message = Message } ) self:F( { Message = Message } )
local Mission = self:GetMission() local Mission = self:GetMission()
@@ -445,8 +445,8 @@ end
--- Send the briefng message of the @{Task} to the assigned @{Group}s. --- Send the briefng message of the @{Task} to the assigned @{Group}s.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:SendBriefingToAssignedGroups() function TASK:SendBriefingToAssignedGroups()
self:F2() self:F2()
for TaskGroupName, TaskGroup in pairs( self.SetGroup:GetSet() ) do for TaskGroupName, TaskGroup in pairs( self.SetGroup:GetSet() ) do
@@ -459,8 +459,8 @@ end
--- Assign the @{Task} from the @{Group}s. --- Assign the @{Task} from the @{Group}s.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:UnAssignFromGroups() function TASK:UnAssignFromGroups()
self:F2() self:F2()
for TaskGroupName, TaskGroup in pairs( self.SetGroup:GetSet() ) do for TaskGroupName, TaskGroup in pairs( self.SetGroup:GetSet() ) do
@@ -481,10 +481,10 @@ function TASK_BASE:UnAssignFromGroups()
end end
--- Returns if the @{Task} is assigned to the Group. --- Returns if the @{Task} is assigned to the Group.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Group#GROUP TaskGroup -- @param Wrapper.Group#GROUP TaskGroup
-- @return #boolean -- @return #boolean
function TASK_BASE:IsAssignedToGroup( TaskGroup ) function TASK:IsAssignedToGroup( TaskGroup )
local TaskGroupName = TaskGroup:GetName() local TaskGroupName = TaskGroup:GetName()
@@ -498,9 +498,9 @@ function TASK_BASE:IsAssignedToGroup( TaskGroup )
end end
--- Returns if the @{Task} has still alive and assigned Units. --- Returns if the @{Task} has still alive and assigned Units.
-- @param #TASK_BASE self -- @param #TASK self
-- @return #boolean -- @return #boolean
function TASK_BASE:HasAliveUnits() function TASK:HasAliveUnits()
self:F() self:F()
for TaskGroupID, TaskGroup in pairs( self.SetGroup:GetSet() ) do for TaskGroupID, TaskGroup in pairs( self.SetGroup:GetSet() ) do
@@ -521,8 +521,8 @@ function TASK_BASE:HasAliveUnits()
end end
--- Set the menu options of the @{Task} to all the groups in the SetGroup. --- Set the menu options of the @{Task} to all the groups in the SetGroup.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:SetMenu() function TASK:SetMenu()
self:F() self:F()
self.SetGroup:Flush() self.SetGroup:Flush()
@@ -536,9 +536,9 @@ end
--- Remove the menu options of the @{Task} to all the groups in the SetGroup. --- Remove the menu options of the @{Task} to all the groups in the SetGroup.
-- @param #TASK_BASE self -- @param #TASK self
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:RemoveMenu() function TASK:RemoveMenu()
for TaskGroupID, TaskGroup in pairs( self.SetGroup:GetSet() ) do for TaskGroupID, TaskGroup in pairs( self.SetGroup:GetSet() ) do
self:RemoveMenuForGroup( TaskGroup ) self:RemoveMenuForGroup( TaskGroup )
@@ -547,8 +547,8 @@ end
--- Set the Menu for a Group --- Set the Menu for a Group
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:SetMenuForGroup( TaskGroup ) function TASK:SetMenuForGroup( TaskGroup )
if not self:IsAssignedToGroup( TaskGroup ) then if not self:IsAssignedToGroup( TaskGroup ) then
self:SetPlannedMenuForGroup( TaskGroup, self:GetTaskName() ) self:SetPlannedMenuForGroup( TaskGroup, self:GetTaskName() )
@@ -559,11 +559,11 @@ end
--- Set the planned menu option of the @{Task}. --- Set the planned menu option of the @{Task}.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Group#GROUP TaskGroup -- @param Wrapper.Group#GROUP TaskGroup
-- @param #string MenuText The menu text. -- @param #string MenuText The menu text.
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:SetPlannedMenuForGroup( TaskGroup, MenuText ) function TASK:SetPlannedMenuForGroup( TaskGroup, MenuText )
self:E( TaskGroup:GetName() ) self:E( TaskGroup:GetName() )
local Mission = self:GetMission() local Mission = self:GetMission()
@@ -577,10 +577,10 @@ function TASK_BASE:SetPlannedMenuForGroup( TaskGroup, MenuText )
end end
--- Set the assigned menu options of the @{Task}. --- Set the assigned menu options of the @{Task}.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Group#GROUP TaskGroup -- @param Wrapper.Group#GROUP TaskGroup
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:SetAssignedMenuForGroup( TaskGroup ) function TASK:SetAssignedMenuForGroup( TaskGroup )
self:E( TaskGroup:GetName() ) self:E( TaskGroup:GetName() )
local Mission = self:GetMission() local Mission = self:GetMission()
@@ -595,10 +595,10 @@ function TASK_BASE:SetAssignedMenuForGroup( TaskGroup )
end end
--- Remove the menu option of the @{Task} for a @{Group}. --- Remove the menu option of the @{Task} for a @{Group}.
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Group#GROUP TaskGroup -- @param Wrapper.Group#GROUP TaskGroup
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:RemoveMenuForGroup( TaskGroup ) function TASK:RemoveMenuForGroup( TaskGroup )
local Mission = self:GetMission() local Mission = self:GetMission()
local MissionName = Mission:GetName() local MissionName = Mission:GetName()
@@ -607,7 +607,7 @@ function TASK_BASE:RemoveMenuForGroup( TaskGroup )
MissionMenu:Remove() MissionMenu:Remove()
end end
function TASK_BASE.MenuAssignToGroup( MenuParam ) function TASK.MenuAssignToGroup( MenuParam )
local self = MenuParam.self local self = MenuParam.self
local TaskGroup = MenuParam.TaskGroup local TaskGroup = MenuParam.TaskGroup
@@ -617,7 +617,7 @@ function TASK_BASE.MenuAssignToGroup( MenuParam )
self:AssignToGroup( TaskGroup ) self:AssignToGroup( TaskGroup )
end end
function TASK_BASE.MenuTaskStatus( MenuParam ) function TASK.MenuTaskStatus( MenuParam )
local self = MenuParam.self local self = MenuParam.self
local TaskGroup = MenuParam.TaskGroup local TaskGroup = MenuParam.TaskGroup
@@ -625,7 +625,7 @@ function TASK_BASE.MenuTaskStatus( MenuParam )
--self:AssignToGroup( TaskGroup ) --self:AssignToGroup( TaskGroup )
end end
function TASK_BASE.MenuTaskAbort( MenuParam ) function TASK.MenuTaskAbort( MenuParam )
local self = MenuParam.self local self = MenuParam.self
local TaskGroup = MenuParam.TaskGroup local TaskGroup = MenuParam.TaskGroup
@@ -636,9 +636,9 @@ end
--- Returns the @{Task} name. --- Returns the @{Task} name.
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string TaskName -- @return #string TaskName
function TASK_BASE:GetTaskName() function TASK:GetTaskName()
return self.TaskName return self.TaskName
end end
@@ -646,10 +646,10 @@ end
--- Get the default or currently assigned @{Process} template with key ProcessName. --- Get the default or currently assigned @{Process} template with key ProcessName.
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string ProcessName -- @param #string ProcessName
-- @return Fsm.Fsm#FSM_PROCESS -- @return Core.Fsm#FSM_PROCESS
function TASK_BASE:GetProcessTemplate( ProcessName ) function TASK:GetProcessTemplate( ProcessName )
local ProcessTemplate = self.ProcessClasses[ProcessName] local ProcessTemplate = self.ProcessClasses[ProcessName]
@@ -660,10 +660,10 @@ end
-- TODO: Obscolete? -- TODO: Obscolete?
--- Fail processes from @{Task} with key @{Unit} --- Fail processes from @{Task} with key @{Unit}
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string TaskUnitName -- @param #string TaskUnitName
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:FailProcesses( TaskUnitName ) function TASK:FailProcesses( TaskUnitName )
for ProcessID, ProcessData in pairs( self.Processes[TaskUnitName] ) do for ProcessID, ProcessData in pairs( self.Processes[TaskUnitName] ) do
local Process = ProcessData local Process = ProcessData
@@ -672,10 +672,10 @@ function TASK_BASE:FailProcesses( TaskUnitName )
end end
--- Add a FiniteStateMachine to @{Task} with key Task@{Unit} --- Add a FiniteStateMachine to @{Task} with key Task@{Unit}
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT TaskUnit -- @param Wrapper.Unit#UNIT TaskUnit
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:SetStateMachine( TaskUnit, Fsm ) function TASK:SetStateMachine( TaskUnit, Fsm )
self:F( { TaskUnit, self.Fsm[TaskUnit] ~= nil } ) self:F( { TaskUnit, self.Fsm[TaskUnit] ~= nil } )
self.Fsm[TaskUnit] = Fsm self.Fsm[TaskUnit] = Fsm
@@ -684,10 +684,10 @@ function TASK_BASE:SetStateMachine( TaskUnit, Fsm )
end end
--- Remove FiniteStateMachines from @{Task} with key Task@{Unit} --- Remove FiniteStateMachines from @{Task} with key Task@{Unit}
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT TaskUnit -- @param Wrapper.Unit#UNIT TaskUnit
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:RemoveStateMachine( TaskUnit ) function TASK:RemoveStateMachine( TaskUnit )
self:F( { TaskUnit, self.Fsm[TaskUnit] ~= nil } ) self:F( { TaskUnit, self.Fsm[TaskUnit] ~= nil } )
self.Fsm[TaskUnit] = nil self.Fsm[TaskUnit] = nil
@@ -696,10 +696,10 @@ function TASK_BASE:RemoveStateMachine( TaskUnit )
end end
--- Checks if there is a FiniteStateMachine assigned to Task@{Unit} for @{Task} --- Checks if there is a FiniteStateMachine assigned to Task@{Unit} for @{Task}
-- @param #TASK_BASE self -- @param #TASK self
-- @param Wrapper.Unit#UNIT TaskUnit -- @param Wrapper.Unit#UNIT TaskUnit
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:HasStateMachine( TaskUnit ) function TASK:HasStateMachine( TaskUnit )
self:F( { TaskUnit, self.Fsm[TaskUnit] ~= nil } ) self:F( { TaskUnit, self.Fsm[TaskUnit] ~= nil } )
return ( self.Fsm[TaskUnit] ~= nil ) return ( self.Fsm[TaskUnit] ~= nil )
@@ -707,17 +707,17 @@ end
--- Gets the Scoring of the task --- Gets the Scoring of the task
-- @param #TASK_BASE self -- @param #TASK self
-- @return Functional.Scoring#SCORING Scoring -- @return Functional.Scoring#SCORING Scoring
function TASK_BASE:GetScoring() function TASK:GetScoring()
return self.Mission:GetScoring() return self.Mission:GetScoring()
end end
--- Gets the Task Index, which is a combination of the Task type, the Task name. --- Gets the Task Index, which is a combination of the Task type, the Task name.
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string The Task ID -- @return #string The Task ID
function TASK_BASE:GetTaskIndex() function TASK:GetTaskIndex()
local TaskType = self:GetType() local TaskType = self:GetType()
local TaskName = self:GetName() local TaskName = self:GetName()
@@ -726,137 +726,137 @@ function TASK_BASE:GetTaskIndex()
end end
--- Sets the Name of the Task --- Sets the Name of the Task
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string TaskName -- @param #string TaskName
function TASK_BASE:SetName( TaskName ) function TASK:SetName( TaskName )
self.TaskName = TaskName self.TaskName = TaskName
end end
--- Gets the Name of the Task --- Gets the Name of the Task
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string The Task Name -- @return #string The Task Name
function TASK_BASE:GetName() function TASK:GetName()
return self.TaskName return self.TaskName
end end
--- Sets the Type of the Task --- Sets the Type of the Task
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string TaskType -- @param #string TaskType
function TASK_BASE:SetType( TaskType ) function TASK:SetType( TaskType )
self.TaskType = TaskType self.TaskType = TaskType
end end
--- Gets the Type of the Task --- Gets the Type of the Task
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string TaskType -- @return #string TaskType
function TASK_BASE:GetType() function TASK:GetType()
return self.TaskType return self.TaskType
end end
--- Sets the ID of the Task --- Sets the ID of the Task
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string TaskID -- @param #string TaskID
function TASK_BASE:SetID( TaskID ) function TASK:SetID( TaskID )
self.TaskID = TaskID self.TaskID = TaskID
end end
--- Gets the ID of the Task --- Gets the ID of the Task
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string TaskID -- @return #string TaskID
function TASK_BASE:GetID() function TASK:GetID()
return self.TaskID return self.TaskID
end end
--- Sets a @{Task} to status **Success**. --- Sets a @{Task} to status **Success**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:StateSuccess() function TASK:StateSuccess()
self:SetState( self, "State", "Success" ) self:SetState( self, "State", "Success" )
return self return self
end end
--- Is the @{Task} status **Success**. --- Is the @{Task} status **Success**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:IsStateSuccess() function TASK:IsStateSuccess()
return self:Is( "Success" ) return self:Is( "Success" )
end end
--- Sets a @{Task} to status **Failed**. --- Sets a @{Task} to status **Failed**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:StateFailed() function TASK:StateFailed()
self:SetState( self, "State", "Failed" ) self:SetState( self, "State", "Failed" )
return self return self
end end
--- Is the @{Task} status **Failed**. --- Is the @{Task} status **Failed**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:IsStateFailed() function TASK:IsStateFailed()
return self:Is( "Failed" ) return self:Is( "Failed" )
end end
--- Sets a @{Task} to status **Planned**. --- Sets a @{Task} to status **Planned**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:StatePlanned() function TASK:StatePlanned()
self:SetState( self, "State", "Planned" ) self:SetState( self, "State", "Planned" )
return self return self
end end
--- Is the @{Task} status **Planned**. --- Is the @{Task} status **Planned**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:IsStatePlanned() function TASK:IsStatePlanned()
return self:Is( "Planned" ) return self:Is( "Planned" )
end end
--- Sets a @{Task} to status **Assigned**. --- Sets a @{Task} to status **Assigned**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:StateAssigned() function TASK:StateAssigned()
self:SetState( self, "State", "Assigned" ) self:SetState( self, "State", "Assigned" )
return self return self
end end
--- Is the @{Task} status **Assigned**. --- Is the @{Task} status **Assigned**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:IsStateAssigned() function TASK:IsStateAssigned()
return self:Is( "Assigned" ) return self:Is( "Assigned" )
end end
--- Sets a @{Task} to status **Hold**. --- Sets a @{Task} to status **Hold**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:StateHold() function TASK:StateHold()
self:SetState( self, "State", "Hold" ) self:SetState( self, "State", "Hold" )
return self return self
end end
--- Is the @{Task} status **Hold**. --- Is the @{Task} status **Hold**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:IsStateHold() function TASK:IsStateHold()
return self:Is( "Hold" ) return self:Is( "Hold" )
end end
--- Sets a @{Task} to status **Replanned**. --- Sets a @{Task} to status **Replanned**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:StateReplanned() function TASK:StateReplanned()
self:SetState( self, "State", "Replanned" ) self:SetState( self, "State", "Replanned" )
return self return self
end end
--- Is the @{Task} status **Replanned**. --- Is the @{Task} status **Replanned**.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:IsStateReplanned() function TASK:IsStateReplanned()
return self:Is( "Replanned" ) return self:Is( "Replanned" )
end end
--- Gets the @{Task} status. --- Gets the @{Task} status.
-- @param #TASK_BASE self -- @param #TASK self
function TASK_BASE:GetStateString() function TASK:GetStateString()
return self:GetState( self, "State" ) return self:GetState( self, "State" )
end end
--- Sets a @{Task} briefing. --- Sets a @{Task} briefing.
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string TaskBriefing -- @param #string TaskBriefing
-- @return #TASK_BASE self -- @return #TASK self
function TASK_BASE:SetBriefing( TaskBriefing ) function TASK:SetBriefing( TaskBriefing )
self.TaskBriefing = TaskBriefing self.TaskBriefing = TaskBriefing
return self return self
end end
@@ -865,11 +865,11 @@ end
--- FSM function for a TASK --- FSM function for a TASK
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function TASK_BASE:onenterAssigned( Event, From, To ) function TASK:onenterAssigned( Event, From, To )
self:E("Task Assigned") self:E("Task Assigned")
@@ -879,11 +879,11 @@ end
--- FSM function for a TASK --- FSM function for a TASK
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function TASK_BASE:onenterSuccess( Event, From, To ) function TASK:onenterSuccess( Event, From, To )
self:E( "Task Success" ) self:E( "Task Success" )
@@ -896,11 +896,11 @@ end
--- FSM function for a TASK --- FSM function for a TASK
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function TASK_BASE:onenterAborted( Event, From, To ) function TASK:onenterAborted( Event, From, To )
self:E( "Task Aborted" ) self:E( "Task Aborted" )
@@ -910,11 +910,11 @@ function TASK_BASE:onenterAborted( Event, From, To )
end end
--- FSM function for a TASK --- FSM function for a TASK
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function TASK_BASE:onenterFailed( Event, From, To ) function TASK:onenterFailed( Event, From, To )
self:E( "Task Failed" ) self:E( "Task Failed" )
@@ -924,11 +924,11 @@ function TASK_BASE:onenterFailed( Event, From, To )
end end
--- FSM function for a TASK --- FSM function for a TASK
-- @param #TASK_BASE self -- @param #TASK self
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
function TASK_BASE:onstatechange( Event, From, To ) function TASK:onstatechange( Event, From, To )
if self:IsTrace() then if self:IsTrace() then
MESSAGE:New( "@ Task " .. self.TaskName .. " : " .. Event .. " changed to state " .. To, 2 ):ToAll() MESSAGE:New( "@ Task " .. self.TaskName .. " : " .. Event .. " changed to state " .. To, 2 ):ToAll()
@@ -948,9 +948,9 @@ do -- Reporting
--- Create a summary report of the Task. --- Create a summary report of the Task.
-- List the Task Name and Status -- List the Task Name and Status
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string -- @return #string
function TASK_BASE:ReportSummary() function TASK:ReportSummary()
local Report = REPORT:New() local Report = REPORT:New()
@@ -968,9 +968,9 @@ end
--- Create a detailed report of the Task. --- Create a detailed report of the Task.
-- List the Task Status, and the Players assigned to the Task. -- List the Task Status, and the Players assigned to the Task.
-- @param #TASK_BASE self -- @param #TASK self
-- @return #string -- @return #string
function TASK_BASE:ReportDetails() function TASK:ReportDetails()
local Report = REPORT:New() local Report = REPORT:New()

4
Moose Development/Moose/Tasking/TaskMenu.lua
View File

@@ -47,7 +47,7 @@ end
--- StateMachine callback function for a TASK2 --- StateMachine callback function for a TASK2
-- @param #TASK2_MENU_CLIENT self -- @param #TASK2_MENU_CLIENT self
-- @param Fsm.Fsm#FSM_TASK Fsm -- @param Core.Fsm#FSM_TASK Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To
@@ -71,7 +71,7 @@ end
--- StateMachine callback function for a TASK2 --- StateMachine callback function for a TASK2
-- @param #TASK2_MENU_CLIENT self -- @param #TASK2_MENU_CLIENT self
-- @param Fsm.Fsm#FSM_TASK Fsm -- @param Core.Fsm#FSM_TASK Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To

20
Moose Development/Moose/Tasking/Task_A2G.lua
View File

@@ -1,14 +1,14 @@
--- (AI) (SP) (MP) Tasking for Air to Ground Processes. --- (AI) (SP) (MP) Tasking for Air to Ground Processes.
-- --
-- 1) @{#TASK_A2G} class, extends @{Tasking.Task#TASK_BASE} -- 1) @{#TASK_A2G} class, extends @{Tasking.Task#TASK}
-- ================================================= -- =================================================
-- The @{#TASK_A2G} class defines a CAS or BAI task of a @{Set} of Target Units, -- The @{#TASK_A2G} class defines a CAS or BAI task of a @{Set} of Target Units,
-- located at a Target Zone, based on the tasking capabilities defined in @{Tasking.Task#TASK_BASE}. -- located at a Target Zone, based on the tasking capabilities defined in @{Tasking.Task#TASK}.
-- The TASK_A2G is implemented using a @{Statemachine#FSM_TASK}, and has the following statuses: -- The TASK_A2G is implemented using a @{Statemachine#FSM_TASK}, and has the following statuses:
-- --
-- * **None**: Start of the process -- * **None**: Start of the process
-- * **Planned**: The SEAD task is planned. Upon Planned, the sub-process @{Process_Fsm.Assign#FSM_ASSIGN_ACCEPT} is started to accept the task. -- * **Planned**: The SEAD task is planned. Upon Planned, the sub-process @{Process_Fsm.Assign#ACT_ASSIGN_ACCEPT} is started to accept the task.
-- * **Assigned**: The SEAD task is assigned to a @{Wrapper.Group#GROUP}. Upon Assigned, the sub-process @{Process_Fsm.Route#FSM_ROUTE} is started to route the active Units in the Group to the attack zone. -- * **Assigned**: The SEAD task is assigned to a @{Wrapper.Group#GROUP}. Upon Assigned, the sub-process @{Process_Fsm.Route#ACT_ROUTE} is started to route the active Units in the Group to the attack zone.
-- * **Success**: The SEAD task is successfully completed. Upon Success, the sub-process @{Process_SEAD#PROCESS_SEAD} is started to follow-up successful SEADing of the targets assigned in the task. -- * **Success**: The SEAD task is successfully completed. Upon Success, the sub-process @{Process_SEAD#PROCESS_SEAD} is started to follow-up successful SEADing of the targets assigned in the task.
-- * **Failed**: The SEAD task has failed. This will happen if the player exists the task early, without communicating a possible cancellation to HQ. -- * **Failed**: The SEAD task has failed. This will happen if the player exists the task early, without communicating a possible cancellation to HQ.
-- --
@@ -23,7 +23,7 @@ do -- TASK_A2G
--- The TASK_A2G class --- The TASK_A2G class
-- @type TASK_A2G -- @type TASK_A2G
-- @extends Tasking.Task#TASK_BASE -- @extends Tasking.Task#TASK
TASK_A2G = { TASK_A2G = {
ClassName = "TASK_A2G", ClassName = "TASK_A2G",
} }
@@ -38,7 +38,7 @@ do -- TASK_A2G
-- @param Core.Zone#ZONE_BASE TargetZone -- @param Core.Zone#ZONE_BASE TargetZone
-- @return #TASK_A2G self -- @return #TASK_A2G self
function TASK_A2G:New( Mission, SetGroup, TaskName, TaskType, TargetSetUnit, TargetZone, FACUnit ) function TASK_A2G:New( Mission, SetGroup, TaskName, TaskType, TargetSetUnit, TargetZone, FACUnit )
local self = BASE:Inherit( self, TASK_BASE:New( Mission, SetGroup, TaskName, TaskType ) ) local self = BASE:Inherit( self, TASK:New( Mission, SetGroup, TaskName, TaskType ) )
self:F() self:F()
self.TargetSetUnit = TargetSetUnit self.TargetSetUnit = TargetSetUnit
@@ -47,12 +47,12 @@ do -- TASK_A2G
local Fsm = self:GetUnitProcess() local Fsm = self:GetUnitProcess()
Fsm:AddProcess( "Planned", "Accept", FSM_ASSIGN_ACCEPT:New( "Attack the Area" ), { Assigned = "Route", Rejected = "Eject" } ) Fsm:AddProcess( "Planned", "Accept", ACT_ASSIGN_ACCEPT:New( "Attack the Area" ), { Assigned = "Route", Rejected = "Eject" } )
Fsm:AddProcess( "Assigned", "Route", FSM_ROUTE_ZONE:New( self.TargetZone ), { Arrived = "Update" } ) Fsm:AddProcess( "Assigned", "Route", ACT_ROUTE_ZONE:New( self.TargetZone ), { Arrived = "Update" } )
Fsm:AddAction ( "Rejected", "Eject", "Planned" ) Fsm:AddAction ( "Rejected", "Eject", "Planned" )
Fsm:AddAction ( "Arrived", "Update", "Updated" ) Fsm:AddAction ( "Arrived", "Update", "Updated" )
Fsm:AddProcess( "Updated", "Account", FSM_ACCOUNT_DEADS:New( self.TargetSetUnit, "Attack" ), { Accounted = "Success" } ) Fsm:AddProcess( "Updated", "Account", ACT_ACCOUNT_DEADS:New( self.TargetSetUnit, "Attack" ), { Accounted = "Success" } )
Fsm:AddProcess( "Updated", "Smoke", FSM_SMOKE_TARGETS_ZONE:New( self.TargetSetUnit, self.TargetZone ) ) Fsm:AddProcess( "Updated", "Smoke", ACT_ASSIST_SMOKE_TARGETS_ZONE:New( self.TargetSetUnit, self.TargetZone ) )
--Fsm:AddProcess( "Updated", "JTAC", PROCESS_JTAC:New( self, TaskUnit, self.TargetSetUnit, self.FACUnit ) ) --Fsm:AddProcess( "Updated", "JTAC", PROCESS_JTAC:New( self, TaskUnit, self.TargetSetUnit, self.FACUnit ) )
Fsm:AddAction ( "Accounted", "Success", "Success" ) Fsm:AddAction ( "Accounted", "Success", "Success" )
Fsm:AddAction ( "Failed", "Fail", "Failed" ) Fsm:AddAction ( "Failed", "Fail", "Failed" )

12
Moose Development/Moose/Tasking/Task_AIBalancer.lua
View File

@@ -2,11 +2,11 @@
-- --
-- === -- ===
-- --
-- 1) @{Functional.AIBalancer#AIBALANCER} class, extends @{Core.Base#BASE} -- 1) @{AI.AI_Balancer#AIBALANCER} class, extends @{Core.Base#BASE}
-- ======================================================= -- =======================================================
-- The @{Functional.AIBalancer#AIBALANCER} class controls the dynamic spawning of AI GROUPS depending on a SET_CLIENT. -- The @{AI.AI_Balancer#AIBALANCER} class controls the dynamic spawning of AI GROUPS depending on a SET_CLIENT.
-- There will be as many AI GROUPS spawned as there at CLIENTS in SET_CLIENT not spawned. -- There will be as many AI GROUPS spawned as there at CLIENTS in SET_CLIENT not spawned.
-- The AIBalancer uses the @{PatrolCore.Zone#PATROLZONE} class to make AI patrol an zone until the fuel treshold is reached. -- The AI_Balancer uses the @{PatrolCore.Zone#PATROLZONE} class to make AI patrol an zone until the fuel treshold is reached.
-- --
-- 1.1) AIBALANCER construction method: -- 1.1) AIBALANCER construction method:
-- ------------------------------------ -- ------------------------------------
@@ -23,7 +23,7 @@
-- --
-- 1.3) AIBALANCER allows AI to patrol specific zones: -- 1.3) AIBALANCER allows AI to patrol specific zones:
-- --------------------------------------------------- -- ---------------------------------------------------
-- Use @{Functional.AIBalancer#AIBALANCER.SetPatrolZone}() to specify a zone where the AI needs to patrol. -- Use @{AI.AI_Balancer#AIBALANCER.SetPatrolZone}() to specify a zone where the AI needs to patrol.
-- --
-- === -- ===
-- --
@@ -61,7 +61,7 @@
-- --
-- * FlightControl: Framework Design & Programming -- * FlightControl: Framework Design & Programming
-- --
-- @module AIBalancer -- @module AI_Balancer
@@ -157,7 +157,7 @@ function AIBALANCER:SetPatrolZone( PatrolZone, PatrolFloorAltitude, PatrolCeilin
) )
end end
--- Get the @{PatrolZone} object assigned by the @{AIBalancer} object. --- Get the @{PatrolZone} object assigned by the @{AI_Balancer} object.
-- @param #AIBALANCER self -- @param #AIBALANCER self
-- @return PatrolCore.Zone#PATROLZONE PatrolZone The @{PatrolZone} where the AI needs to patrol. -- @return PatrolCore.Zone#PATROLZONE PatrolZone The @{PatrolZone} where the AI needs to patrol.
function AIBALANCER:GetPatrolZone() function AIBALANCER:GetPatrolZone()

16
Moose Development/Moose/Tasking/Task_Pickup.lua
View File

@@ -1,14 +1,14 @@
--- This module contains the TASK_PICKUP classes. --- This module contains the TASK_PICKUP classes.
-- --
-- 1) @{#TASK_PICKUP} class, extends @{Tasking.Task#TASK_BASE} -- 1) @{#TASK_PICKUP} class, extends @{Tasking.Task#TASK}
-- =================================================== -- ===================================================
-- The @{#TASK_PICKUP} class defines a pickup task of a @{Set} of @{CARGO} objects defined within the mission. -- The @{#TASK_PICKUP} class defines a pickup task of a @{Set} of @{CARGO} objects defined within the mission.
-- based on the tasking capabilities defined in @{Tasking.Task#TASK_BASE}. -- based on the tasking capabilities defined in @{Tasking.Task#TASK}.
-- The TASK_PICKUP is implemented using a @{Statemachine#FSM_TASK}, and has the following statuses: -- The TASK_PICKUP is implemented using a @{Statemachine#FSM_TASK}, and has the following statuses:
-- --
-- * **None**: Start of the process -- * **None**: Start of the process
-- * **Planned**: The SEAD task is planned. Upon Planned, the sub-process @{Process_Fsm.Assign#FSM_ASSIGN_ACCEPT} is started to accept the task. -- * **Planned**: The SEAD task is planned. Upon Planned, the sub-process @{Process_Fsm.Assign#ACT_ASSIGN_ACCEPT} is started to accept the task.
-- * **Assigned**: The SEAD task is assigned to a @{Wrapper.Group#GROUP}. Upon Assigned, the sub-process @{Process_Fsm.Route#FSM_ROUTE} is started to route the active Units in the Group to the attack zone. -- * **Assigned**: The SEAD task is assigned to a @{Wrapper.Group#GROUP}. Upon Assigned, the sub-process @{Process_Fsm.Route#ACT_ROUTE} is started to route the active Units in the Group to the attack zone.
-- * **Success**: The SEAD task is successfully completed. Upon Success, the sub-process @{Process_SEAD#PROCESS_SEAD} is started to follow-up successful SEADing of the targets assigned in the task. -- * **Success**: The SEAD task is successfully completed. Upon Success, the sub-process @{Process_SEAD#PROCESS_SEAD} is started to follow-up successful SEADing of the targets assigned in the task.
-- * **Failed**: The SEAD task has failed. This will happen if the player exists the task early, without communicating a possible cancellation to HQ. -- * **Failed**: The SEAD task has failed. This will happen if the player exists the task early, without communicating a possible cancellation to HQ.
-- --
@@ -23,7 +23,7 @@ do -- TASK_PICKUP
--- The TASK_PICKUP class --- The TASK_PICKUP class
-- @type TASK_PICKUP -- @type TASK_PICKUP
-- @extends Tasking.Task#TASK_BASE -- @extends Tasking.Task#TASK
TASK_PICKUP = { TASK_PICKUP = {
ClassName = "TASK_PICKUP", ClassName = "TASK_PICKUP",
} }
@@ -38,7 +38,7 @@ do -- TASK_PICKUP
-- @param Core.Zone#ZONE_BASE TargetZone -- @param Core.Zone#ZONE_BASE TargetZone
-- @return #TASK_PICKUP self -- @return #TASK_PICKUP self
function TASK_PICKUP:New( Mission, AssignedSetGroup, TaskName, TaskType ) function TASK_PICKUP:New( Mission, AssignedSetGroup, TaskName, TaskType )
local self = BASE:Inherit( self, TASK_BASE:New( Mission, AssignedSetGroup, TaskName, TaskType, "PICKUP" ) ) local self = BASE:Inherit( self, TASK:New( Mission, AssignedSetGroup, TaskName, TaskType, "PICKUP" ) )
self:F() self:F()
_EVENTDISPATCHER:OnPlayerLeaveUnit( self._EventPlayerLeaveUnit, self ) _EVENTDISPATCHER:OnPlayerLeaveUnit( self._EventPlayerLeaveUnit, self )
@@ -67,7 +67,7 @@ do -- TASK_PICKUP
function TASK_PICKUP:AssignToUnit( TaskUnit ) function TASK_PICKUP:AssignToUnit( TaskUnit )
self:F( TaskUnit:GetName() ) self:F( TaskUnit:GetName() )
local ProcessAssign = self:AddProcess( TaskUnit, FSM_ASSIGN_ACCEPT:New( self, TaskUnit, self.TaskBriefing ) ) local ProcessAssign = self:AddProcess( TaskUnit, ACT_ASSIGN_ACCEPT:New( self, TaskUnit, self.TaskBriefing ) )
local ProcessPickup = self:AddProcess( TaskUnit, PROCESS_PICKUP:New( self, self.TaskType, TaskUnit ) ) local ProcessPickup = self:AddProcess( TaskUnit, PROCESS_PICKUP:New( self, self.TaskType, TaskUnit ) )
local Process = self:AddStateMachine( TaskUnit, FSM_TASK:New( self, TaskUnit, { local Process = self:AddStateMachine( TaskUnit, FSM_TASK:New( self, TaskUnit, {
@@ -98,7 +98,7 @@ do -- TASK_PICKUP
--- StateMachine callback function for a TASK --- StateMachine callback function for a TASK
-- @param #TASK_PICKUP self -- @param #TASK_PICKUP self
-- @param Fsm.Fsm#FSM_TASK Fsm -- @param Core.Fsm#FSM_TASK Fsm
-- @param #string Event -- @param #string Event
-- @param #string From -- @param #string From
-- @param #string To -- @param #string To

20
Moose Development/Moose/Tasking/Task_SEAD.lua
View File

@@ -1,14 +1,14 @@
--- This module contains the TASK_SEAD classes. --- This module contains the TASK_SEAD classes.
-- --
-- 1) @{#TASK_SEAD} class, extends @{Tasking.Task#TASK_BASE} -- 1) @{#TASK_SEAD} class, extends @{Tasking.Task#TASK}
-- ================================================= -- =================================================
-- The @{#TASK_SEAD} class defines a SEAD task for a @{Set} of Target Units, located at a Target Zone, -- The @{#TASK_SEAD} class defines a SEAD task for a @{Set} of Target Units, located at a Target Zone,
-- based on the tasking capabilities defined in @{Tasking.Task#TASK_BASE}. -- based on the tasking capabilities defined in @{Tasking.Task#TASK}.
-- The TASK_SEAD is implemented using a @{Statemachine#FSM_TASK}, and has the following statuses: -- The TASK_SEAD is implemented using a @{Statemachine#FSM_TASK}, and has the following statuses:
-- --
-- * **None**: Start of the process -- * **None**: Start of the process
-- * **Planned**: The SEAD task is planned. Upon Planned, the sub-process @{Process_Fsm.Assign#FSM_ASSIGN_ACCEPT} is started to accept the task. -- * **Planned**: The SEAD task is planned. Upon Planned, the sub-process @{Process_Fsm.Assign#ACT_ASSIGN_ACCEPT} is started to accept the task.
-- * **Assigned**: The SEAD task is assigned to a @{Wrapper.Group#GROUP}. Upon Assigned, the sub-process @{Process_Fsm.Route#FSM_ROUTE} is started to route the active Units in the Group to the attack zone. -- * **Assigned**: The SEAD task is assigned to a @{Wrapper.Group#GROUP}. Upon Assigned, the sub-process @{Process_Fsm.Route#ACT_ROUTE} is started to route the active Units in the Group to the attack zone.
-- * **Success**: The SEAD task is successfully completed. Upon Success, the sub-process @{Process_SEAD#PROCESS_SEAD} is started to follow-up successful SEADing of the targets assigned in the task. -- * **Success**: The SEAD task is successfully completed. Upon Success, the sub-process @{Process_SEAD#PROCESS_SEAD} is started to follow-up successful SEADing of the targets assigned in the task.
-- * **Failed**: The SEAD task has failed. This will happen if the player exists the task early, without communicating a possible cancellation to HQ. -- * **Failed**: The SEAD task has failed. This will happen if the player exists the task early, without communicating a possible cancellation to HQ.
-- --
@@ -25,7 +25,7 @@ do -- TASK_SEAD
--- The TASK_SEAD class --- The TASK_SEAD class
-- @type TASK_SEAD -- @type TASK_SEAD
-- @field Set#SET_UNIT TargetSetUnit -- @field Set#SET_UNIT TargetSetUnit
-- @extends Tasking.Task#TASK_BASE -- @extends Tasking.Task#TASK
TASK_SEAD = { TASK_SEAD = {
ClassName = "TASK_SEAD", ClassName = "TASK_SEAD",
} }
@@ -39,7 +39,7 @@ do -- TASK_SEAD
-- @param Core.Zone#ZONE_BASE TargetZone -- @param Core.Zone#ZONE_BASE TargetZone
-- @return #TASK_SEAD self -- @return #TASK_SEAD self
function TASK_SEAD:New( Mission, SetGroup, TaskName, TargetSetUnit, TargetZone ) function TASK_SEAD:New( Mission, SetGroup, TaskName, TargetSetUnit, TargetZone )
local self = BASE:Inherit( self, TASK_BASE:New( Mission, SetGroup, TaskName, "SEAD" ) ) -- Tasking.Task_SEAD#TASK_SEAD local self = BASE:Inherit( self, TASK:New( Mission, SetGroup, TaskName, "SEAD" ) ) -- Tasking.Task_SEAD#TASK_SEAD
self:F() self:F()
self.TargetSetUnit = TargetSetUnit self.TargetSetUnit = TargetSetUnit
@@ -47,12 +47,12 @@ do -- TASK_SEAD
local Fsm = self:GetUnitProcess() local Fsm = self:GetUnitProcess()
Fsm:AddProcess( "Planned", "Accept", FSM_ASSIGN_ACCEPT:New( self.TaskBriefing ), { Assigned = "Route", Rejected = "Eject" } ) Fsm:AddProcess( "Planned", "Accept", ACT_ASSIGN_ACCEPT:New( self.TaskBriefing ), { Assigned = "Route", Rejected = "Eject" } )
Fsm:AddProcess( "Assigned", "Route", FSM_ROUTE_ZONE:New( self.TargetZone ), { Arrived = "Update" } ) Fsm:AddProcess( "Assigned", "Route", ACT_ROUTE_ZONE:New( self.TargetZone ), { Arrived = "Update" } )
Fsm:AddAction ( "Rejected", "Eject", "Planned" ) Fsm:AddAction ( "Rejected", "Eject", "Planned" )
Fsm:AddAction ( "Arrived", "Update", "Updated" ) Fsm:AddAction ( "Arrived", "Update", "Updated" )
Fsm:AddProcess( "Updated", "Account", FSM_ACCOUNT_DEADS:New( self.TargetSetUnit, "SEAD" ), { Accounted = "Success" } ) Fsm:AddProcess( "Updated", "Account", ACT_ACCOUNT_DEADS:New( self.TargetSetUnit, "SEAD" ), { Accounted = "Success" } )
Fsm:AddProcess( "Updated", "Smoke", FSM_SMOKE_TARGETS_ZONE:New( self.TargetSetUnit, self.TargetZone ) ) Fsm:AddProcess( "Updated", "Smoke", ACT_ASSIST_SMOKE_TARGETS_ZONE:New( self.TargetSetUnit, self.TargetZone ) )
Fsm:AddAction ( "Accounted", "Success", "Success" ) Fsm:AddAction ( "Accounted", "Success", "Success" )
Fsm:AddAction ( "Failed", "Fail", "Failed" ) Fsm:AddAction ( "Failed", "Fail", "Failed" )

4
Moose Development/Moose/Wrapper/Client.lua
View File

@@ -399,8 +399,8 @@ function CLIENT:IsTransport()
return self.ClientTransport return self.ClientTransport
end end
--- Shows the @{Fsm.Cargo#CARGO} contained within the CLIENT to the player as a message. --- Shows the @{AI.AI_Cargo#CARGO} contained within the CLIENT to the player as a message.
-- The @{Fsm.Cargo#CARGO} is shown using the @{Core.Message#MESSAGE} distribution system. -- The @{AI.AI_Cargo#CARGO} is shown using the @{Core.Message#MESSAGE} distribution system.
-- @param #CLIENT self -- @param #CLIENT self
function CLIENT:ShowCargo() function CLIENT:ShowCargo()
self:F() self:F()

2
Moose Development/Moose/Wrapper/Controllable.lua
View File

@@ -970,7 +970,7 @@ function CONTROLLABLE:TaskFAC_AttackGroup( AttackGroup, WeaponType, Designation,
return DCSTask return DCSTask
end end
-- EN-FSM_ROUTE TASKS FOR AIRBORNE CONTROLLABLES -- EN-ACT_ROUTE TASKS FOR AIRBORNE CONTROLLABLES
--- (AIR) Engaging targets of defined types. --- (AIR) Engaging targets of defined types.
-- @param #CONTROLLABLE self -- @param #CONTROLLABLE self

8
Moose Development/Old/Stage.lua
View File

@@ -915,7 +915,7 @@ end
_TransportStage: Defines the different stages of which of transport missions can be in. This table is internal and is used to control the sequence of messages, actions and flow. _TransportStage: Defines the different stages of which of transport missions can be in. This table is internal and is used to control the sequence of messages, actions and flow.
- _TransportStage.START - _TransportStage.START
- _TransportStage.FSM_ROUTE - _TransportStage.ACT_ROUTE
- _TransportStage.LAND - _TransportStage.LAND
- _TransportStage.EXECUTE - _TransportStage.EXECUTE
- _TransportStage.DONE - _TransportStage.DONE
@@ -924,7 +924,7 @@ end
_TransportStage = { _TransportStage = {
HOLD = "HOLD", HOLD = "HOLD",
START = "START", START = "START",
FSM_ROUTE = "FSM_ROUTE", ACT_ROUTE = "ACT_ROUTE",
LANDING = "LANDING", LANDING = "LANDING",
LANDED = "LANDED", LANDED = "LANDED",
EXECUTING = "EXECUTING", EXECUTING = "EXECUTING",
@@ -937,7 +937,7 @@ _TransportStage = {
_TransportStageMsgTime = { _TransportStageMsgTime = {
HOLD = 10, HOLD = 10,
START = 60, START = 60,
FSM_ROUTE = 5, ACT_ROUTE = 5,
LANDING = 10, LANDING = 10,
LANDED = 30, LANDED = 30,
EXECUTING = 30, EXECUTING = 30,
@@ -950,7 +950,7 @@ _TransportStageMsgTime = {
_TransportStageTime = { _TransportStageTime = {
HOLD = 10, HOLD = 10,
START = 5, START = 5,
FSM_ROUTE = 5, ACT_ROUTE = 5,
LANDING = 1, LANDING = 1,
LANDED = 1, LANDED = 1,
EXECUTING = 5, EXECUTING = 5,

2
Moose Mission Setup/Moose_Create.bat
View File

@@ -53,6 +53,7 @@ COPY /b Moose.lua + %1\Core\Database.lua Moose.lua
COPY /b Moose.lua + %1\Core\Set.lua Moose.lua COPY /b Moose.lua + %1\Core\Set.lua Moose.lua
COPY /b Moose.lua + %1\Core\Point.lua Moose.lua COPY /b Moose.lua + %1\Core\Point.lua Moose.lua
COPY /b Moose.lua + %1\Core\Message.lua Moose.lua COPY /b Moose.lua + %1\Core\Message.lua Moose.lua
COPY /b Moose.lua + %1\Core\Fsm.lua Moose.lua
rem Wrapper Classes rem Wrapper Classes
COPY /b Moose.lua + %1\Wrapper\Object.lua Moose.lua COPY /b Moose.lua + %1\Wrapper\Object.lua Moose.lua
@@ -79,7 +80,6 @@ COPY /b Moose.lua + %1\Functional\AIBalancer.lua Moose.lua
rem Fsm Classes rem Fsm Classes
COPY /b Moose.lua + %1\Fsm\Fsm.lua Moose.lua
COPY /b Moose.lua + %1\Fsm\Process.lua Moose.lua COPY /b Moose.lua + %1\Fsm\Process.lua Moose.lua
COPY /b Moose.lua + %1\Fsm\Process_JTAC.lua Moose.lua COPY /b Moose.lua + %1\Fsm\Process_JTAC.lua Moose.lua
COPY /b Moose.lua + %1\Fsm\Patrol.lua Moose.lua COPY /b Moose.lua + %1\Fsm\Patrol.lua Moose.lua

2
Moose Test Missions/AIB - AI Balancing/AIB-001 - Spawned AI/AIB-001 - Spawned AI.lua
View File

@@ -32,4 +32,4 @@ local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCa
local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 ) local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 )
-- Start the AIBALANCER, using the SET of red CLIENTs, and the SPAWN object as a parameter. -- Start the AIBALANCER, using the SET of red CLIENTs, and the SPAWN object as a parameter.
local RU_AIBalancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn ) local RU_AI_Balancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn )

4
Moose Test Missions/AIB - AI Balancing/AIB-002 - Patrol AI/AIB-002 - Patrol AI.lua
View File

@@ -33,9 +33,9 @@ local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCa
local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 ) local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 )
-- Start the AIBALANCER, using the SET of red CLIENTs, and the SPAWN object as a parameter. -- Start the AIBALANCER, using the SET of red CLIENTs, and the SPAWN object as a parameter.
local RU_AIBalancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn ) local RU_AI_Balancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn )
function RU_AIBalancer:OnAfterSpawned( SetGroup, Event, From, To, AIGroup ) function RU_AI_Balancer:OnAfterSpawned( SetGroup, Event, From, To, AIGroup )
local PatrolZoneGroup = GROUP:FindByName( "PatrolZone" ) local PatrolZoneGroup = GROUP:FindByName( "PatrolZone" )
local PatrolZone = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup ) local PatrolZone = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup )

12
Moose Test Missions/AIB - AI Balancing/AIB-003 - Two coalitions InitCleanUp test/AIB-003 - Two coalitions InitCleanUp test.lua
View File

@@ -2,23 +2,23 @@
local US_PlanesClientSet = SET_CLIENT:New():FilterCountries( "USA" ):FilterCategories( "plane" ):FilterStart() local US_PlanesClientSet = SET_CLIENT:New():FilterCountries( "USA" ):FilterCategories( "plane" ):FilterStart()
local US_PlanesSpawn = SPAWN:New( "AI US" ):InitCleanUp( 20 ) local US_PlanesSpawn = SPAWN:New( "AI US" ):InitCleanUp( 20 )
local US_AIBalancer = AIBALANCER:New( US_PlanesClientSet, US_PlanesSpawn ) local US_AI_Balancer = AIBALANCER:New( US_PlanesClientSet, US_PlanesSpawn )
local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCategories( "plane" ):FilterStart() local RU_PlanesClientSet = SET_CLIENT:New():FilterCountries( "RUSSIA" ):FilterCategories( "plane" ):FilterStart()
local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 ) local RU_PlanesSpawn = SPAWN:New( "AI RU" ):InitCleanUp( 20 )
local RU_AIBalancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn ) local RU_AI_Balancer = AIBALANCER:New( RU_PlanesClientSet, RU_PlanesSpawn )
local RU_AirbasesSet = SET_AIRBASE:New():FilterCoalitions("red"):FilterStart() local RU_AirbasesSet = SET_AIRBASE:New():FilterCoalitions("red"):FilterStart()
RU_AirbasesSet:Flush() RU_AirbasesSet:Flush()
RU_AIBalancer:ReturnToNearestAirbases( 10000, RU_AirbasesSet ) RU_AI_Balancer:ReturnToNearestAirbases( 10000, RU_AirbasesSet )
--RU_AIBalancer:ReturnToHomeAirbase( 10000 ) --RU_AI_Balancer:ReturnToHomeAirbase( 10000 )
--local PatrolZoneGroup = GROUP:FindByName( "Patrol Zone Blue" ) --local PatrolZoneGroup = GROUP:FindByName( "Patrol Zone Blue" )
--local PatrolZoneBlue = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup ) --local PatrolZoneBlue = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup )
--local PatrolZoneB = PATROLZONE:New( PatrolZoneBlue, 3000, 6000, 900, 1100 ):ManageFuel( 0.2, 180 ) --local PatrolZoneB = PATROLZONE:New( PatrolZoneBlue, 3000, 6000, 900, 1100 ):ManageFuel( 0.2, 180 )
--US_AIBalancer:SetPatrolZone( PatrolZoneB ) --US_AI_Balancer:SetPatrolZone( PatrolZoneB )
-- --
--local PatrolZoneGroup = GROUP:FindByName( "Patrol Zone Red" ) --local PatrolZoneGroup = GROUP:FindByName( "Patrol Zone Red" )
--local PatrolZoneRed = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup ) --local PatrolZoneRed = ZONE_POLYGON:New( "PatrolZone", PatrolZoneGroup )
--local PatrolZoneR = PATROLZONE:New( PatrolZoneRed, 3000, 6000, 900, 1100 ):ManageFuel( 0.2, 180 ) --local PatrolZoneR = PATROLZONE:New( PatrolZoneRed, 3000, 6000, 900, 1100 ):ManageFuel( 0.2, 180 )
--RU_AIBalancer:SetPatrolZone( PatrolZoneR ) --RU_AI_Balancer:SetPatrolZone( PatrolZoneR )

26
Moose Test Missions/TSK - Task Modelling/TSK-010 - Task Modelling - SEAD/TSK-010 - Task Modelling - SEAD.lua
View File

@@ -99,18 +99,18 @@ local TargetSet = SET_UNIT:New():FilterPrefixes( "US Hawk SR" ):FilterOnce()
-- Define the zone to where the pilot needs to navigate. -- Define the zone to where the pilot needs to navigate.
local TargetZone = ZONE:New( "Target Zone" ) local TargetZone = ZONE:New( "Target Zone" )
-- MOOSE contains a TASK_BASE class. Use the TASK class to define a new Task object and attach it to a Mission object. -- MOOSE contains a TASK class. Use the TASK class to define a new Task object and attach it to a Mission object.
-- Here we define a new TaskSEAD object, and attach it to the Mission object. -- Here we define a new TaskSEAD object, and attach it to the Mission object.
-- ( The TASK_BASE class is the base class for ALL derived Task templates. -- ( The TASK class is the base class for ALL derived Task templates.
-- Task templates are TASK classes that quickly setup a Task scenario with given parameters. ) -- Task templates are TASK classes that quickly setup a Task scenario with given parameters. )
-- --
-- The TASK_BASE class is thus the primary task, and a task scenario will need to be provided to the TaskSEAD of the states and events that form the task. -- The TASK class is thus the primary task, and a task scenario will need to be provided to the TaskSEAD of the states and events that form the task.
-- TASK_BASE gets a couple of parameters: -- TASK gets a couple of parameters:
-- 1. The Mission for which the Task needs to be achieved. -- 1. The Mission for which the Task needs to be achieved.
-- 2. The set of groups of planes that pilots can join. -- 2. The set of groups of planes that pilots can join.
-- 3. The name of the Task... This can be any name, and will be provided when the Pilot joins the task. -- 3. The name of the Task... This can be any name, and will be provided when the Pilot joins the task.
-- 4. A type of the Task. When Tasks are in state Planned, then a menu can be provided that group the task based on this given type. -- 4. A type of the Task. When Tasks are in state Planned, then a menu can be provided that group the task based on this given type.
local SEADTask = TASK_BASE:New( Mission, SEADSet, "SEAD Radars Vector 1", "SEAD" ) -- Tasking.Task#TASK_BASE local SEADTask = TASK:New( Mission, SEADSet, "SEAD Radars Vector 1", "SEAD" ) -- Tasking.Task#TASK
-- This is now an important part of the Task process definition. -- This is now an important part of the Task process definition.
-- Each TASK contains a "Process Template". -- Each TASK contains a "Process Template".
@@ -126,19 +126,19 @@ local SEADProcess = SEADTask:GetUnitProcess()
-- Adding a new sub-process to the Task Template. -- Adding a new sub-process to the Task Template.
-- At first, the task needs to be accepted by a pilot. -- At first, the task needs to be accepted by a pilot.
-- We use for this the SUB-PROCESS FSM_ASSIGN_ACCEPT. -- We use for this the SUB-PROCESS ACT_ASSIGN_ACCEPT.
-- The method on the FsmSEAD AddProcess accepts the following parameters: -- The method on the FsmSEAD AddProcess accepts the following parameters:
-- 1. State From "Planned". When the Fsm is in state "Planned", allow the event "Accept". -- 1. State From "Planned". When the Fsm is in state "Planned", allow the event "Accept".
-- 2. Event "Accept". This event can be triggered through FsmSEAD:Accept() or FsmSEAD:__Accept( 1 ). See documentation on state machines. -- 2. Event "Accept". This event can be triggered through FsmSEAD:Accept() or FsmSEAD:__Accept( 1 ). See documentation on state machines.
-- 3. The PROCESS derived class. In this case, we use the FSM_ASSIGN_ACCEPT to accept the task and provide a briefing. So, when the event "Accept" is fired, this process is executed. -- 3. The PROCESS derived class. In this case, we use the ACT_ASSIGN_ACCEPT to accept the task and provide a briefing. So, when the event "Accept" is fired, this process is executed.
-- 4. A table with the "return" states of the FSM_ASSIGN_ACCEPT process. This table indicates that for a certain return state, a further event needs to be called. -- 4. A table with the "return" states of the ACT_ASSIGN_ACCEPT process. This table indicates that for a certain return state, a further event needs to be called.
-- 4.1 When the return state is Assigned, fire the event in the Task FsmSEAD:Route() -- 4.1 When the return state is Assigned, fire the event in the Task FsmSEAD:Route()
-- 4.2 When the return state is Rejected, fire the event in the Task FsmSEAD:Eject() -- 4.2 When the return state is Rejected, fire the event in the Task FsmSEAD:Eject()
-- All other AddProcess calls are working in a similar manner. -- All other AddProcess calls are working in a similar manner.
SEADProcess:AddProcess ( "Planned", "Accept", FSM_ASSIGN_ACCEPT:New( "SEAD the Area" ), { Assigned = "Route", Rejected = "Eject" } ) SEADProcess:AddProcess ( "Planned", "Accept", ACT_ASSIGN_ACCEPT:New( "SEAD the Area" ), { Assigned = "Route", Rejected = "Eject" } )
-- Same, adding a process. -- Same, adding a process.
SEADProcess:AddProcess ( "Assigned", "Route", FSM_ROUTE_ZONE:New( TargetZone ), { Arrived = "Update" } ) SEADProcess:AddProcess ( "Assigned", "Route", ACT_ROUTE_ZONE:New( TargetZone ), { Arrived = "Update" } )
-- Adding a new Action... -- Adding a new Action...
-- Actions define also the flow of the Task, but the actions will need to be programmed within your script. -- Actions define also the flow of the Task, but the actions will need to be programmed within your script.
@@ -149,8 +149,8 @@ SEADProcess:AddProcess ( "Assigned", "Route", FSM_ROUTE_ZONE:New( Target
-- 3. State To "Planned". After the event has been fired, the FsmSEAD will transition to Planned. -- 3. State To "Planned". After the event has been fired, the FsmSEAD will transition to Planned.
SEADProcess:AddTransition ( "Rejected", "Eject", "Planned" ) SEADProcess:AddTransition ( "Rejected", "Eject", "Planned" )
SEADProcess:AddTransition ( "Arrived", "Update", "Updated" ) SEADProcess:AddTransition ( "Arrived", "Update", "Updated" )
SEADProcess:AddProcess ( "Updated", "Account", FSM_ACCOUNT_DEADS:New( TargetSet, "SEAD" ), { Accounted = "Success" } ) SEADProcess:AddProcess ( "Updated", "Account", ACT_ACCOUNT_DEADS:New( TargetSet, "SEAD" ), { Accounted = "Success" } )
SEADProcess:AddProcess ( "Updated", "Smoke", FSM_SMOKE_TARGETS_ZONE:New( TargetSet, TargetZone ) ) SEADProcess:AddProcess ( "Updated", "Smoke", ACT_ASSIST_SMOKE_TARGETS_ZONE:New( TargetSet, TargetZone ) )
SEADProcess:AddTransition ( "Accounted", "Success", "Success" ) SEADProcess:AddTransition ( "Accounted", "Success", "Success" )
SEADProcess:AddTransition ( "*", "Fail", "Failed" ) SEADProcess:AddTransition ( "*", "Fail", "Failed" )
@@ -181,7 +181,7 @@ function SEADTask:OnAfterPlayerCrashed( PlayerUnit, PlayerName )
end end
local TaskSEAD2 = TASK_BASE:New( Mission, SEADSet, "SEAD Radars Vector 2", "SEAD" ) -- Tasking.Task#TASK_BASE local TaskSEAD2 = TASK:New( Mission, SEADSet, "SEAD Radars Vector 2", "SEAD" ) -- Tasking.Task#TASK
TaskSEAD2:SetUnitProcess( SEADTask:GetUnitProcess():Copy() ) TaskSEAD2:SetUnitProcess( SEADTask:GetUnitProcess():Copy() )
Mission:AddTask( TaskSEAD2 ) Mission:AddTask( TaskSEAD2 )