mirror of
https://github.com/FlightControl-Master/MOOSE.git
synced 2025-08-15 10:47:21 +00:00
ATIS v0.6.0
- Added altimeter QNH calculation
This commit is contained in:
Frank
parent
1c99e474b2
commit
0d57ad5584
@ -1,4 +1,4 @@
|
||||
--- **AI** -- Models the process of AI air operations.
|
||||
--- **AI** - Models the process of AI air operations.
|
||||
--
|
||||
-- ===
|
||||
--
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
--- **AI** -- Models squadrons for airplanes and helicopters.
|
||||
--- **AI** - Models squadrons for airplanes and helicopters.
|
||||
--
|
||||
-- This is a class used in the @{AI_Air_Dispatcher} and derived dispatcher classes.
|
||||
--
|
||||
@ -9,7 +9,7 @@
|
||||
-- ===
|
||||
--
|
||||
-- @module AI.AI_Air_Squadron
|
||||
-- @image AI_Air_To_Air_Engage.JPG
|
||||
-- @image MOOSE.JPG
|
||||
|
||||
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
--- **AI** -- (R2.5) - Models the automatic assignment of AI escorts to player flights.
|
||||
--- **AI** - Models the automatic assignment of AI escorts to player flights.
|
||||
--
|
||||
-- ## Features:
|
||||
-- --
|
||||
@ -12,7 +12,7 @@
|
||||
-- ===
|
||||
--
|
||||
-- @module AI.AI_Escort_Dispatcher
|
||||
-- @image AI_Escort_Dispatcher.JPG
|
||||
-- @image MOOSE.JPG
|
||||
|
||||
|
||||
--- @type AI_ESCORT_DISPATCHER
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
--- **AI** -- (R2.5) - Models the assignment of AI escorts to player flights upon request using the radio menu.
|
||||
--- **AI** - Models the assignment of AI escorts to player flights upon request using the radio menu.
|
||||
--
|
||||
-- ## Features:
|
||||
--
|
||||
@ -12,7 +12,7 @@
|
||||
-- ===
|
||||
--
|
||||
-- @module AI.AI_ESCORT_DISPATCHER_REQUEST
|
||||
-- @image AI_ESCORT_DISPATCHER_REQUEST.JPG
|
||||
-- @image MOOSE.JPG
|
||||
|
||||
|
||||
--- @type AI_ESCORT_DISPATCHER_REQUEST
|
||||
|
||||
@ -1,6 +1,7 @@
|
||||
--- DCS API prototypes
|
||||
-- See [https://wiki.hoggitworld.com/view/Simulator_Scripting_Engine_Documentation](https://wiki.hoggitworld.com/view/Simulator_Scripting_Engine_Documentation)
|
||||
-- for further explanation and examples.
|
||||
--- **DCS API** Prototypes
|
||||
--
|
||||
-- See the [Simulator Scripting Engine Documentation](https://wiki.hoggitworld.com/view/Simulator_Scripting_Engine_Documentation) on Hoggit for further explanation and examples.
|
||||
--
|
||||
-- @module DCS
|
||||
-- @image MOOSE.JPG
|
||||
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
--- **Ops** - (R2.5) - Automatic Terminal Information Service (ATIS).
|
||||
--- **Ops** - Automatic Terminal Information Service (ATIS).
|
||||
--
|
||||
-- ===
|
||||
--
|
||||
@ -81,6 +81,7 @@
|
||||
-- @field #table runwaymag Table of magnetic runway headings.
|
||||
-- @field #number runwaym2t Optional correction for magnetic to true runway heading conversion (and vice versa) in degrees.
|
||||
-- @field #boolean windtrue Report true (from) heading of wind. Default is magnetic.
|
||||
-- @field #boolean altimeterQNH Report altimeter QNH.
|
||||
-- @extends Core.Fsm#FSM
|
||||
|
||||
--- *It is a very sad thing that nowadays there is so little useless information.* - Oscar Wilde
|
||||
@ -307,6 +308,7 @@ ATIS = {
|
||||
runwaymag = {},
|
||||
runwaym2t = nil,
|
||||
windtrue = nil,
|
||||
altimeterQNH = nil,
|
||||
}
|
||||
|
||||
--- NATO alphabet.
|
||||
@ -513,7 +515,7 @@ _ATIS={}
|
||||
|
||||
--- ATIS class version.
|
||||
-- @field #string version
|
||||
ATIS.version="0.5.0"
|
||||
ATIS.version="0.6.0"
|
||||
|
||||
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
-- TODO list
|
||||
@ -567,6 +569,7 @@ function ATIS:New(airbasename, frequency, modulation)
|
||||
self:SetMagneticDeclination()
|
||||
self:SetRunwayCorrectionMagnetic2True()
|
||||
self:SetRadioPower()
|
||||
self:SetAltimeterQNH(true)
|
||||
|
||||
-- Start State.
|
||||
self:SetStartState("Stopped")
|
||||
@ -775,6 +778,21 @@ function ATIS:SetTemperatureFahrenheit()
|
||||
return self
|
||||
end
|
||||
|
||||
--- Report altimeter QNH.
|
||||
-- @param #ATIS self
|
||||
-- @param #boolean switch If true or nil, report altimeter QHN. If false, report QFF.
|
||||
-- @return #ATIS self
|
||||
function ATIS:SetAltimeterQNH(switch)
|
||||
|
||||
if switch==true or switch==nil then
|
||||
self.altimeterQNH=true
|
||||
else
|
||||
self.altimeterQNH=false
|
||||
end
|
||||
|
||||
return self
|
||||
end
|
||||
|
||||
--- Set magnetic declination/variation at the airport.
|
||||
--
|
||||
-- Default is per map:
|
||||
@ -1013,7 +1031,7 @@ function ATIS:onafterBroadcast(From, Event, To)
|
||||
local coord=self.airbase:GetCoordinate()
|
||||
|
||||
-- Get elevation.
|
||||
local height=coord:GetLandHeight()+10
|
||||
local height=coord:GetLandHeight()
|
||||
|
||||
----------------
|
||||
--- Pressure ---
|
||||
@ -1023,6 +1041,32 @@ function ATIS:onafterBroadcast(From, Event, To)
|
||||
local qfe=coord:GetPressure(height)
|
||||
local qnh=coord:GetPressure(0)
|
||||
|
||||
if self.altimeterQNH then
|
||||
|
||||
-- Some constants.
|
||||
local L=-0.0065 --[K/m]
|
||||
local R= 8.31446 --[J/mol/K]
|
||||
local g= 9.80665 --[m/s^2]
|
||||
local M= 0.0289644 --[kg/mol]
|
||||
local T0=coord:GetTemperature(0)+273.15 --[K] Temp at sea level.
|
||||
local TS=288.15 -- Standard Temperature assumed by Altimeter is 15°C
|
||||
local q=qnh*100
|
||||
|
||||
-- Calculate Pressure.
|
||||
local P=q*(1+L*height/T0)^(-g*M/(R*L)) -- Pressure at sea level
|
||||
local Q=P/(1+L*height/TS)^(-g*M/(R*L)) -- Altimeter QNH
|
||||
local A=(T0/L)*((P/q)^(((-R*L)/(g*M)))-1) -- Altitude check
|
||||
|
||||
|
||||
-- Debug aoutput
|
||||
self:T2(self.lid..string.format("height=%.1f, A=%.1f, T0=%.1f, QFE=%.1f, QNH=%.1f, P=%.1f, Q=%.1f hPa = %.2f", height, A, T0-273.15, qfe, qnh, P/100, Q/100, UTILS.hPa2inHg(Q/100)))
|
||||
|
||||
-- Set QNH value in hPa.
|
||||
qnh=Q/100
|
||||
|
||||
end
|
||||
|
||||
|
||||
-- Convert to inHg.
|
||||
if self.PmmHg then
|
||||
qfe=UTILS.hPa2mmHg(qfe)
|
||||
@ -1052,7 +1096,7 @@ function ATIS:onafterBroadcast(From, Event, To)
|
||||
------------
|
||||
|
||||
-- Get wind direction and speed in m/s.
|
||||
local windFrom, windSpeed=coord:GetWind(height)
|
||||
local windFrom, windSpeed=coord:GetWind(height+10)
|
||||
|
||||
-- Wind in magnetic or true.
|
||||
local magvar=self.magvar
|
||||
@ -1134,7 +1178,7 @@ function ATIS:onafterBroadcast(From, Event, To)
|
||||
-------------------
|
||||
|
||||
-- Temperature in °C (or °F).
|
||||
local temperature=coord:GetTemperature(height)
|
||||
local temperature=coord:GetTemperature(height+5)
|
||||
|
||||
-- Convert to °F.
|
||||
if self.TDegF then
|
||||
@ -1151,12 +1195,12 @@ function ATIS:onafterBroadcast(From, Event, To)
|
||||
local clouds, visibility, turbulence, fog, dust, static=self:GetMissionWeather()
|
||||
|
||||
-- Check that fog is actually "thick" enough to reach the airport. If an airport is in the mountains, fog might not affect it as it is measured from sea level.
|
||||
if fog and fog.thickness<height then
|
||||
if fog and fog.thickness<height+25 then
|
||||
fog=nil
|
||||
end
|
||||
|
||||
-- Dust only up to 1500 ft = 457 m ASL.
|
||||
if dust and height>UTILS.FeetToMeters(1500) then
|
||||
if dust and height+25>UTILS.FeetToMeters(1500) then
|
||||
dust=nil
|
||||
end
|
||||
|
||||
@ -1655,6 +1699,13 @@ end
|
||||
-- Misc Functions
|
||||
-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
|
||||
--- Get runway from user supplied magnetic heading.
|
||||
-- @param #ATIS self
|
||||
-- @return #string Runway magnetic heading divided by ten (and rounded). Eg, "13" for 130°.
|
||||
function ATIS:GetActiveRunway()
|
||||
|
||||
end
|
||||
|
||||
--- Get runway from user supplied magnetic heading.
|
||||
-- @param #ATIS self
|
||||
-- @param #number windfrom Wind direction (from) in degrees.
|
||||
|
||||
@ -55,7 +55,7 @@
|
||||
-- ===
|
||||
--
|
||||
-- @module Tasking.Task_Zone_Capture_Dispatcher
|
||||
-- @image Task_Zone_Capture_Dispatcher.JPG
|
||||
-- @image MOOSE.JPG
|
||||
|
||||
do -- TASK_CAPTURE_DISPATCHER
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user