FSM restructuring

This commit is contained in:
FlightControl
2016-12-06 10:30:05 +01:00
parent 0a4630bde6
commit e46d7be91b
11 changed files with 210 additions and 210 deletions

View File

@@ -2,16 +2,16 @@
--
-- ===
--
-- # @{#PROCESS_ROUTE} FSM class, extends @{Process#PROCESS}
-- # @{#FSMT_ROUTE} FSM class, extends @{Process#PROCESS}
--
-- ## PROCESS_ROUTE state machine:
-- ## FSMT_ROUTE state machine:
--
-- 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.
-- 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.
--
-- ### PROCESS_ROUTE **Events**:
-- ### FSMT_ROUTE **Events**:
--
-- 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.
-- * **NoMore**: There are no more route points that need to be followed. The process will go into the Success state.
--
-- ### PROCESS_ROUTE **Event methods**:
-- ### FSMT_ROUTE **Event methods**:
--
-- 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:
@@ -31,7 +31,7 @@
-- * **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.
--
-- ### PROCESS_ROUTE **States**:
-- ### FSMT_ROUTE **States**:
--
-- * **None**: The controllable did not receive route commands.
-- * **Arrived (*)**: The controllable has arrived at a route point.
@@ -43,7 +43,7 @@
--
-- (*) End states of the process.
--
-- ### PROCESS_ROUTE state transition methods:
-- ### FSMT_ROUTE state transition methods:
--
-- 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:
@@ -60,41 +60,41 @@
--
-- ===
--
-- # 1) @{#PROCESS_ROUTE_ZONE} class, extends @{Fsm.Route#PROCESS_ROUTE}
-- # 1) @{#FSMT_ROUTE_ZONE} class, extends @{Fsm.Route#FSMT_ROUTE}
--
-- The PROCESS_ROUTE_ZONE class implements the core functions to route an AIR @{Controllable} player @{Unit} to a @{Zone}.
-- The FSMT_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.
-- Upon arrival at the zone, a confirmation of arrival is sent, and the process will be ended.
--
-- # 1.1) PROCESS_ROUTE_ZONE constructor:
-- # 1.1) FSMT_ROUTE_ZONE constructor:
--
-- * @{#PROCESS_ROUTE_ZONE.New}(): Creates a new PROCESS_ROUTE_ZONE object.
-- * @{#FSMT_ROUTE_ZONE.New}(): Creates a new FSMT_ROUTE_ZONE object.
--
-- ===
--
-- @module Route
do -- PROCESS_ROUTE
do -- FSMT_ROUTE
--- PROCESS_ROUTE class
-- @type PROCESS_ROUTE
--- FSMT_ROUTE class
-- @type FSMT_ROUTE
-- @field Tasking.Task#TASK TASK
-- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Zone#ZONE_BASE TargetZone
-- @extends Core.StateMachine#FSM_TEMPLATE
PROCESS_ROUTE = {
ClassName = "PROCESS_ROUTE",
FSMT_ROUTE = {
ClassName = "FSMT_ROUTE",
}
--- Creates a new routing state machine. The process will route a CLIENT to a ZONE until the CLIENT is within that ZONE.
-- @param #PROCESS_ROUTE self
-- @return #PROCESS_ROUTE self
function PROCESS_ROUTE:New()
-- @param #FSMT_ROUTE self
-- @return #FSMT_ROUTE self
function FSMT_ROUTE:New()
-- Inherits from BASE
local self = BASE:Inherit( self, FSM_TEMPLATE:New( "PROCESS_ROUTE" ) ) -- Core.StateMachine#FSM_TEMPLATE
local self = BASE:Inherit( self, FSM_TEMPLATE:New( "FSMT_ROUTE" ) ) -- Core.StateMachine#FSM_TEMPLATE
self:AddTransition( "None", "Start", "Routing" )
self:AddTransition( "*", "Report", "Reporting" )
@@ -118,32 +118,32 @@ do -- PROCESS_ROUTE
--- Task Events
--- StateMachine callback function
-- @param #PROCESS_ROUTE self
-- @param #FSMT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event
-- @param #string From
-- @param #string To
function PROCESS_ROUTE:onafterStart( ProcessUnit, Event, From, To )
function FSMT_ROUTE:onafterStart( ProcessUnit, Event, From, To )
self:__Route( 1 )
end
--- Check if the controllable has arrived.
-- @param #PROCESS_ROUTE self
-- @param #FSMT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @return #boolean
function PROCESS_ROUTE:onfuncHasArrived( ProcessUnit )
function FSMT_ROUTE:onfuncHasArrived( ProcessUnit )
return false
end
--- StateMachine callback function
-- @param #PROCESS_ROUTE self
-- @param #FSMT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event
-- @param #string From
-- @param #string To
function PROCESS_ROUTE:onbeforeRoute( ProcessUnit, Event, From, To )
function FSMT_ROUTE:onbeforeRoute( ProcessUnit, Event, From, To )
if ProcessUnit:IsAlive() then
local HasArrived = self:onfuncHasArrived( ProcessUnit ) -- Polymorphic
@@ -172,28 +172,28 @@ do -- PROCESS_ROUTE
end
end -- PROCESS_ROUTE
end -- FSMT_ROUTE
do -- PROCESS_ROUTE_ZONE
do -- FSMT_ROUTE_ZONE
--- PROCESS_ROUTE_ZONE class
-- @type PROCESS_ROUTE_ZONE
--- FSMT_ROUTE_ZONE class
-- @type FSMT_ROUTE_ZONE
-- @field Tasking.Task#TASK TASK
-- @field Wrapper.Unit#UNIT ProcessUnit
-- @field Zone#ZONE_BASE TargetZone
-- @extends #PROCESS_ROUTE
PROCESS_ROUTE_ZONE = {
ClassName = "PROCESS_ROUTE_ZONE",
-- @extends #FSMT_ROUTE
FSMT_ROUTE_ZONE = {
ClassName = "FSMT_ROUTE_ZONE",
}
--- Creates a new routing state machine. The task will route a controllable to a ZONE until the controllable is within that ZONE.
-- @param #PROCESS_ROUTE_ZONE self
-- @param #FSMT_ROUTE_ZONE self
-- @param Zone#ZONE_BASE TargetZone
function PROCESS_ROUTE_ZONE:New( TargetZone )
local self = BASE:Inherit( self, PROCESS_ROUTE:New() ) -- #PROCESS_ROUTE_ZONE
function FSMT_ROUTE_ZONE:New( TargetZone )
local self = BASE:Inherit( self, FSMT_ROUTE:New() ) -- #FSMT_ROUTE_ZONE
self:SetParameters( {
TargetZone = TargetZone,
@@ -208,10 +208,10 @@ do -- PROCESS_ROUTE_ZONE
end
--- Method override to check if the controllable has arrived.
-- @param #PROCESS_ROUTE self
-- @param #FSMT_ROUTE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @return #boolean
function PROCESS_ROUTE_ZONE:onfuncHasArrived( ProcessUnit )
function FSMT_ROUTE_ZONE:onfuncHasArrived( ProcessUnit )
if ProcessUnit:IsInZone( self.TargetZone ) then
local RouteText = ProcessUnit:GetCallsign() .. ": You have arrived within the zone!"
@@ -224,12 +224,12 @@ do -- PROCESS_ROUTE_ZONE
--- Task Events
--- StateMachine callback function
-- @param #PROCESS_ROUTE_ZONE self
-- @param #FSMT_ROUTE_ZONE self
-- @param Wrapper.Controllable#CONTROLLABLE ProcessUnit
-- @param #string Event
-- @param #string From
-- @param #string To
function PROCESS_ROUTE_ZONE:onenterReporting( ProcessUnit, Event, From, To )
function FSMT_ROUTE_ZONE:onenterReporting( ProcessUnit, Event, From, To )
local ZoneVec2 = self.TargetZone:GetVec2()
local ZonePointVec2 = POINT_VEC2:New( ZoneVec2.x, ZoneVec2.y )
@@ -239,4 +239,4 @@ do -- PROCESS_ROUTE_ZONE
MESSAGE:New( RouteText, self.DisplayTime, self.DisplayCategory ):ToGroup( ProcessUnit:GetGroup() )
end
end -- PROCESS_ROUTE_ZONE
end -- FSMT_ROUTE_ZONE