diff --git a/Moose Development/Moose/Functional/CarrierTrainer.lua b/Moose Development/Moose/Functional/CarrierTrainer.lua
deleted file mode 100644
index 189f8c58c..000000000
--- a/Moose Development/Moose/Functional/CarrierTrainer.lua	
+++ /dev/null
@@ -1,1595 +0,0 @@
---- **Functional** - (R2.4) - Carrier CASE I Recovery Practice
--- 
--- Practice carrier landings.
---
--- Features:
---
---    * CASE I recovery.
---    * Performance evaluation.
---    * Feedback about performance during flight.
---
--- Please not that his class is work in progress and in an **alpha** stage.
--- At the moment training parameters are optimized for F/A-18C Hornet as aircraft and USS Stennis as carrier.
--- Other aircraft and carriers **might** be possible in future but would need a different set of parameters.
---
--- ===
---
--- ### Author: **Bankler** (original idea and script)
---
--- @module Functional.CarrierTrainer
--- @image MOOSE.JPG
-
---- CARRIERTRAINER class.
--- @type CARRIERTRAINER
--- @field #string ClassName Name of the class.
--- @field #string lid Class id string for output to DCS log file.
--- @field #boolean Debug Debug mode. Messages to all about status.
--- @field Wrapper.Unit#UNIT carrier Aircraft carrier unit on which we want to practice.
--- @field #string carriertype Type name of aircraft carrier.
--- @field Core.Zone#ZONE_UNIT startZone Zone in which the pattern approach starts.
--- @field Core.Zone#ZONE_UNIT giantZone Zone around the carrier to register a new player.
--- @field #table players Table of players. 
--- @field #table menuadded Table of units where the F10 radio menu was added.
--- @field #CARRIER.Checkpoint upwind Upwind checkpoint.
--- @field #CARRIER.Checkpoint breakearly Early break checkpoint.
--- @field #CARRIER.Checkpoint breaklate Late brak checkpoint.
--- @field #CARRIER.Checkpoint abeam Abeam checkpoint.
--- @field #CARRIER.Checkpoint ninety At the ninety checkpoint.
--- @field #CARRIER.Checkpoint groove In the groove checkpoint.
--- @field #CARRIER.Checkpoint trap Landing checkpoint.
--- @extends Core.Fsm#FSM
-
---- Practice Carrier Landings
---
--- ===
---
--- ![Banner Image](..\Presentations\CARRIERTRAINER\CarrierTrainer_Main.png)
---
--- # The Trainer Concept
---
---
--- bla bla
---
--- @field #CARRIERTRAINER
-CARRIERTRAINER = {
-  ClassName = "CARRIERTRAINER",
-  lid         = nil,
-  Debug       = true,
-  carrier     = nil,
-  carriertype = nil,
-  alias       = nil,
-  startZone   = nil,
-  giantZone   = nil,
-  players     = {},
-  menuadded   = {},
-  upwind      = {},
-  abeam       = {},
-  breakearly  = {},
-  breaklate   = {},
-  ninety      = {},
-  wake        = {},
-  groove      = {},
-  trap        = {},
-}
-
---- Main radio menu.
--- @field #table MenuF10
-CARRIERTRAINER.MenuF10={}
-
---- Carrier trainer class version.
--- @field #string version
-CARRIERTRAINER.version="0.0.5"
-
---- Carrier types.
--- @type CARRIERTRAINER.CarrierType
--- @field #string Stennis CVN-74 John C. Stennis
--- @field #string CarlVinson CVN-70 Carl Vinson
--- @field #string Tarawa LHA-1 Tarawa
--- @field #string Kuznetsov CV 1143.5 Admiral Kuznetsov
-CARRIERTRAINER.CarrierType={
-  STENNIS="Stennis",
-  VINSON="Vinson",
-  TARAWA="LHA_Tarawa",
-  KUZNETSOV="KUZNECOW",
-}
-
-CARRIERTRAINER.AircraftType={
-  AV8B="AV8BNA",
-  HORNET="FA-18C_hornet",
-}
-
---- Player data table holding all important parameters for each player.
--- @type CARRIERTRAINER.PlayerData
--- @field #number id Player ID.
--- @field #string callsign Callsign of player.
--- @field #number score Player score.
--- @field #number totalscore Score of all landing attempts.
--- @field #number passes Number of passes.
--- @field #string collectedResultString Results text of all passes.
--- @field Wrapper.Unit#UNIT unit Aircraft unit of the player.
--- @field #number lowestAltitude Lowest altitude. 
--- @field #number highestCarrierXDiff 
--- @field #number secondsStandingStill Time player does not move after a landing attempt. 
--- @field #string summary Result summary text.
--- @field Wrapper.Client#CLIENT Client object of player.
--- @field #string difficulty Difficulty level.
-
---- Difficulty level.
--- @field #string easy Easy difficulty: error margin 10% for high score and 20% for low score. No score for deviation >20%.
--- @field #string normal Normal difficulty: error margin 5% deviation from ideal for high score and 10% for low score. No score for deviation >10%.
--- @field #string hard Hard difficulty: error margin 2.5% deviation from ideal value for high score and 5% for low score. No score for deviation >5%.
-
---- Checkpoint
--- @type CARRIERTRAINER.Checkpoint
--- @field #number Xmin Minimum allowed longitual distance to carrier.
--- @field #number Xmax Maximum allowed longitual distance to carrier.
--- @field #number Zmin Minimum allowed latitudal distance to carrier.
--- @field #number Zmax Maximum allowed latitudal distance to carrier.
--- @field #number Xlimit Latitudal threshold for triggering the next step.
--- @field #number Zlimit Latitudal threshold for triggering the next step.
--- @field #number Altitude Optimal altitude at this point.
--- @field #number AoA Optimal AoA at this point.
--- @field #number Speed Optimal speed at this point.
--- @field #table Checklist Table of checklist text items to display at this point.
-
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--- Constructor
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-
---- Create new carrier trainer.
--- @param #CARRIERTRAINER self
--- @param carriername Name of the aircraft carrier unit as defined in the mission editor.
--- @param alias (Optional) Alias for the carrier. This will be used for radio messages and the F10 radius menu. Default is the carrier name as defined in the mission editor.
--- @return #CARRIERTRAINER self
-function CARRIERTRAINER:New(carriername, alias)
-
-  -- Inherit everthing from FSM class.
-  local self = BASE:Inherit(self, FSM:New()) -- #CARRIERTRAINER
-
-  -- Set carrier unit.
-  self.carrier=UNIT:FindByName(carriername)
-  
-  if self.carrier then
-    self.startZone = ZONE_UNIT:New("startZone", self.carrier,  1000, { dx = -2000, dy = 100, relative_to_unit = true })
-    self.giantZone = ZONE_UNIT:New("giantZone", self.carrier, 30000, { dx =  0,    dy = 0,   relative_to_unit = true })
-  else
-    local text=string.format("ERROR: Carrier unit %s could not be found! Make sure this UNIT is defined in the mission editor and check the spelling of the unit name carefully.", carriername)
-    MESSAGE:New(text, 120):ToAll()
-    self:E(self.lid..text)
-    return nil
-  end
-  
-  -- Set some string id for output to DCS.log file.
-  self.lid=string.format("CARRIERTRAINER %s | ", carriername)
-  
-  -- Get carrier type.
-  self.carriertype=self.carrier:GetTypeName()
-  
-  -- Set alias.
-  self.alias=alias or carriername
-  
-  -----------------------
-  --- FSM Transitions ---
-  -----------------------
-  
-  -- Start State.
-  self:SetStartState("Stopped")
-
-  -- Add FSM transitions.
-  --                 From State  -->   Event   -->   To State
-  self:AddTransition("Stopped",       "Start",      "Running")
-  self:AddTransition("Running",       "Status",     "Running")
-  self:AddTransition("Running",       "Stop",       "Stopped")
-
-
-  --- Triggers the FSM event "Start" that starts the carrier trainer. Initializes parameters and starts event handlers.
-  -- @function [parent=#CARRIERTRAINER] Start
-  -- @param #CARRIERTRAINER self
-
-  --- Triggers the FSM event "Start" after a delay that starts the carrier trainer. Initializes parameters and starts event handlers.
-  -- @function [parent=#CARRIERTRAINER] __Start
-  -- @param #CARRIERTRAINER self
-  -- @param #number delay Delay in seconds.
-
-  --- Triggers the FSM event "Stop" that stops the carrier trainer. Event handlers are stopped.
-  -- @function [parent=#CARRIERTRAINER] Stop
-  -- @param #CARRIERTRAINER self
-
-  --- Triggers the FSM event "Stop" that stops the carrier trainer after a delay. Event handlers are stopped.
-  -- @function [parent=#CARRIERTRAINER] __Stop
-  -- @param #CARRIERTRAINER self
-  -- @param #number delay Delay in seconds.
-  
-  return self
-end
-
-
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--- FSM states
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-
---- On after Start event. Starts the warehouse. Addes event handlers and schedules status updates of reqests and queue.
--- @param #CARRIERTRAINER self
--- @param #string From From state.
--- @param #string Event Event.
--- @param #string To To state.
-function CARRIERTRAINER:onafterStart(From, Event, To)
-
-  -- Events are handled my MOOSE.
-  self:I(self.lid..string.format("Starting Carrier Training %s for carrier unit %s of type %s.", CARRIERTRAINER.version, self.carrier:GetName(), self.carriertype))
-  
-  -- Handle events.
-  self:HandleEvent(EVENTS.Birth)
-
-  -- Init status check
-  self:__Status(5)
-end
-
---- On after Status event. Checks player status.
--- @param #CARRIERTRAINER self
--- @param #string From From state.
--- @param #string Event Event.
--- @param #string To To state.
-function CARRIERTRAINER:onafterStatus(From, Event, To)
-
-  -- Check player status.
-  self:_CheckPlayerStatus()
-
-  -- Call status again in one second.
-  self:__Status(-1)
-end
-
---- On after Stop event. Unhandle events and stop status updates. 
--- @param #CARRIERTRAINER self
--- @param #string From From state.
--- @param #string Event Event.
--- @param #string To To state.
-function CARRIERTRAINER:onafterStop(From, Event, To)
-  self:UnHandleEvent(EVENTS.Birth)
-end
-
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--- EVENT functions
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-
---- Carrier trainer event handler for event birth.
--- @param #CARRIERTRAINER self
--- @param Core.Event#EVENTDATA EventData
-function CARRIERTRAINER:OnEventBirth(EventData)
-  self:F3({eventbirth = EventData})
-  
-  local _unitName=EventData.IniUnitName
-  local _unit, _playername=self:_GetPlayerUnitAndName(_unitName)
-  
-  self:T3(self.lid.."BIRTH: unit   = "..tostring(EventData.IniUnitName))
-  self:T3(self.lid.."BIRTH: group  = "..tostring(EventData.IniGroupName))
-  self:T3(self.lid.."BIRTH: player = "..tostring(_playername))
-      
-  if _unit and _playername then
-  
-    local _uid=_unit:GetID()
-    local _group=_unit:GetGroup()
-    local _callsign=_unit:GetCallsign()
-    
-    -- Debug output.
-    local text=string.format("Player %s, callsign %s entered unit %s (ID=%d) of group %s", _playername, _callsign, _unitName, _uid, _group:GetName())
-    self:T(self.lid..text)
-    MESSAGE:New(text, 5):ToAllIf(self.Debug)
-    
-    -- Add Menu commands.
-    self:_AddF10Commands(_unitName)    
-    
-    -- Init player.
-    if self.players[_playername]==nil then
-      self.players[_playername]=self:_InitNewPlayer(_unitName)
-    else
-      self:_InitNewRound(self.players[_playername])
-    end
-      
-  end 
-end
-
---- Initialize player data.
--- @param #CARRIERTRAINER self
--- @param #string unitname Name of the player unit.
--- @return #CARRIERTRAINER.PlayerData Player data.
-function CARRIERTRAINER:_InitNewPlayer(unitname) 
-
-  local playerData={} --#CARRIERTRAINER.PlayerData
-  
-  playerData.unit = UNIT:FindByName(unitname)
-  playerData.client = CLIENT:FindByName(playerData.unit.UnitName, nil, true)
-  playerData.callsign = playerData.unit:GetCallsign()
-  playerData.totalScore = 0
-  playerData.passes = 0
-  playerData.collectedResultString = ""
-    
-  playerData=self:_InitNewRound(playerData)
-  
-  return playerData
-end
-
---- Initialize new approach for player by resetting parmeters to initial values.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @return #CARRIERTRAINER.PlayerData Initialized player data.
-function CARRIERTRAINER:_InitNewRound(playerData)
-  playerData.score = 0
-  playerData.summary = "SUMMARY:\n"
-  playerData.step = 0
-  playerData.longDownwindDone = false
-  playerData.highestCarrierXDiff = -9999999
-  playerData.secondsStandingStill = 0
-  playerData.lowestAltitude = 999999
-  return playerData
-end
-
---- Increase score for this approach.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @param #number amount Amount by which the score is increased.
-function CARRIERTRAINER:_IncreaseScore(playerData, amount)
-  playerData.score = playerData.score + amount
-end
-
---- Append text to summary text.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @param #string item Text item appeded to the summary.
-function CARRIERTRAINER:_AddToSummary(playerData, item)
-  playerData.summary = playerData.summary .. item .. "\n"
-end
-
---- Append text to result text.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @param #string item Text item appeded to the result.
-function CARRIERTRAINER:_AddToCollectedResult(playerData, item)
-  playerData.collectedResultString = playerData.collectedResultString .. item .. "\n"
-end
-
---- Get relative heading of player wrt carrier.
--- @param #CARRIERTRAINER self
--- @param Wrapper.Unit#UNIT unit Player unit.
--- @return #number Relative heading in degrees.
-function CARRIERTRAINER:_GetRelativeHeading(unit)
-  --local a=self.carrier:GetVec3()
-  --local b=unit:GetVec3()
-  --local c={x=b.x-a.x, y=0, z=b.z-a.z}
-  --local headingCarrier=self.carrier:GetHeading()
-  --local headingPlayer=unit:GetHeading()
-  local vC=self.carrier:GetOrientationX()
-  local vP=unit:GetOrientationX()
-  
-  -- Get angle between the two orientation vectors in rad.
-  local relHead=math.acos(UTILS.VecDot(vC,vP)/UTILS.VecNorm(vC)/UTILS.VecNorm(vP))
-  
-  -- Return heading in degrees.
-  return math.deg(relHead)
-end
-
-
---- Carrier trainer event handler for event birth.
--- @param #CARRIERTRAINER self
-function CARRIERTRAINER:_CheckPlayerStatus()
-
-  -- Loop over all players.
-  for _playerName,_playerData in pairs(self.players) do  
-    local playerData = _playerData --#CARRIERTRAINER.PlayerData
-    
-    if playerData then
-    
-      self:I("player "..playerData.callsign)
-    
-      -- Player unit.
-      local unit = playerData.unit
-      
-      if unit:IsAlive() then
-
-        if unit:IsInZone(self.giantZone) then
-          --self:_DetailedPlayerStatus(playerData)
-        end
-        
-        if playerData.step==0 and unit:IsInZone(self.giantZone) and unit:InAir() then
-          self:_NewRound(playerData)
-        elseif playerData.step == 1 and unit:IsInZone(self.startZone) then
-          self:_Start(playerData)
-        elseif playerData.step == 2 and unit:IsInZone(self.giantZone) then
-          self:_Upwind(playerData)
-        elseif playerData.step == 3 and unit:IsInZone(self.giantZone) then
-          self:_Break(playerData, "early")
-        elseif playerData.step == 4 and unit:IsInZone(self.giantZone) then
-          self:_Break(playerData, "late")
-        elseif playerData.step == 5 and unit:IsInZone(self.giantZone) then
-          self:_Abeam(playerData)
-        elseif playerData.step == 6 and unit:IsInZone(self.giantZone) then
-          -- Check long down wind leg.
-          if not playerData.longDownwindDone then
-            self:_CheckForLongDownwind(playerData)
-          end
-          self:_Ninety(playerData)
-        elseif playerData.step == 7 and unit:IsInZone(self.giantZone) then
-          self:_Wake(playerData)
-        elseif playerData.step == 8 and unit:IsInZone(self.giantZone) then
-          self:_Groove(playerData)
-        elseif playerData.step == 9 and unit:IsInZone(self.giantZone) then
-          self:_Trap(playerData)
-        end         
-      else
-        -- Unit not alive.
-        --playerDatas[i] = nil
-      end
-    end
-  end
-  
-end
-
---- Init parameters for USS Stennis carrier.
--- @param #CARRIERTRAINER self
-function CARRIERTRAINMER:_InitStennis()
-
-  self.Upwind.Xmin=1
-
-  self.upwind={}
-  self.upwind.Xmin=-4000  -- TODO Should be withing 4 km behind carrier. Why?
-  self.upwind.Xmax=nil
-  self.upwind.Zmin=0
-  self.upwind.Zmax=500
-  self.upwind.
-  self.upwind.Alitude=UTILS.FeetToMeters(800)
-  
-
-  -- Early break checkpoint parameters.
-  self.breakearly={}
-  self.Breakearly.Xmin=-500
-  self.Breakearly.Xmax=nil
-  self.Breakearly.Zmin=-3700
-  self.Breakearly.Zmax=1500
-  self.Breakearly.LimitEarly=-370  --0.2 NM
-  self.Breakearly.LimitLate=-1470  --0.8 NM
-  self.Breakearly.Alitude=UTILS.FeetToMeters(800)  
-
-end
-
---- Get name of the current pattern step.
--- @param #CARRIERTRAINER self
--- @param #number step Step
--- @return #string Name of the step
-function CARRIERTRAINER:_StepName(step)
-
-  local name="unknown"
-  if step==0 then
-    name="Unregistered"
-  elseif step==1 then
-    name="entering pattern"
-  elseif step==2 then
-    name="on upwind leg"
-  elseif step==3 then
-    name="early break"
-  elseif step==4 then
-    name="late break"
-  elseif step==5 then
-    name="abeam"
-  elseif step==6 then
-    name="at the wake"
-  elseif step==7 then
-    name="at the ninety"
-  elseif step==8 then
-    name="in the groove"
-  elseif step==9 then
-    name="trapped"
-  end
-  
-  return name
-end
-
---- Provide info about player status on the fly.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
-function CARRIERTRAINER:_DetailedPlayerStatus(playerData)
-
-  local unit=playerData.unit
-  
-  local aoa=unit:GetAoA()
-  local yaw=unit:GetYaw()
-  local roll=unit:GetRoll()
-  local pitch=unit:GetPitch()
-  local dist=playerData.unit:GetCoordinate():Get2DDistance(self.carrier:GetCoordinate())
-  local dx,dz=self:_GetDistances(unit)
-
-  -- Player and carrier position vector.
-  local playerPosition = playerData.unit:GetVec3()  
-  local carrierPosition = self.carrier:GetVec3()
-  
-  local diffZ = playerPosition.z - carrierPosition.z
-  local diffX = playerPosition.x - carrierPosition.x
-
-  local heading=unit:GetCoordinate():HeadingTo(self.startZone:GetCoordinate())
- 
-  local text=string.format("%s, current AoA=%.1f\n", playerData.callsign, aoa)
-  text=text..string.format("roll=%.1f  yaw=%.1f  pitch=%.1f\n", roll, yaw, pitch)
-  text=text..string.format("current step = %d %s\n", playerData.step, self:_StepName(playerData.step))
-  text=text..string.format("Carrier distance: d=%d m\n", dist)
-  text=text..string.format("Carrier distance: x=%d m z=%d m sum=%d (old)\n", diffX, diffZ, math.abs(diffX)+math.abs(diffZ))
-  text=text..string.format("Carrier distance: x=%d m z=%d m sum=%d (new)", dx, dz, math.abs(dz)+math.abs(dx))  
-
-  MESSAGE:New(text, 1, nil , true):ToClient(playerData.client)
-end
-
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--- CARRIER TRAINING functions
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-
---- Initialize player data.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
-function CARRIERTRAINER:_NewRound(playerData) 
-    
-  local text=string.format("Welcome back, %s! Cleared for approach. TCN 1X, BRC 354 (MAG HDG).", playerData.callsign)
-  MESSAGE:New(text, 5):ToClient(playerData.client)
-  
-  self:_InitNewRound(playerData)
-  playerData.step = 1
-end
-
---- Start landing pattern.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Start(playerData)
-  local hint = string.format("Entering the pattern, %s! Aim for 800 feet and 350-400 kts on the upwind.", playerData.callsign)
-  self:_SendMessageToPlayer(hint, 8, playerData)
-  playerData.score = 0
-  playerData.step = 2
-end 
- 
---- Upwind leg.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Upwind(playerData) 
-
-  -- Player and carrier position vector.
-  local position = playerData.unit:GetVec3()  
-  local carrierPosition = self.carrier:GetVec3()
-
-  local diffZ = position.z - carrierPosition.z
-  local diffX = position.x - carrierPosition.x
-
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffX, diffZ = self:_GetDistances(playerData.unit)
-  
-
-  
-  -- Too far away.
-  -- Should be between 0-500 meters right of carrier.  
-  --if (diffZ > 500 or diffZ < 0 or diffX < -4000) then
-  if self:_CheckAbort(diffX,diffZ, self.Upwind) then
-    --MESSAGE:New(string.format("Abort: diffX=%d (min=-4000, max=nil), diffZ=%d (min=0, max=500)", diffX, diffZ)):ToAllIf(self.Debug)
-    self:_AbortPattern(playerData, diffX, diffZ, self.Upwind)
-    return
-  end
-  
-  -- Now before the boat.
-  if diffX > 0 then
-  
-    local idealAltitude = 800
-    local altitude = UTILS.MetersToFeet(position.y)
-    
-    local hint = ""
-    local score = 0
-    
-    if altitude > 850 then
-      score = 5
-      hint = "You're high on the upwind."
-    elseif altitude > 830 then
-      score = 7
-      hint = "You're slightly high on the upwind."
-    elseif altitude < 750 then
-      score = 5
-      hint = "You're low on the upwind."
-    elseif altitude < 770 then
-      score = 7
-      hint = "You're slightly low on the upwind."
-    else
-      score = 10
-      hint = "Good altitude on the upwind."
-    end
-    
-    -- Increase score.
-    self:_IncreaseScore(playerData, score)
-    
-    self:_SendMessageToPlayer(hint, 8, playerData)
-    
-    self:_PrintAltitudeFeedback(altitude, idealAltitude, playerData)
-    self:_PrintScore(score, playerData, true)
-      
-    self:_AddToSummary(playerData, hint)
-    
-    -- Set step.
-    playerData.step = 3
-    
-  end
-end
-
---- Calculate distances between carrier and player unit.
--- @param #CARRIERTRAINER self 
--- @param Wrapper.Unit#UNIT unit Player unit
--- @return #number Distance in the direction of the orientation of the carrier.
--- @return #number Distance perpendicular to the orientation of the carrier.
-function CARRIERTRAINER:_GetDistances(unit)
-
-  -- Vector to carrier
-  local a=self.carrier:GetVec3()
-  
-  -- Vector to player
-  local b=unit:GetVec3()
-  
-  -- Vector from carrier to player.
-  local c={x=b.x-a.x, y=0, z=b.z-a.z}
-  
-  -- Orientation of carrier.
-  local x=self.carrier:GetOrientationX()
-  
-  -- Projection of player pos on x component.
-  local dx=UTILS.VecDot(x,c)
-  
-  -- Orientation of carrier.
-  local z=self.carrier:GetOrientationZ()
-  
-  -- Projection of player pos on z component.  
-  local dz=UTILS.VecDot(z,c)
-  
-  return dx,dz
-end
-
---- Check if a player is within the right area.
--- @param #CARRIERTRAINER self
--- @param #number X X distance player to carrier.
--- @param #number Z Z distance player to carrier.
--- @param #table pos Position data limits.
--- @return #boolean If true, approach should be aborted.
-function CARRIERTRAINER:_CheckAbort(X, Z, pos)
-
-  local abort=false
-  if pos.Xmin and X<pos.Xmin then
-    abort=true
-  elseif pos.Xmax and X>pos.Xmax then
-    abort=true
-  elseif pos.Zmin and Z<pos.Zmin then
-    abort=true
-  elseif pos.Zmax and Z>pos.Zmax then
-    abort=true
-  end
-
-  return abort
-end
-
---- Generate a text if a player is too far from where he should be.
--- @param #CARRIERTRAINER self
--- @param #number X X distance player to carrier.
--- @param #number Z Z distance player to carrier.
--- @param #table posData Position data limits.
-function CARRIERTRAINER:_TooFarOutText(X, Z, posData)
-
-  local text="You are too far"
-  
-  local xtext=nil
-  if posData.Xmin and X<posData.Xmin then
-    xtext=" ahead"
-  elseif posData.Xmax and X>posData.Xmax then
-    xtext=" behind"
-  end
-  
-  local ztext=nil
-  if posData.Zmin and Z<posData.Zmin then
-    ztext=" port (left)"
-  elseif posData.Zmax and Z>posData.Zmax then
-    ztext=" starboard (right)"
-  end
-  
-  if xtext and ztext then
-    text=text..xtext.." and"..ztext
-  elseif xtext then
-    text=text..xtext
-  elseif ztext then
-    text=text..ztext
-  end
-  
-  text=text.." of the carrier!"
-  
-  return text
-end
-
---- Pattern aborted.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @param #number X X distance player to carrier.
--- @param #number Z Z distance player to carrier.
--- @param #table posData Position data.
-function CARRIERTRAINER:_AbortPattern(playerData, X, Z, posData)
-  local toofartext=self:_TooFarOutText(X, Z, posData)
-  self:_SendMessageToPlayer(toofartext.." Abort approach!", 15, playerData )
-  MESSAGE:New(string.format("Abort: X=%d Xmin=%s, Xmax=%s | Z=%d Zmin=%s Zmax=%s", X, tostring(posData.Xmin), tostring(posData.Xmax), Z, tostring(posData.Zmin), tostring(posData.Zmax)), 60):ToAllIf(self.Debug)
-  self:_AddToSummary(playerData, "Approach aborted.")
-  self:_PrintFinalScore(playerData, 30, -2)
-  self:_HandleCollectedResult(playerData, -2)
-  playerData.step = 0
-end
-
---- Break.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
--- @param #string part Part of the break.
-function CARRIERTRAINER:_Break(playerData, part)
-
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local diffZ = playerPosition.z - carrierPosition.z
-  local diffX = playerPosition.x - carrierPosition.x
-
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffX, diffZ = self:_GetDistances(playerData.unit)
-
-  -- Abort when
-  self.Break={}
-  self.Break.Xmin=-500
-  self.Break.Xmax=nil
-  self.Break.Zmin=-3700
-  self.Break.Zmax=1500
-  self.Break.LimitEarly=-370  --0.2 NM
-  self.Break.LimitLate=-1470  --0.8 NM
-  self.Break.Alitude=UTILS.FeetToMeters(800)
-  
-  --if (diffZ > 1500 or diffZ < -3700 or diffX < -500) then
-  if self:_CheckAbort(diffX, diffZ, self.Break) then
-    self:_AbortPattern(playerData, diffX, diffZ, self.Break)
-    return
-  end
-  
-  -- Break
-  -- z= -370
-  -- y=  800
-  -- x> -500  
-
-  local limit = -370  --0.2 NM
-    
-  if part == "late" then
-    limit = -1470  -- 0.8 NM
-  end
-
-  -- Check if too far left
-  if diffZ < limit then
-  
-    local idealAltitude = 800
-    local altitude = UTILS.Round( UTILS.MetersToFeet( playerPosition.y ) )
-
-    local hint = ""
-    local score = 0
-
-    if(altitude > 880) then
-      score = 5
-      hint = "You're high in the " .. part .. " break."
-    elseif(altitude > 850) then
-      score = 7
-      hint = "You're slightly high in the " .. part .. " break."
-    elseif (altitude < 720) then
-      score = 5
-      hint = "You're low in the " .. part .. " break."
-    elseif (altitude < 750) then
-      score = 7
-      hint = "You're slightly low in the " .. part .. " break."
-    else
-      score = 10
-      hint = "Good altitude in the " .. part .. " break!"
-    end
-
-    self:_IncreaseScore(playerData, score)
-    
-    self:_SendMessageToPlayer( hint, 8, playerData )
-    self:_PrintAltitudeFeedback(altitude, idealAltitude, playerData)
-    self:_PrintScore(score, playerData, true)
-    
-    self:_AddToSummary(playerData, hint)
-
-    if (part == "early") then
-      playerData.step = 4
-    else
-      playerData.step = 5
-    end
-  end
-end
-
---- Break.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Abeam(playerData)  
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local diffZ = playerPosition.z - carrierPosition.z
-  local diffX = playerPosition.x - carrierPosition.x
-  
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffX, diffZ = self:_GetDistances(playerData.unit)
-  
-  self.Abeam={}
-  self.Abeam.Xmin=nil
-  self.Abeam.Xmax=nil
-  self.Abeam.Zmin=-3700
-  self.Abeam.Zmax=-1000
-  self.Abeam.Limit=-200
-  self.Abeam.Alitude=UTILS.FeetToMeters(600)
-  
-  -- Abort if
-  -- less than 1.0 km left of boat (no closer than 1 km to boat
-  -- more than 3.7 km left of boat 
-  --if (diffZ > -1000 or diffZ < -3700) then
-  if self:_CheckAbort(diffX, diffZ, self.Abeam) then
-    --MESSAGE:New(string.format("Abort: diffX=%d (min=nil, max=nil), diffZ=%d (min=-3700, max=-1000)", diffX, diffZ)):ToAllIf(self.Debug)
-    self:_AbortPattern(playerData, diffX, diffZ, self.Abeam)
-    return
-  end
-  
-  -- Abeam pos:
-  -- x= -200
-  -- z=-2160
-  -- y=  600
-  
-  -- Abeam pos 200 meters behind ship
-  local limit = -200
-  
-  if diffX < limit then
-
-    -- Get AoA.
-    local aoa = playerData.unit:GetAoA()
-    local aoaFeedback = self:_PrintAoAFeedback(aoa, 8.1, playerData)
-    
-    local onSpeedScore = self:_GetOnSpeedScore(aoa)
-  
-    local idealAltitude = 600
-    local altitude = UTILS.Round( UTILS.MetersToFeet( playerPosition.y ) )
-
-    local hint = ""
-    local score = 0
-
-    if(altitude > 700) then
-      score = 5
-      hint = "You're high (" .. altitude .. " ft) abeam"
-    elseif(altitude > 650) then
-      score = 7
-      hint = "You're slightly high (" .. altitude .. " ft) abeam"
-    elseif (altitude < 540) then
-      score = 5
-      hint = "You're low (" .. altitude .. " ft) abeam"
-    elseif (altitude < 570) then
-      score = 7
-      hint = "You're slightly low (" .. altitude .. " ft) abeam"
-    else
-      score = 10
-      hint = "Good altitude (" .. altitude .. " ft) abeam"
-    end
-    
-    local distanceHint = ""
-    local distanceScore
-    local diffEast = carrierPosition.z - playerPosition.z
-    
-    local nm = diffEast / 1852 --nm conversion
-    local idealDistance = 1.2
-    
-    local roundedNm = UTILS.Round(nm, 2)
-    
-    if (nm < 1.0) then
-      distanceScore = 0
-      distanceHint = "too close to the boat (" .. roundedNm .. " nm)"
-    elseif(nm < 1.1) then
-      distanceScore = 5
-      distanceHint = "slightly too close to the boat (" .. roundedNm .. " nm)"
-    elseif(nm < 1.3) then
-      distanceScore = 10
-      distanceHint = "with perfect distance to the boat (" .. roundedNm .. " nm)"
-    elseif(nm < 1.4) then
-      distanceScore = 5
-      distanceHint = "slightly too far from the boat (" .. roundedNm .. " nm)"
-    else
-      distanceScore = 0
-      distanceHint = "too far from the boat (" .. roundedNm .. " nm)"
-    end
-    
-    local fullHint = hint .. ", " .. distanceHint
-    
-    self:_SendMessageToPlayer( fullHint, 8, playerData )
-    self:_SendMessageToPlayer( "(Target: 600 ft and 1.2 nm).", 8, playerData )
-
-    self:_IncreaseScore(playerData, score + distanceScore + onSpeedScore)
-    self:_PrintScore(score + distanceScore + onSpeedScore, playerData, true)
-    
-    self:_AddToSummary(playerData, fullHint .. " (" .. aoaFeedback .. ")")
-    playerData.step = 6
-  end
-end
-
---- Down wind long check.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_CheckForLongDownwind(playerData)
-
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local limit = -1500
-  
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  local diffX, diffZ = self:_GetDistances(playerData.unit)
-  
-  -- Check we are not too far out w.r.t back of the boat.
-  if diffX < limit then
-  
-    local headingPlayer  = playerData.unit:GetHeading()
-    local headingCarrier = self.carrier:GetHeading()
-    
-    --TODO: Take carrier heading != 0 into account!
-    
-    if (headingPlayer > 170) then
-    
-      local hint = "Too long downwind. Turn final earlier next time."
-      self:_SendMessageToPlayer( hint, 8, playerData )
-      local score = -40
-      self:_IncreaseScore(playerData, score)
-      self:_PrintScore(score, playerData, true)
-      self:_AddToSummary(playerData, hint)
-      playerData.longDownwindDone = true
-    end
-    
-  end
-end
-
---- Ninety.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Ninety(playerData) 
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local diffZ = playerPosition.z - carrierPosition.z
-  local diffX = playerPosition.x - carrierPosition.x
-  
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffX, diffZ = self:_GetDistances(playerData.unit)
-  
-  self.Ninety={}
-  self.Ninety.Xmin=-3700
-  self.Ninety.Xmax=0
-  self.Ninety.Zmin=-3700
-  self.Ninety.Zmax=nil
-  self.Ninety.Limit=-1111
-  self.Ninety.Altitude=UTILS.FeetToMeters(500)
-  
-  --if(diffZ < -3700 or diffX < -3700 or diffX > 0) then
-  if self:_CheckAbort(diffX, diffZ, self.Ninety) then
-    --MESSAGE:New(string.format("Abort: diffX=%d (min=-3700, max=0), diffZ=%d (min=-3700, max=nil)", diffX, diffZ)):ToAllIf(self.Debug)
-    self:_AbortPattern(playerData, diffX, diffZ, self.Ninety)
-    return
-  end
-  
-  local limitEast = -1111 --0.6nm
-  
-  if diffZ > limitEast then
-    local idealAltitude = 500
-    local altitude = UTILS.Round( UTILS.MetersToFeet( playerPosition.y ) )
-
-    local hint = ""
-    local score = 0
-
-    if(altitude > 600) then
-      score = 5
-      hint = "You're high at the 90."
-    elseif(altitude > 550) then
-      score = 7
-      hint = "You're slightly high at the 90."
-    elseif (altitude < 380) then
-      score = 5
-      hint = "You're low at the 90."
-    elseif (altitude < 420) then
-      score = 7
-      hint = "You're slightly low at the 90."
-    else
-      score = 10
-      hint = "Good altitude at the 90!"
-    end
-
-    self:_SendMessageToPlayer( hint, 8, playerData )
-    self:_PrintAltitudeFeedback(altitude, idealAltitude, playerData)
-
-    --local aoa = math.deg(mist.getAoA(playerData.mistUnit))
-    local aoa = playerData.unit:GetAoA()
-    local aoaFeedback = self:_PrintAoAFeedback(aoa, 8.1, playerData)
-    
-    local onSpeedScore = self:_GetOnSpeedScore(aoa)
-
-    self:_IncreaseScore(playerData, score + onSpeedScore)
-    self:_PrintScore(score + onSpeedScore, playerData, true)
-    
-    self:_AddToSummary(playerData, hint .. " (" .. aoaFeedback .. ")")
-    
-    playerData.longDownwindDone = true
-    playerData.step = 7
-  end
-end
-
---- Wake.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Wake(playerData) 
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local diffZ = playerPosition.z - carrierPosition.z
-  local diffX = playerPosition.x - carrierPosition.x
-  
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffX, diffZ = self:_GetDistances(playerData.unit)
-  
-  self.Wake={}
-  self.Wake.Xmin=-4000
-  self.Wake.Xmax=0
-  self.Wake.Zmin=-2000
-  self.Wake.Zmax=nil
-  self.Wake.Limit=0
-  self.Wake.Alitude=UTILS.FeetToMeters(370)
-    
-  --if (diffZ < -2000 or diffX < -4000 or diffX > 0) then
-  if self:_CheckAbort(diffX, diffZ, self.Wake) then
-    MESSAGE:New(string.format("Abort: diffX=%d (min=-4000, max=0), diffZ=%d (min=-2000, max=nil)", diffX, diffZ)):ToAllIf(self.Debug)
-    self:_AbortPattern(playerData, diffX, diffZ, self.Wake)
-    return
-  end
-  
-  if diffZ > 0 then
-    local idealAltitude = 370
-    local altitude = UTILS.Round( UTILS.MetersToFeet( playerPosition.y ) )
-
-    local hint = ""
-    local score = 0
-
-    if(altitude > 500) then
-      score = 5
-      hint = "You're high at the wake."
-    elseif(altitude > 450) then
-      score = 7
-      hint = "You're slightly high at the wake."
-    elseif (altitude < 300) then
-      score = 5
-      hint = "You're low at the wake."
-    elseif (altitude < 340) then
-      score = 7
-      hint = "You're slightly low at the wake."
-    else
-      score = 10
-      hint = "Good altitude at the wake!"
-    end
-
-    self:_SendMessageToPlayer( hint, 8, playerData )
-    self:_PrintAltitudeFeedback(altitude, idealAltitude, playerData)
-
-    --local aoa = math.deg(mist.getAoA(playerData.mistUnit))
-    local aoa = playerData.unit:GetAoA()
-    local aoaFeedback = self:_PrintAoAFeedback(aoa, 8.1, playerData)
-    
-    local onSpeedScore = self:_GetOnSpeedScore(aoa)
-
-    self:_IncreaseScore(playerData, score + onSpeedScore)
-    self:_PrintScore(score + onSpeedScore, playerData, true)
-    self:_AddToSummary(playerData, hint .. " (" .. aoaFeedback .. ")")
-    
-    playerData.step = 8
-  end
-end
-
---- Groove.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Groove(playerData) 
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local diffX = playerPosition.x - (carrierPosition.x - 100)
-  local diffZ = playerPosition.z - carrierPosition.z
-
-  --TODO -100?!
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffX, diffZ = self:_GetDistances(playerData.unit)
-  
-  --diffX=diffX+100
-  
-  self.Groove={}
-  self.Groove.Xmin=-4000
-  self.Groove.Xmax=100
-  
-  -- In front of carrier or more than 4 km behind carrier. 
-  --if (diffX > 0 or diffX < -4000) then
-  if self:_CheckAbort(diffX, diffZ, self.Groove) then
-    --MESSAGE:New(string.format("Abort: diffX=%d (min=-4000, max=0), diffZ=%d (min=nil, max=nil)", diffX, diffZ)):ToAllIf(self.Debug)
-    self:_AbortPattern(playerData, diffX, diffZ, self.Groove)
-    return
-  end
-  
-  --TODO: 
-  if (diffX > -500) then --Reached in close before groove
-    local hint = "You're too far left and never reached the groove."
-    self:_SendMessageToPlayer( hint, 8, playerData )
-    self:_PrintScore(0, playerData, true)
-    self:_AddToSummary(playerData, hint)
-    playerData.step = 9
-  else
-  
-    local limitDeg = 8.0
-      
-    local fraction = diffZ / (-diffX)
-    local asinValue = math.asin(fraction)
-    local angle = math.deg(asinValue)
-    
-    if diffZ > -1300 and angle > limitDeg then
-      local idealAltitude = 300
-      local altitude = UTILS.Round( UTILS.MetersToFeet( playerPosition.y ) )
-
-      local hint = ""
-      local score = 0
-      
-      if (altitude > 450) then
-        score = 5
-        hint = "You're high in the groove."
-      elseif (altitude > 350) then
-        score = 7
-        hint = "You're slightly high in the groove."
-      elseif (altitude < 240) then
-        score = 5
-        hint = "You're low in the groove."
-      elseif (altitude < 270) then
-        score = 7
-        hint = "You're slightly low in the groove."
-      else
-        score = 10
-        hint = "Good altitude in the groove!"
-      end
-
-      self:_SendMessageToPlayer(hint, 8, playerData)
-      self:_PrintAltitudeFeedback(altitude, idealAltitude, playerData)
-
-      --local aoa = math.deg(mist.getAoA(playerData.mistUnit))
-      local aoa = playerData.unit:GetAoA() 
-      local aoaFeedback = self:_PrintAoAFeedback(aoa, 8.1, playerData)
-      
-      local onSpeedScore = self:_GetOnSpeedScore(aoa)
-      
-      self:_IncreaseScore(playerData, score + onSpeedScore)
-      self:_PrintScore(score + onSpeedScore, playerData, true)      
-      
-      local fullHint = hint .. " (" .. aoaFeedback .. ")"
-
-      self:_AddToSummary(playerData, fullHint)
-      
-      playerData.step = 9
-    end
-  end
-end
-
---- Trap.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data table.
-function CARRIERTRAINER:_Trap(playerData) 
-  local playerPosition = playerData.unit:GetVec3()
-  local carrierPosition = self.carrier:GetVec3()
-
-  local playerVelocity = playerData.unit:GetVelocityKMH()
-  local carrierVelocity = self.carrier:GetVelocityKMH()
-
-  local diffZ = playerPosition.z - carrierPosition.z
-  local diffX = playerPosition.x - carrierPosition.x
-  
-  -- Get distances between carrier and player unit (parallel and perpendicular to direction of movement of carrier)
-  diffZ, diffX = self:_GetDistances(playerData.unit)
-  
-  self.Trap={}
-  self.Trap.Xmin=-3000
-  self.Trap.Xmax=nil
-  self.Trap.Zmin=-2000
-  self.Trap.Zmax=2000
-  self.Trap.Limit=nil
-  self.Trap.Alitude=nil
-  
-  --if(diffZ < -2000 or diffZ > 2000 or diffX < -3000) then
-  if self:_CheckAbort(diffX, diffZ, self.Trap) then
-    self:_AbortPattern(playerData, diffX, diffZ, self.Trap)
-    return
-  end
-
-  if (diffX > playerData.highestCarrierXDiff) then
-    playerData.highestCarrierXDiff = diffX
-  end
-  
-  if (playerPosition.y < playerData.lowestAltitude) then
-    playerData.lowestAltitude = playerPosition.y
-  end
-  
-  if math.abs(playerVelocity - carrierVelocity) < 0.01 then
-    playerData.secondsStandingStill = playerData.secondsStandingStill + 1
-  
-    if diffX < playerData.highestCarrierXDiff or playerData.secondsStandingStill > 5 then
-      
-      env.info("Trap identified! diff " .. diffX .. ",  highestCarrierXDiff" .. playerData.highestCarrierXDiff .. ", secondsStandingStill: " .. playerData.secondsStandingStill);
-        
-      local wire = 1
-      local score = -10
-      
-      if(diffX < -14) then
-        wire = 1
-        score = -15
-      elseif(diffX < -3) then
-        wire = 2
-        score = 10      
-      elseif (diffX < 10) then
-        wire = 3
-        score = 20
-      else
-        wire = 4
-        score = 7
-      end
-      
-      self:_IncreaseScore(playerData, score)
-      
-      self:_SendMessageToPlayer( "TRAPPED! " .. wire .. "-wire!", 30, playerData )
-      self:_PrintScore(score, playerData, false)
-
-      env.info("Distance! " .. diffX .. " meters resulted in a " .. wire .. "-wire estimation.");
-      
-      local fullHint = "Trapped catching the " .. wire .. "-wire."
-      
-      self:_AddToSummary(playerData, fullHint)
-      
-      self:_PrintFinalScore(playerData, 60, wire)
-      self:_HandleCollectedResult(playerData, wire)
-      playerData.step = 0
-    end
-    
-  elseif (diffX > 150) then
-    
-    local wire = 0
-    local hint = ""
-    local score = 0
-    if (playerData.lowestAltitude < 23) then
-      hint = "You boltered."
-    else
-      hint = "You were waved off."
-      wire = -1
-      score = -10
-    end
-    
-    self:_SendMessageToPlayer( hint, 8, playerData )
-    self:_PrintScore(score, playerData, true)
-       
-    self:_AddToSummary(playerData, hint)
-    
-    self:_PrintFinalScore(playerData, 60, wire)
-    self:_HandleCollectedResult(playerData, wire)
-    
-    playerData.step = 0
-  end 
-end
-
------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--- Menu Functions
------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-
---- Add menu commands for player.
--- @param #CARRIERTRAINER self
--- @param #string _unitName Name of player unit.
-function CARRIERTRAINER:_AddF10Commands(_unitName)
-  self:F(_unitName)
-  
-  -- Get player unit and name.
-  local _unit, playername = self:_GetPlayerUnitAndName(_unitName)
-  
-  -- Check for player unit.
-  if _unit and playername then
-
-    -- Get group and ID.
-    local group=_unit:GetGroup()
-    local _gid=group:GetID()
-  
-    if group and _gid then
-  
-      if not self.menuadded[_gid] then
-      
-        -- Enable switch so we don't do this twice.
-        self.menuadded[_gid] = true
-  
-        -- Main F10 menu: F10/Carrier Trainer/<Carrier Name>/
-        if CARRIERTRAINER.MenuF10[_gid] == nil then
-          CARRIERTRAINER.MenuF10[_gid]=missionCommands.addSubMenuForGroup(_gid, "Carrier Trainer")
-        end
-        local _rangePath    = missionCommands.addSubMenuForGroup(_gid, self.alias, CARRIERTRAINER.MenuF10[_gid])
-        local _statsPath    = missionCommands.addSubMenuForGroup(_gid, "Results",   _rangePath)
-        local _settingsPath = missionCommands.addSubMenuForGroup(_gid, "My Settings",  _rangePath)
-        local _infoPath     = missionCommands.addSubMenuForGroup(_gid, "Carrier Info",   _rangePath)
-
-        -- F10/On the Range/<Range Name>/Stats/
-        --missionCommands.addCommandForGroup(_gid, "All Results",       _statsPath, self._DisplayStrafePitResults, self, _unitName)
-        --missionCommands.addCommandForGroup(_gid, "My Results",        _statsPath, self._DisplayBombingResults, self, _unitName)
-        --missionCommands.addCommandForGroup(_gid, "Reset All Results", _statsPath, self._ResetRangeStats, self, _unitName)
-        -- F10/On the Range/<Range Name>/My Settings/
-        --missionCommands.addCommandForGroup(_gid, "Smoke Delay On/Off",  _settingsPath, self._SmokeBombDelayOnOff, self, _unitName)
-        --missionCommands.addCommandForGroup(_gid, "Smoke Impact On/Off",  _settingsPath, self._SmokeBombImpactOnOff, self, _unitName)
-        --missionCommands.addCommandForGroup(_gid, "Flare Hits On/Off",    _settingsPath, self._FlareDirectHitsOnOff, self, _unitName)        
-        -- F10/On the Range/<Range Name>/Range Information
-        --missionCommands.addCommandForGroup(_gid, "General Info",        _infoPath, self._DisplayRangeInfo, self, _unitName)
-        missionCommands.addCommandForGroup(_gid, "Weather Report",      _infoPath, self._DisplayCarrierWeather, self, _unitName)
-        --missionCommands.addCommandForGroup(_gid, "Bombing Targets",     _infoPath, self._DisplayBombTargets, self, _unitName)
-        --missionCommands.addCommandForGroup(_gid, "Strafe Pits",         _infoPath, self._DisplayStrafePits, self, _unitName)
-      end
-    else
-      self:T(self.lid.."Could not find group or group ID in AddF10Menu() function. Unit name: ".._unitName)
-    end
-  else
-    self:T(self.lid.."Player unit does not exist in AddF10Menu() function. Unit name: ".._unitName)
-  end
-
-end
-
---- Report weather conditions at range. Temperature, QFE pressure and wind data.
--- @param #CARRIERTRAINER self
--- @param #string _unitname Name of the player unit.
-function CARRIERTRAINER:_DisplayCarrierWeather(_unitname)
-  self:F(_unitname)
-
-  -- Get player unit and player name.
-  local unit, playername = self:_GetPlayerUnitAndName(_unitname)
-  
-  -- Check if we have a player.
-  if unit and playername then
-  
-    -- Message text.
-    local text=""
-   
-    -- Current coordinates.
-    local coord=self.carrier:GetCoordinate()
-    
-    -- Get atmospheric data at range location.
-    local position=self.location --Core.Point#COORDINATE
-    local T=position:GetTemperature()
-    local P=position:GetPressure()
-    local Wd,Ws=position:GetWind()
-    
-    -- Get Beaufort wind scale.
-    local Bn,Bd=UTILS.BeaufortScale(Ws)  
-    
-    local WD=string.format('%03d°', Wd)
-    local Ts=string.format("%d°C",T)
-    
-    local hPa2inHg=0.0295299830714
-    local hPa2mmHg=0.7500615613030
-    
-    local settings=_DATABASE:GetPlayerSettings(playername) or _SETTINGS --Core.Settings#SETTINGS
-    local tT=string.format("%d°C",T)
-    local tW=string.format("%.1f m/s", Ws)
-    local tP=string.format("%.1f mmHg", P*hPa2mmHg)
-    if settings:IsImperial() then
-      tT=string.format("%d°F", UTILS.CelciusToFarenheit(T))
-      tW=string.format("%.1f knots", UTILS.MpsToKnots(Ws))
-      tP=string.format("%.2f inHg", P*hPa2inHg)      
-    end
-    
-           
-    -- Message text.
-    text=text..string.format("Weather Report at %s:\n", self.rangename)
-    text=text..string.format("--------------------------------------------------\n")
-    text=text..string.format("Temperature %s\n", tT)
-    text=text..string.format("Wind from %s at %s (%s)\n", WD, tW, Bd)
-    text=text..string.format("QFE %.1f hPa = %s", P, tP)
-
-    
-    -- Send message to player group.
-    --self:_DisplayMessageToGroup(unit, text, nil, true)
-    self:_SendMessageToPlayer(text, 30, self.players[playername])
-    
-    -- Debug output.
-    self:T2(self.lid..text)
-  else
-    self:T(self.lid..string.format("ERROR! Could not find player unit in RangeInfo! Name = %s", _unitname))
-  end      
-end
-
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--- MISC functions
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-
---- Send message about altitude feedback.
--- @param #CARRIERTRAINER self
--- @param #number altitude Current altitude of the player.
--- @param #number idealAltitude Ideal altitude.
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
-function CARRIERTRAINER:_PrintAltitudeFeedback(altitude, idealAltitude, playerData)
-  local text=string.format("Alt: %d feet (Target: %d feet)", altitude, idealAltitude)
-  self:_SendMessageToPlayer(text, 8, playerData)
-end
-
---- Score for correct AoA.
--- @param #CARRIERTRAINER self
--- @param #number AoA Angle of attack.
-function CARRIERTRAINER:_GetOnSpeedScore(AoA)
-  local score = 0
-  if(AoA > 9.5) then --Slow
-    score = 0
-  elseif(AoA > 9) then --Slightly slow
-    score = 5
-  elseif(AoA > 7.25) then --On speed
-    score = 10
-  elseif(AoA > 6.7) then --Slightly fast
-    score = 5
-  else --Fast
-    score = 0
-  end
-  
-  return score
-end
-
---- Print AoA feedback.
--- @param #CARRIERTRAINER self
--- @param #number AoA Angle of attack.
--- @param #number idealAoA Ideal AoA.
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @return #string Feedback hint.
-function CARRIERTRAINER:_PrintAoAFeedback(AoA, idealAoA, playerData)
-
-  local hint = ""
-  if(AoA > 9.5) then
-    hint = "You're slow."
-  elseif(AoA > 9) then
-    hint = "You're slightly slow."
-  elseif(AoA > 7.25) then
-    hint = "You're on speed!"
-  elseif(AoA > 6.7) then
-    hint = "You're slightly fast."
-  else
-    hint = "You're fast."
-  end
-  
-  local roundedAoA = UTILS.Round(AoA, 2)
-  
-  self:_SendMessageToPlayer(hint .. " AOA: " .. roundedAoA .. " (Target: " .. idealAoA .. ")", 8, playerData)
-  
-  return hint
-end
-
---- Send message to playe client.
--- @param #CARRIERTRAINER self
--- @param #string message The message to send.
--- @param #number duration Display message duration.
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
-function CARRIERTRAINER:_SendMessageToPlayer(message, duration, playerData)
-  if playerData.client then
-    MESSAGE:New(string.format("%s, %s, ", self.alias, playerData.callsign)..message, duration):ToClient(playerData.client)
-  end
-end
-
---- Send message to playe client.
--- @param #CARRIERTRAINER self
--- @param #number score Score.
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
-function CARRIERTRAINER:_PrintScore(score, playerData, alsoPrintTotalScore)
-  if(alsoPrintTotalScore) then
-    self:_SendMessageToPlayer( "Score: " .. score .. " (Total: " .. playerData.score .. ")", 8, playerData )
-  else
-    self:_SendMessageToPlayer( "Score: " .. score, 8, playerData )
-  end
-end
-
---- Display final score.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @param #number duration Duration for message display.
-function CARRIERTRAINER:_PrintFinalScore(playerData, duration, wire)
-  local wireText = ""
-  if(wire == -2) then
-    wireText = "Aborted approach"
-  elseif(wire == -1) then
-    wireText = "Wave-off"
-  elseif(wire == 0) then
-    wireText = "Bolter"
-  else
-    wireText = wire .. "-wire"
-  end
-  
-  MessageToAll( playerData.callsign .. " - Final score: " .. playerData.score .. " / 140 (" .. wireText .. ")", duration, "FinalScore" )
-  self:_SendMessageToPlayer( playerData.summary, duration, playerData )
-end
-
---- Collect result.
--- @param #CARRIERTRAINER self
--- @param #CARRIERTRAINER.PlayerData playerData Player data.
--- @param #number wire Trapped wire.
-function CARRIERTRAINER:_HandleCollectedResult(playerData, wire)
-
-  local newString = ""
-  if(wire == -2) then
-    newString = playerData.score .. " (Aborted)"
-  elseif(wire == -1) then
-    newString = playerData.score .. " (Wave-off)"
-  elseif(wire == 0) then
-    newString = playerData.score .. " (Bolter)"
-  else
-    newString = playerData.score .. " (" .. wire .."W)"
-  end
-  
-  playerData.totalScore = playerData.totalScore + playerData.score
-  playerData.passes = playerData.passes + 1
-  
-  if playerData.collectedResultString == "" then
-    playerData.collectedResultString = newString
-  else
-    playerData.collectedResultString = playerData.collectedResultString .. ", " .. newString
-    MessageToAll( playerData.callsign .. "'s " .. playerData.passes .. " passes: " .. playerData.collectedResultString .. " (TOTAL: " .. playerData.totalScore .. ")"  , 30, "CollectedResult" )
-  end
-  
-  local heading=playerData.unit:GetCoordinate():HeadingTo(self.startZone:GetCoordinate())
-  local distance=playerData.unit:GetCoordinate():Get2DDistance(self.startZone:GetCoordinate())
-  local text=string.format("%s, fly heading %d for %d nm to restart the pattern.", playerData.callsign, heading, UTILS.MetersToNM(distance))
-   --"Return south 4 nm (over the trailing ship), towards WP 1, to restart the pattern."
-  self:_SendMessageToPlayer(text, 30, playerData)
-end
-
-
---- Get the formatted score.
--- @param #CARRIERTRAINER self
--- @param #number score Score of player.
--- @param #number maxScore Max score possible.
--- @return #string Formatted score text.
-function CARRIERTRAINER:_GetFormattedScore(score, maxScore)
-  if(score < maxScore) then
-    return " (" .. score .. " points)."
-  else
-    return " (" .. score .. " points)!"
-  end
-end
-
---- Get distance feedback.
--- @param #CARRIERTRAINER self
--- @param #number distance Distance to boat.
--- @param #number idealDistance Ideal distance.
--- @return #string Feedback text.
-function CARRIERTRAINER:_GetDistanceFeedback(distance, idealDistance)
-  return distance .. " nm (Target: " .. idealDistance .. " nm)"
-end
-
-
---- Returns the unit of a player and the player name. If the unit does not belong to a player, nil is returned. 
--- @param #CARRIERTRAINER self
--- @param #string _unitName Name of the player unit.
--- @return Wrapper.Unit#UNIT Unit of player or nil.
--- @return #string Name of the player or nil.
-function CARRIERTRAINER:_GetPlayerUnitAndName(_unitName)
-  self:F2(_unitName)
-
-  if _unitName ~= nil then
-  
-    -- Get DCS unit from its name.
-    local DCSunit=Unit.getByName(_unitName)
-    
-    if DCSunit then
-    
-      local playername=DCSunit:getPlayerName()
-      local unit=UNIT:Find(DCSunit)
-    
-      self:T2({DCSunit=DCSunit, unit=unit, playername=playername})
-      if DCSunit and unit and playername then
-        return unit, playername
-      end
-      
-    end
-    
-  end
-  
-  -- Return nil if we could not find a player.
-  return nil,nil
-end
-
-