Got a first test mission working

Moose Development/Moose/Task2.lua

@@ -1,32 +1,31 @@
---- @module TASK2
+--- @module Task2
 
 --- The TASK2 class
 -- @type TASK2
 -- @field Scheduler#SCHEDULER TaskScheduler
+-- @field Client#CLIENT Client
+-- @field Mission#MISSION Mission
 -- @extends Base#BASE
 TASK2 = {
   ClassName = "TASK",
   TaskScheduler = nil,
   NextEvent = nil,
+  Scores = {},
 }
 
 --- Instantiates a new TASK Base. Should never be used. Interface Class.
+-- @param #TASK2 self
 -- @return #TASK2 self
-function TASK2:New( Client )
+function TASK2:New( Client, Mission )
   local self = BASE:Inherit( self, BASE:New() )
   self:F()
 
   self.Client = Client
+  self.Mission = Mission
   
   return self
 end
 
---- @param #TASK2 self
-function TASK2:Schedule()
-
-  self.TaskScheduler = SCHEDULER:New( self.Fsm, self.Fsm.Assign, { self, self.Client }, 1)
-end
-
 --- @param #TASK2 self
 function TASK2:NextEvent( NextEvent, ... )
   self:E( NextEvent )
@@ -34,4 +33,37 @@ function TASK2:NextEvent( NextEvent, ... )
   self.TaskScheduler = SCHEDULER:New( self.Fsm, NextEvent, { self, self.Client, unpack( arg ) }, 1 )
 end
 
+--- Adds a score for the TASK2 to be achieved.
+-- @param #TASK2 self
+-- @param #string TaskStatus is the status of the TASK2 when the score needs to be given.
+-- @param #string ScoreText is a text describing the score that is given according the status.
+-- @param #number Score is a number providing the score of the status.
+-- @return #TASK2 self
+function TASK2:AddScore( TaskStatus, ScoreText, Score )
+  self:F2( { TaskStatus, ScoreText, Score } )
+
+  self.Scores[TaskStatus] = self.Scores[TaskStatus] or {}
+  self.Scores[TaskStatus].ScoreText = ScoreText
+  self.Scores[TaskStatus].Score = Score
+  return self
+end
+
+--- StateMachine callback function for a TASK2
+-- @param #TASK2 self
+-- @param StateMachine#STATEMACHINE_TASK Fsm
+-- @param #string Event
+-- @param #string From
+-- @param #string To
+function TASK2:OnStateChange( Fsm, Event, From, To )
+  self:E( { Event, From, To, self.Client.ClientName} )
+
+  if self.Scores[To] then
+    self.Client:Message( "Score:" .. self.Scores[To].ScoreText .. " " .. To , 15 )
+    local Scoring = self.Mission:GetScoring()
+    if Scoring then
+      Scoring:_AddMissionTaskScore( self.Client, self.Mission:GetName(), self.Scores[To].Score )
+    end
+  end
+end
+