mirror of
https://github.com/weyne85/DCS-ExportScripts.git
synced 2025-10-29 16:58:18 +00:00
9c007dd9c4
change A-10C add ID 717 for Standby Attitude Indicator knob arrow add ID 22 for ADI Pitch Trim Knob add ID 45 for HSI Heading Set Knob add ID 44 for HSI Course Set Knob add ID 67 for SAI Cage Standby Attitude Indicator. Hold Right Mouse Button and rotate Scroll Wheel to uncage add ID 66 for SAI Cage Standby Attitude Indicator. Hold Right Mouse Button and rotate Scroll Wheel to uncage add ID 68 for Clock Toggle Clock and Elapsed Time Modes add ID 69 for Clock Start, Stop and Reset Elapsed Timer change ID 127 to 128 for PTR-THROTTLE-FRICTION (Throttle Friction Control) add ID 652 for PTR-TEMS-DATA (TEMS DATA) add ID 773 for PTR-FLAPS (Flap Setting) add ID 709 for PTR-ARMGS-COVER (Arm Ground Safety Override Cover) add ID 710 for PTR-ARMGS-OVERRIDE-SWITCH (Arm Ground Safety Override Switch) add ID 666 for PTR-CBP-AILERON-DISC-L (AILERON DISC L) add ID 667 for PTR-CBP-AILERON-DISC-R (AILERON DISC R) add ID 668 for PTR-CBP-SPS-RUDDER-AUTH-LIM (SPS & RUDDER AUTH LIMIT) add ID 669 for PTR-CBP-ELEVATION-DISC-L (ELEVATION DISC L) add ID 670 for PTR-CBP-ELEVATION-DISC-R (ELEVATION DISC R) add ID 671 for PTR-CBP-AILERON-TAB-L (AILERON TAB L) add ID 672 for PTR-CBP-AILERON-TAB-R (AILERON TAB R) add ID 673 for PTR-CBP-EMER-FLAP (EMER FLAP) add ID 674 for PTR-CBP-EMER-TRIM (EMER TRIM) add ID 675 for PTR-CBP-LAND-GEAR (LAND GEAR) add ID 676 for PTR-CBP-ENGINE-START-L (ENGINE START L) add ID 677 for PTR-CBP-ENGINE-START-R (ENGINE START R) add ID 678 for PTR-CBP-APU-CONT (APU CONT) add ID 679 for PTR-CBP-ANG-IGNITOR-1 (ENG IGNITOR L/R-1) add ID 680 for PTR-CBP-ANG-IGNITOR-2 (ENG IGNITOR L/R-2) add ID 681 for PTR-CBP-EMER-FUEL-SHUTOFF-ENG-L (EMER FUEL SHUTOFF ENG L) add ID 682 for PTR-CBP-EMER-FUEL-SHUTOFF-ENG-R (EMER FUEL SHUTOFF ENG R) add ID 683 for PTR-CBP-DC-FUEL-PUMP (DC FUEL PUMP) add ID 684 for PTR-CBP-BLEED-AIR-CONT-L (BLEED AIR CONT L) add ID 685 for PTR-CBP-BLEED-AIR-CONT-R (BLEED AIR CONT R) add ID 686 for PTR-CBP-EXT-STORES-JETT-1 (EXT STORES JETT 1) add ID 687 for PTR-CBP-EXT-STORES-JETT-2 (EXT STORES JETT 2) add ID 688 for PTR-CBP-STBY-ATT-IND (STBY ATT IND) add ID 689 for PTR-CBP-MASTER-CAUT (MASTER CAUT) add ID 690 for PTR-CBP-PITOT-HEAT-AC (PITOT HEAT AC) add ID 691 for PTR-CBP-IFF (IFF) add ID 692 for PTR-CBP-UHF-COMM (UHF COMM) add ID 693 for PTR-CBP-INTER-COMM (INTER COMM) add ID 694 for PTR-CBP-GENERATOR-CONT-L (GENERATOR CONT L) add ID 695 for PTR-CBP-GENERATOR-CONT-R (GENERATOR CONT R) add ID 696 for PTR-CBP-CONVERTER-L (CONVERTER L) add ID 697 for PTR-CBP-AUX-ESS-BUS-0A (AUX ESS BUS 0A) add ID 698 for PTR-CBP-AUX-ESS-BUS-0B (AUX ESS BUS 0B) add ID 699 for PTR-CBP-AUX-ESS-BUS-0C (AUX ESS BUS 0C) add ID 700 for PTR-CBP-BATTERY-BUS-TRANS (BATTERY BUS TRANS) add ID 701 for PTR-CBP-INVERTER-PWR (INVERTER PWR) add ID 702 for PTR-CBP-INVERTER-CONT (INVERTER CONT) add ID 703 for PTR-CBP-AUX-ESS-BUS-TIE (AUX ESS BUS TIE) add ID 62 for PNT-ALT-LEVR-L (Set Pressure) add ID 60 for PNT-ALT-LEVR-R (ELECT/PNEU) add ID 770 for Seat Height Adjustment up/down add ID 787 for Extend boarding ladder cover add ID 788 for Extend boarding ladder button add ID 904 for Accelerometer Push to set add ID 789 for DVADR - Function control toggle switch add ID 776 for Anti-G suit valve test button add ID 777 for Internal canopy actuator disengage lever add ID 785 for Canopy jettison lever add ID 786 for Canopy Jettison Lever Unlock Button add ID 706 for IFF - antenna switch add ID 707 for UHF - antenna switch add ID 708 for EGI HQ TOD add ID 16 for RWR Adjust Display Brightness change AJS37 add ID 131 for Minute add ID 133 for Second (Arrow) add ID 1333 for Second add ID 135 for Clock Setting change AV8BNA add ID 350 for Backup ADI Cage change F-5E-3 format value for Radio with ID 327, 328, 329, 330 and 331 format value for TACAN XY Wheel ID 266 format value for set air speed knob ID 177 change FA-18C_hornet add ID 439 for FLIR Switch, ON/STBY/OFF add id 441 for LTD/R Switch, ARM/SAFE/AFT change Ka-50 add ID 573 for VM_15PV_BALT_tenths change M-2000C format value for ADI standby ID 328 format value for Rada altimeter mimimum knob ID 192 change UHF Radio Preset Chanel values change Mi-8MT format value for VD 10K L Press ID 21 change SA342L/SA342;/SA342Mistral change clock (minute) values for ID 42 change clock (second) values for ID 43 add ID 210 for clock ExtCouronne formate value Radar Alt lamp for ID 97
1408 lines
61 KiB
Lua
1408 lines
61 KiB
Lua
-- F-15C
|
|
|
|
ExportScript.FoundFCModule = true
|
|
ExportScript.Version.F15C = "1.2.1"
|
|
|
|
-- auxiliary function
|
|
dofile(ExportScript.Config.ExportModulePath.."FC_AuxiliaryFuntions.lua")
|
|
|
|
-----------------------------------------
|
|
-- FLAMING CLIFFS AIRCRAFT / F-15C --
|
|
-- FC aircraft don't support GetDevice --
|
|
-----------------------------------------
|
|
|
|
function ExportScript.ProcessIkarusFCHighImportanceConfig()
|
|
local lFunctionTyp = "Ikarus" -- function type for shared function
|
|
local myData = LoGetSelfData()
|
|
|
|
if (myData) then
|
|
local lLatitude = myData.LatLongAlt.Lat -- LATITUDE
|
|
local lLongitude = myData.LatLongAlt.Long -- LONGITUDE
|
|
local lBasicAtmospherePressure = LoGetBasicAtmospherePressure() -- BAROMETRIC PRESSURE
|
|
local lAltBar = LoGetAltitudeAboveSeaLevel() -- ALTITUDE SEA LEVEL (Meter)
|
|
|
|
local lEngineRPMleft = LoGetEngineInfo().RPM.left -- ENG1 RPM %
|
|
local lEngineRPMright = LoGetEngineInfo().RPM.right -- ENG2 RPM %
|
|
local lEngineTempLeft = LoGetEngineInfo().Temperature.left -- ENG1 EGT ºC
|
|
local lEngineTempRight = LoGetEngineInfo().Temperature.right -- ENG2 EGT ºC
|
|
|
|
local lIAS = LoGetIndicatedAirSpeed() -- INDICATED AIRSPEED (Meter/Second)
|
|
local lMachNumber = LoGetMachNumber() -- MACH
|
|
local lAoA = LoGetAngleOfAttack() -- ANGLE OF ATTACK AoA (Radian)
|
|
local lAccelerationUnits = LoGetAccelerationUnits().y -- G-LOAD
|
|
|
|
local lEngineFuelConsumptionLeft = LoGetEngineInfo().FuelConsumption.left
|
|
local lEngineFuelConsumptionRight = LoGetEngineInfo().FuelConsumption.right
|
|
local lEngineHydraulicPressureLeft = LoGetEngineInfo().HydraulicPressure.left
|
|
local lEngineHydraulicPressureRight = LoGetEngineInfo().HydraulicPressure.right
|
|
|
|
--[[
|
|
local lAltRad = LoGetAltitudeAboveGroundLevel() -- ALTITUDE GROUND LEVEL (Meter)
|
|
local lTrueAirSpeed = LoGetTrueAirSpeed() -- TRUE AIRSPEED (Meter/Second)
|
|
local lPitch, lBank, lYaw = LoGetADIPitchBankYaw() -- PITCH, BANK, YAW (Radian)
|
|
|
|
local lHeading = myData.Heading -- HEADING (Radian)
|
|
local lVVI = LoGetVerticalVelocity() -- VERTICAL SPEED (Meter/Second)
|
|
|
|
local lGlide = LoGetGlideDeviation() -- VOR1 HORIZONTAL DEFLECTION (-1 +1)
|
|
local lSide = LoGetSideDeviation() -- VOR1 VERTICAL DEFLECTION (-1 +1)
|
|
local lSlipBallPosition = LoGetSlipBallPosition() -- SLIP BALL (-1 +1)
|
|
|
|
local lNavInfoPitch = LoGetNavigationInfo().Requirements.pitch -- AP REQUIRED PITCH (Radian)
|
|
local lNavInfoRoll = LoGetNavigationInfo().Requirements.roll -- AP REQUIRED BANK (Radian)
|
|
local lNavInfoSpeed = LoGetNavigationInfo().Requirements.speed -- AP SPEED (Meter/Second)
|
|
local lNavInfoAltitude = LoGetNavigationInfo().Requirements.altitude -- AP ALTITUDE (Meter)
|
|
local lNavInfoVerticalSpeed = LoGetNavigationInfo().Requirements.vertical_speed -- AP VERTICAL SPEED (Meter/Second)
|
|
|
|
local lControlPanel_HSI = LoGetControlPanel_HSI() -- HSI Data
|
|
local lHSI_RMI = LoGetControlPanel_HSI().RMI_raw -- VOR1 OBS (Radian)
|
|
local lHSI_ADF = LoGetControlPanel_HSI().ADF_raw -- ADF OBS (Radian)
|
|
local lHSI_Heading = LoGetControlPanel_HSI().Heading_raw -- Heading (Radian)
|
|
|
|
local lEngineFuelInternal = LoGetEngineInfo().fuel_internal -- TANK1 (INT) (KG)
|
|
local lEngineFuelExternal = LoGetEngineInfo().fuel_external -- TANK2 (EXT) (KG)
|
|
|
|
local lMechInfo = LoGetMechInfo() -- mechanical components, e.g. Flaps, Wheelbrakes,...
|
|
local lPayloadInfo = LoGetPayloadInfo() -- Paylod, e.g. bombs, guns, rockets, fuel tanks,...
|
|
]]
|
|
|
|
local lDistanceToWay = 999
|
|
local lRoute = LoGetRoute()
|
|
|
|
if (myData and lRoute) then -- if neither are nil
|
|
local myLoc = LoGeoCoordinatesToLoCoordinates(lLongitude, lLatitude)
|
|
--lDistanceToWay = math.sqrt((myLoc.x - lRoute.goto_point.world_point.x)^2 + (myLoc.y - lRoute.goto_point.world_point.y)^2)
|
|
lDistanceToWay = math.sqrt((myLoc.x - lRoute.goto_point.world_point.x)^2 + (myLoc.z - lRoute.goto_point.world_point.z)^2)
|
|
end
|
|
|
|
-- ADI
|
|
ExportScript.AF.FC_US_ADI() -- ID 1 to 10
|
|
|
|
-- HSI
|
|
ExportScript.AF.FC_US_HSI(lDistanceToWay) -- ID 11 to 23
|
|
|
|
-- VVI
|
|
ExportScript.AF.FC_US_VVI() -- ID 24
|
|
|
|
-- G-LOAD
|
|
ExportScript.AF.FC_US_GLOAD() -- ID 25 to 27
|
|
|
|
-- Clock
|
|
ExportScript.AF.FC_US_Clock() -- ID 28 to 30
|
|
|
|
-- Standby Compass
|
|
ExportScript.AF.FC_US_Compass() -- ID 31 to 33
|
|
|
|
-- Standby ADI
|
|
ExportScript.AF.FC_US_stbyADI() -- ID 34, 35
|
|
|
|
-- Barometrisic Altimeter
|
|
--local lAltCounter = {[0] = 0.0, [1] = 0.11, [2] = 0.22, [3] = 0.33, [4] = 0.44, [5] = 0.55, [6] = 0.66, [7] = 0.77, [8] = 0.88, [9] = 0.99}
|
|
local lAltCounter = {[0] = 0.0, [1] = 0.1, [2] = 0.2, [3] = 0.3, [4] = 0.4, [5] = 0.5, [6] = 0.6, [7] = 0.7, [8] = 0.8, [9] = 0.9}
|
|
--local lAltBarTmp2 = string.format("%03d", ((lAltBar * 3.28084) / 100)) -- meter to feeds
|
|
lAltBar = lAltBar - (9.5 * (760 - lBasicAtmospherePressure)) -- 9.5 m per 1mmHg difference
|
|
--lAltBar = lAltBar + (9.5 * (760 - lBasicAtmospherePressure)) -- 9.5 m per 1mmHg difference
|
|
local lAltBarTmp = lAltBar * 3.28084 -- meter to feeds
|
|
local lAltBarTmp2 = ((lAltBar * 3.28084) / 100) -- meter to feeds
|
|
|
|
lAltBarTmp = lAltBarTmp / 1000
|
|
lAltBarTmp = lAltBarTmp - ExportScript.Tools.round(lAltBarTmp, 0, "floor")
|
|
|
|
local lAltCounter1 = 0
|
|
local lAltCounter2 = 0
|
|
local lAltCounter3 = 0
|
|
local lAltCounter4 = 0
|
|
local lAltBarTmp3 = string.format("%03d", lAltBarTmp2)
|
|
|
|
lAltCounter4 = lAltBarTmp * 10
|
|
if lAltCounter4 > 1.0 then
|
|
lAltCounter4 = lAltCounter4 - ExportScript.Tools.round(lAltCounter4, 0, "floor")
|
|
end
|
|
|
|
-- AltBar {0.0,1.0}
|
|
-- AltBar_10000 {0.0,1.0}
|
|
-- AltBar_1000 {0.0,1.0}
|
|
-- AltBar_100 {0.0,1.0}
|
|
-- AltBar_10 {0.0,1.0}
|
|
ExportScript.Tools.SendData(36, lAltBarTmp)
|
|
ExportScript.Tools.SendData(37, lAltCounter[tonumber(string.sub(lAltBarTmp3, 1, 1))])
|
|
ExportScript.Tools.SendData(38, lAltCounter[tonumber(string.sub(lAltBarTmp3, 2, 2))])
|
|
ExportScript.Tools.SendData(39, lAltCounter[tonumber(string.sub(lAltBarTmp3, 3, 3))])
|
|
ExportScript.Tools.SendData(40, lAltCounter4)
|
|
-- Barometrisic Altimeter end
|
|
|
|
-- Air Speed Indicator (IAS, Mach)
|
|
--[[
|
|
y_min = 0.0 -- minimaler Ausgabewert
|
|
y_max = 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = 514,44444443999953012349519517095 -- maximaler Eingangswert
|
|
x = 257.0 -- aktueller Eingangswert
|
|
|
|
d_y = 1.0 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 514,44444443999953012349519517095 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.0019438444924574 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.0 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.4995680345615518 -- Ergebnis (m * x + n)
|
|
]]
|
|
lIAS = 0.0019438444924574 * lIAS
|
|
|
|
if lMachNumber < 1.01 then
|
|
--[[
|
|
y_min = 0.0 0.1 -- minimaler Ausgabewert
|
|
y_max = 0.1 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 1.0 -- minimaler Eingangswert
|
|
x_max = 1.0 3.6 -- maximaler Eingangswert
|
|
x = 0.5 2.0 -- aktueller Eingangswert
|
|
|
|
d_y = 0.1 0.9 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 1.0 2.6 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.1 0.34615384615384615384615384615385 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.0 -0.24615384615384615384615384615385 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.05 0.44615384615384615384615384615384 -- Ergebnis (m * x + n)
|
|
]]
|
|
|
|
lMachNumber = 0.1 * lMachNumber
|
|
else
|
|
lMachNumber = 0.34615384615384615384615384615385 * lMachNumber + -0.24615384615384615384615384615385
|
|
end
|
|
-- IAS {0.0,1.0}
|
|
-- MachNumber
|
|
--SendData(2, string.format("%.4f;%.4f", lIAS, lMachNumber))
|
|
ExportScript.Tools.SendData(44, string.format("%.4f", lIAS))
|
|
ExportScript.Tools.SendData(45, string.format("%.4f", lMachNumber))
|
|
-- Air Speed Indicator End
|
|
|
|
-- RPM Engine Left
|
|
ExportScript.AF.FC_OneNeedleGauge(lEngineRPMleft, 110, 46)
|
|
|
|
-- RPM Engine Right
|
|
ExportScript.AF.FC_OneNeedleGauge(lEngineRPMright, 110, 47)
|
|
|
|
-- Oil Pressure Left, no value but similar to Engine RPM
|
|
--[[
|
|
y_min = 0.0 0.76 -- minimaler Ausgabewert
|
|
y_max = 0.76 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 74.0 -- minimaler Eingangswert
|
|
x_max = 74.0 95.0 -- maximaler Eingangswert
|
|
x = 74.0 90.0 -- aktueller Eingangswert
|
|
|
|
d_y = 0.76 0.24 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 74.0 21.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.01027027027027027027027027027027 0.01142857142857142857142857142857 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.0 -0.08571428571428571428571428571415 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.7599999 0.943-- Ergebnis (m * x + n)
|
|
]]
|
|
if lEngineRPMleft < 74 then
|
|
ExportScript.AF.FC_OneNeedleGauge(1.027027027027027027027027027027 * lEngineRPMleft, 100, 48)
|
|
else
|
|
ExportScript.AF.FC_OneNeedleGauge(1.142857142857142857142857142857 * lEngineRPMleft + -8.571428571428571428571428571415, 100, 48)
|
|
end
|
|
|
|
-- Oil Pressure Right, no value but similar to Engine RPM
|
|
if lEngineRPMright < 74 then
|
|
ExportScript.AF.FC_OneNeedleGauge(1.027027027027027027027027027027 * lEngineRPMright, 100, 49)
|
|
else
|
|
ExportScript.AF.FC_OneNeedleGauge(1.142857142857142857142857142857 * lEngineRPMright + -8.571428571428571428571428571415, 100, 49)
|
|
end
|
|
|
|
-- Engine Exhaust Nozzle Position Indicator Left, very imprecise
|
|
--[[
|
|
y_min = 0.0 -- minimaler Ausgabewert
|
|
y_max = 0.76 -- maximaler Ausgabewert
|
|
x_min = 95.0 -- minimaler Eingangswert
|
|
x_max = 96.0 -- maximaler Eingangswert
|
|
x = 95.5 -- aktueller Eingangswert
|
|
|
|
d_y = 0.76 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 1.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.76 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = -72.2 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.5 -- Ergebnis (m * x + n)
|
|
]]
|
|
if lEngineRPMleft > 95.0 then
|
|
ExportScript.AF.FC_OneNeedleGauge((0.76 * lEngineRPMleft + -72.2) * 100, 100, 50)
|
|
else
|
|
ExportScript.AF.FC_OneNeedleGauge(0, 100, 50)
|
|
end
|
|
|
|
-- Engine Exhaust Nozzle Position Indicator Right, very imprecise
|
|
if lEngineRPMright > 95.0 then
|
|
ExportScript.AF.FC_OneNeedleGauge((0.76 * lEngineRPMright + -72.2) * 100, 100, 51)
|
|
else
|
|
ExportScript.AF.FC_OneNeedleGauge(0, 100, 51)
|
|
end
|
|
|
|
-- Exaust Gas Temperature Left
|
|
ExportScript.AF.FC_F15C_ExaustGasTemp(lEngineTempLeft - 1.4, 52, 53, 54, 55)
|
|
|
|
-- Exaust Gas Temperature Right
|
|
ExportScript.AF.FC_F15C_ExaustGasTemp(lEngineTempRight - 1.4, 56, 57, 58, 59)
|
|
|
|
-- Fuel Flow Left
|
|
ExportScript.AF.FC_OneNeedleGauge3Digits(((lEngineFuelConsumptionLeft * 2.2046223302272) * 3600), 10000, 2, 60, 61, 62, 63)
|
|
|
|
-- Fuel Flow Right
|
|
ExportScript.AF.FC_OneNeedleGauge3Digits(((lEngineFuelConsumptionRight * 2.2046223302272) * 3600), 10000, 2, 64, 65, 66, 67)
|
|
|
|
-- Hydraulic Pressure Left
|
|
ExportScript.AF.FC_OneNeedleGauge(lEngineHydraulicPressureLeft, 100, 68)
|
|
|
|
-- Hydraulic Pressure Right
|
|
ExportScript.AF.FC_OneNeedleGauge(lEngineHydraulicPressureRight, 100, 69)
|
|
|
|
-- AOA
|
|
--FC_US_AOA(16)
|
|
--ExportScript.Tools.WriteToLog('lAoA 1: '..ExportScript.Tools.dump(lAoA))
|
|
--local lAoATmp = math.deg(lAoA) + 10
|
|
--ExportScript.Tools.WriteToLog('lAoA 2: '..ExportScript.Tools.dump(lAoATmp))
|
|
--[[
|
|
y_min = 0.0 -- minimaler Ausgabewert
|
|
y_max = 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = 45.0 -- maximaler Eingangswert
|
|
x = 12.6 -- aktueller Eingangswert
|
|
|
|
d_y = 1.0 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 45.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.02222222222222222222222222222222 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.0000000000000000000000000000001 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.2800000000000000000000000000001 -- Ergebnis (m * x + n)
|
|
]]
|
|
--lAoATmp = 0.02222222222222222222222222222222 * lAoATmp + 0.0000000000000000000000000000001
|
|
--SendData(16, string.format("%.4f;%d", lAoATmp, 0) )
|
|
|
|
if lAoA > 0.0 then -- positive AOA
|
|
--[[
|
|
y_min = 0.33 -- minimaler Ausgabewert
|
|
y_max = 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = 30.0 -- maximaler Eingangswert
|
|
x = 12.6 -- aktueller Eingangswert
|
|
|
|
d_y = 0.67 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 30.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.02233333333333333333333333333333 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.33 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.6114 -- Ergebnis (m * x + n)
|
|
]]
|
|
lAoA = 0.02228571428571428571428571428571 * lAoA + 0.33
|
|
else
|
|
--[[
|
|
y_min = 0.0 -- minimaler Ausgabewert
|
|
y_max = 0.33 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = -10.0 -- maximaler Eingangswert
|
|
x = -2.6 -- aktueller Eingangswert
|
|
|
|
d_y = 0.33 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = -10.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = -0.033 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.0 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.2442 -- Ergebnis 0.33 - (m * x + n)
|
|
]]
|
|
--lAoA = 0.22 - (-0.022 * lAoA)
|
|
lAoA = 0.33 - (-0.033 * lAoA)
|
|
end
|
|
ExportScript.Tools.SendData(70, string.format("%.4f", lAoA))
|
|
ExportScript.Tools.SendData(0, 0) -- AOA Off Flag off
|
|
-- AOA End
|
|
|
|
-- Hydraulic Pressure Util, no value but similar to Engine Hydraulic Pressure (left or right)
|
|
local lEngineHydraulicPressure = lEngineHydraulicPressureLeft
|
|
lEngineHydraulicPressure = lEngineHydraulicPressureRight > lEngineHydraulicPressureLeft and lEngineHydraulicPressureRight or lEngineHydraulicPressureLeft
|
|
ExportScript.AF.FC_OneNeedleGauge(lEngineHydraulicPressure, 100, 71)
|
|
|
|
-- Standby Air Speed Indicator (IAS, Mach)
|
|
-- value has been calculated (from top)
|
|
-- IAS {0.0,1.0}
|
|
ExportScript.Tools.SendData(72, string.format("%.4f", lIAS))
|
|
-- Standby Air Speed Indicator End
|
|
|
|
-- AccelerationUnits
|
|
--ExportScript.Tools.WriteToLog("lAccelerationUnits: "..ExportScript.Tools.dump(lAccelerationUnits))
|
|
if lAccelerationUnits > 0.0 then -- positive AccelerationUnits
|
|
--[[
|
|
y_min = 0.333 -- minimaler Ausgabewert
|
|
y_max = 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = 10.0 -- maximaler Eingangswert
|
|
x = 2.6 -- aktueller Eingangswert
|
|
|
|
d_y = 0.667 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 10.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.0667 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.333 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.50642 -- Ergebnis (m * x + n)
|
|
]]
|
|
lAccelerationUnits = 0.0667 * lAccelerationUnits + 0.333
|
|
else
|
|
--[[
|
|
y_min = 0.0 -- minimaler Ausgabewert
|
|
y_max = 0.333 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = -5.0 -- maximaler Eingangswert
|
|
x = -2.6 -- aktueller Eingangswert
|
|
|
|
d_y = 0.333 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = -5.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = -0.0666 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.666 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.17316 -- Ergebnis 0.666 - (m * x + n)
|
|
]]
|
|
lAccelerationUnits = 0.666 - (-0.0666 * lAccelerationUnits + 0.666)
|
|
end
|
|
ExportScript.Tools.SendData(73, string.format("%.4f", lAccelerationUnits))
|
|
-- AccelerationUnits End
|
|
|
|
-- Standby Barometrisic Altimeter
|
|
--lAltBarTmp = lAltBar - (9.5 * (760 - lBasicAtmospherePressure)) -- 9.5 m per 1mmHg difference, has been calculated
|
|
lAltBarTmp = lAltBar * 3.28084 -- meter to feeds
|
|
|
|
local AltBar_kilofeet_needle = 0
|
|
local AltBar_hektofeet_needle = 0
|
|
local AltBar_dafeet_needle = 0
|
|
|
|
if lAltBarTmp > 1000 then
|
|
AltBar_kilofeet_needle = lAltBarTmp / 10000
|
|
end
|
|
if lAltBarTmp > 10000 then
|
|
AltBar_hektofeet_needle = (lAltBarTmp - (ExportScript.Tools.round(lAltBarTmp / 10000, 0, "floor") * 10000)) / 1000
|
|
else
|
|
AltBar_hektofeet_needle = lAltBarTmp / 1000
|
|
end
|
|
if lAltBarTmp > 1000 then
|
|
AltBar_dafeet_needle = (lAltBarTmp - (ExportScript.Tools.round(lAltBarTmp / 1000, 0, "floor") * 1000)) / 100
|
|
else
|
|
AltBar_dafeet_needle = lAltBarTmp / 100
|
|
end
|
|
--[[
|
|
y_min = 0.0 -- minimaler Ausgabewert
|
|
y_max = 1.0 -- maximaler Ausgabewert
|
|
x_min = 0.0 -- minimaler Eingangswert
|
|
x_max = 10.0 -- maximaler Eingangswert
|
|
x = 2.5 -- aktueller Eingangswert
|
|
|
|
d_y = 1.0 -- Delta Ausgabewerte (y_max - y_min)
|
|
d_x = 10.0 -- Delta Eingangswerte (x_max - x_min)
|
|
m = 0.1 -- Steigung der linearen Funktion (d_y / d_x)
|
|
n = 0.0 -- Schnittpunkt der Funktion mit y-Achse (y_max - m * x_max)
|
|
|
|
y = 0.25 -- Ergebnis (m * x + n)
|
|
]]
|
|
AltBar_kilofeet_needle = 0.1 * AltBar_kilofeet_needle
|
|
AltBar_hektofeet_needle = 0.1 * AltBar_hektofeet_needle
|
|
AltBar_dafeet_needle = 0.1 * AltBar_dafeet_needle
|
|
-- AltBar_kilofeet_needle {0.0,1.0}
|
|
-- AltBar_hektofeet_needle {0.0,1.0}
|
|
-- AltBar_dafeet_needle {0.0,1.0}
|
|
ExportScript.Tools.SendData(41, string.format("%.4f", AltBar_kilofeet_needle))
|
|
ExportScript.Tools.SendData(42, string.format("%.4f", AltBar_hektofeet_needle))
|
|
ExportScript.Tools.SendData(43, string.format("%.4f", AltBar_dafeet_needle))
|
|
-- Standby Barometrisic Altimeter end
|
|
|
|
ExportScript.AF.FlareChaff(lFunctionTyp)
|
|
else
|
|
ExportScript.Tools.WriteToLog("Unknown FC Error, no LoGetSelfData.")
|
|
end
|
|
end
|
|
|
|
function ExportScript.ProcessDACConfigHighImportance()
|
|
local lFunctionTyp = "DAC" -- function type for shared function
|
|
|
|
-- your script
|
|
ExportScript.AF.FlareChaff(lFunctionTyp)
|
|
end
|
|
|
|
function ExportScript.ProcessIkarusFCLowImportanceConfig()
|
|
local lFunctionTyp = "Ikarus" -- function type for shared function
|
|
|
|
-- Gear Lamps
|
|
ExportScript.AF.MechanicalDevicesIndicator(lFunctionTyp)
|
|
ExportScript.AF.FuelQuantityIndicator(lFunctionTyp)
|
|
|
|
ExportScript.AF.SightingSystem(lFunctionTyp)
|
|
ExportScript.AF.StatusLamp(lFunctionTyp)
|
|
ExportScript.AF.RWRlite(lFunctionTyp)
|
|
end
|
|
|
|
function ExportScript.ProcessDACConfigLowImportance()
|
|
local lFunctionTyp = "DAC" -- function type for shared function
|
|
|
|
ExportScript.AF.MechanicalDevicesIndicator(lFunctionTyp)
|
|
ExportScript.AF.FuelQuantityIndicator(lFunctionTyp)
|
|
|
|
ExportScript.AF.SightingSystem(lFunctionTyp)
|
|
ExportScript.AF.StatusLamp(lFunctionTyp)
|
|
ExportScript.AF.WeaponStatusPanel(lFunctionTyp)
|
|
ExportScript.AF.RWRlite(lFunctionTyp)
|
|
end
|
|
|
|
-----------------------------
|
|
-- Custom functions --
|
|
-----------------------------
|
|
|
|
function ExportScript.AF.SightingSystem(FunctionTyp)
|
|
local lSightingSystemInfo = LoGetSightingSystemInfo()
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
if lSightingSystemInfo == nil then
|
|
return
|
|
end
|
|
--ExportScript.Tools.WriteToLog('lSightingSystemInfo: '..ExportScript.Tools.dump(lSightingSystemInfo)9
|
|
--[[
|
|
[PRF] = {
|
|
[selection] = string: "ILV"
|
|
[current] = string: "MED"
|
|
}
|
|
[laser_on] = boolean: "false"
|
|
[scale] = {
|
|
[azimuth] = number: "0.52359873056412"
|
|
[distance] = number: "10000"
|
|
}
|
|
[radar_on] = boolean: "false"
|
|
[optical_system_on] = boolean: "false"
|
|
[LaunchAuthorized] = boolean: "false"
|
|
[ECM_on] = boolean: "false"
|
|
[Manufacturer] = string: "RUS"
|
|
[TDC] = {
|
|
[y] = number: "0"
|
|
[x] = number: "0"
|
|
}
|
|
[ScanZone] = {
|
|
[coverage_H] = {
|
|
[min] = number: "0"
|
|
[max] = number: "20000"
|
|
}
|
|
[size] = {
|
|
[azimuth] = number: "1.0471974611282"
|
|
[elevation] = number: "0.17453290522099"
|
|
}
|
|
[position] = {
|
|
[exceeding_manual] = number: "0"
|
|
[distance_manual] = number: "0"
|
|
[azimuth] = number: "0"
|
|
[elevation] = number: "0"
|
|
}
|
|
}
|
|
]]
|
|
if ExportScript.Config.IkarusExport and lFunctionTyp == "Ikarus" then
|
|
ExportScript.Tools.SendData(600, lSightingSystemInfo.ECM_on == true and 1 or 0 )
|
|
--ExportScript.Tools.SendData(601, lSightingSystemInfo.laser_on == true and 1 or 0 )
|
|
--ExportScript.Tools.SendData(602, lSightingSystemInfo.optical_system_on == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(603, lSightingSystemInfo.LaunchAuthorized == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(604, lSightingSystemInfo.radar_on == true and 1 or 0 )
|
|
end
|
|
|
|
if ExportScript.Config.DACExport and lFunctionTyp == "DAC" then
|
|
ExportScript.Tools.SendDataDAC(600, lSightingSystemInfo.ECM_on == true and 1 or 0 )
|
|
--ExportScript.Tools.SendDataDAC(601, lSightingSystemInfo.laser_on == true and 1 or 0 )
|
|
--ExportScript.Tools.SendDataDAC(602, lSightingSystemInfo.optical_system_on == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC(603, lSightingSystemInfo.LaunchAuthorized == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC(604, lSightingSystemInfo.radar_on == true and 1 or 0 )
|
|
end
|
|
end
|
|
|
|
function ExportScript.AF.FuelQuantityIndicator(FunctionTyp)
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
-- Fuel quantity shows the fuel remaining in all tanks
|
|
local lEngineInfo = LoGetEngineInfo()
|
|
if lEngineInfo == nil then
|
|
return
|
|
end
|
|
--ExportScript.Tools.WriteToLog('lEngineInfo: '..ExportScript.Tools.dump(lEngineInfo))
|
|
--[[
|
|
[fuel_external] = number: "0"
|
|
[Temperature] = {
|
|
[left] = number: "626.99444580078"
|
|
[right] = number: "626.99444580078"
|
|
}
|
|
[RPM] = {
|
|
[left] = number: "87.453765869141"
|
|
[right] = number: "87.453758239746"
|
|
}
|
|
[FuelConsumption] = {
|
|
[left] = number: "0.1500396137767"
|
|
[right] = number: "0.1500396137767"
|
|
}
|
|
[fuel_internal] = number: "3773.2749023438"
|
|
[EngineStart] = {
|
|
[left] = number: "0"
|
|
[right] = number: "0"
|
|
}
|
|
[HydraulicPressure] = {
|
|
[left] = number: "210"
|
|
[right] = number: "210"
|
|
}
|
|
lPayloadInfo.Stations[8].CLSID == E8D4652F-FD48-45B7-BA5B-2AE05BB5A9CF -- ext 800l Fuel Tank
|
|
]]
|
|
|
|
local lEngineFuelTotal = (lEngineInfo.fuel_internal + lEngineInfo.fuel_external) * 2.2046223302272 -- kg to lbs
|
|
local lFuelNeedle = lEngineFuelTotal / 12000 -- 12000 = scala
|
|
lFuelNeedle = (lFuelNeedle > 1.0 and 1.0 or lFuelNeedle)
|
|
|
|
local lFuelCounterLeft = 1200
|
|
local lFuelCounterRight = 1500
|
|
|
|
if lEngineInfo.RPM.left > 0 then
|
|
if lEngineInfo.RPM.right > 0 then
|
|
if lEngineFuelTotal < 2700 then
|
|
lFuelCounterLeft = lEngineFuelTotal * 0.44444444444444444444444444444444
|
|
end
|
|
else
|
|
if lEngineFuelTotal < 1200 then
|
|
lFuelCounterLeft = lEngineFuelTotal
|
|
end
|
|
end
|
|
end
|
|
if lEngineInfo.RPM.right > 0 then
|
|
if lEngineInfo.RPM.left > 0 then
|
|
if lEngineFuelTotal < 2700 then
|
|
lFuelCounterRight = lEngineFuelTotal * 0.55555555555555555555555555555556
|
|
end
|
|
else
|
|
if lEngineFuelTotal < 1500 then
|
|
lFuelCounterRight = lEngineFuelTotal
|
|
end
|
|
end
|
|
end
|
|
|
|
if ExportScript.Config.IkarusExport and lFunctionTyp == "Ikarus" then
|
|
ExportScript.Tools.SendData(300, string.format("%d", lFuelCounterLeft)) -- Left Fuel
|
|
ExportScript.Tools.SendData(301, string.format("%d", lFuelCounterRight)) -- Right Fuel
|
|
ExportScript.Tools.SendData(302, string.format("%d", lEngineFuelTotal)) -- Total Fuel
|
|
ExportScript.Tools.SendData(303, string.format("%.4f", lFuelNeedle)) -- Needle
|
|
end
|
|
|
|
if ExportScript.Config.DACExport and lFunctionTyp == "DAC" then
|
|
ExportScript.Tools.SendDataDAC(300, string.format("%d", lFuelCounterLeft)) -- Left Fuel
|
|
ExportScript.Tools.SendDataDAC(301, string.format("%d", lFuelCounterRight)) -- Right Fuel
|
|
ExportScript.Tools.SendDataDAC(302, string.format("%d", lEngineFuelTotal)) -- Total Fuel
|
|
end
|
|
end
|
|
|
|
function ExportScript.AF.StatusLamp(FunctionTyp)
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
local lMCPState = LoGetMCPState() -- Warning Lights
|
|
if lMCPState == nil then
|
|
return
|
|
end
|
|
--ExportScript.Tools.WriteToLog('lMCPState: '..ExportScript.Tools.dump(lMCPState))
|
|
--[[
|
|
[RightTailPlaneFailure] = boolean: "false"
|
|
[EOSFailure] = boolean: "false"
|
|
[ECMFailure] = boolean: "false"
|
|
[RightAileronFailure] = boolean: "false"
|
|
[MasterWarning] = boolean: "false"
|
|
[RightEngineFailure] = boolean: "false"
|
|
[CannonFailure] = boolean: "false"
|
|
[MLWSFailure] = boolean: "false"
|
|
[ACSFailure] = boolean: "false"
|
|
[RadarFailure] = boolean: "false"
|
|
[HelmetFailure] = boolean: "false"
|
|
[HUDFailure] = boolean: "false"
|
|
[LeftMainPumpFailure] = boolean: "false"
|
|
[RightWingPumpFailure] = boolean: "false"
|
|
[LeftWingPumpFailure] = boolean: "false"
|
|
[MFDFailure] = boolean: "false"
|
|
[RWSFailure] = boolean: "false"
|
|
[GearFailure] = boolean: "false"
|
|
[HydraulicsFailure] = boolean: "false"
|
|
[AutopilotFailure] = boolean: "true"
|
|
[FuelTankDamage] = boolean: "false"
|
|
[LeftAileronFailure] = boolean: "false"
|
|
[CanopyOpen] = boolean: "false"
|
|
[RightMainPumpFailure] = boolean: "false"
|
|
[StallSignalization] = boolean: "false"
|
|
[LeftEngineFailure] = boolean: "false"
|
|
[AutopilotOn] = boolean: "false"
|
|
[LeftTailPlaneFailure] = boolean: "false"
|
|
]]
|
|
if ExportScript.Config.IkarusExport and lFunctionTyp == "Ikarus" then
|
|
ExportScript.Tools.SendData(700, lMCPState.LeftTailPlaneFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(701, lMCPState.RightTailPlaneFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(702, lMCPState.MasterWarning == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(703, lMCPState.LeftEngineFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(704, lMCPState.RightEngineFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(705, lMCPState.LeftAileronFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(706, lMCPState.RightAileronFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(707, lMCPState.LeftMainPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(708, lMCPState.RightMainPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(709, lMCPState.LeftWingPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(710, lMCPState.RightWingPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(711, lMCPState.EOSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(712, lMCPState.ECMFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(713, lMCPState.CannonFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(714, lMCPState.MLWSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(715, lMCPState.ACSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(716, lMCPState.RadarFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(717, lMCPState.HelmetFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(718, lMCPState.HUDFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(719, lMCPState.MFDFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(720, lMCPState.RWSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(721, lMCPState.GearFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(722, lMCPState.HydraulicsFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(723, lMCPState.AutopilotFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(724, lMCPState.FuelTankDamage == true and 1 or 0 )
|
|
--ExportScript.Tools.SendData(725, lMCPState.CanopyOpen == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(726, lMCPState.StallSignalization == true and 1 or 0 )
|
|
ExportScript.Tools.SendData(727, lMCPState.AutopilotOn == true and 1 or 0 )
|
|
|
|
local lEngineInfo = LoGetEngineInfo()
|
|
if lEngineInfo ~= nil then
|
|
--ExportScript.Tools.WriteToLog('lEngineInfo: '..ExportScript.Tools.dump(lEngineInfo))
|
|
|
|
ExportScript.Tools.SendData(728, lEngineInfo.EngineStart.left ) -- lamp start left engine 1 (0|1)
|
|
ExportScript.Tools.SendData(729, lEngineInfo.EngineStart.right ) -- lamp start right engine 1 (0|1)
|
|
|
|
ExportScript.Tools.SendData(730, lEngineInfo.RPM.left < 45 and 1 or 0 ) -- lamp generator left engine 1 (0|1)
|
|
ExportScript.Tools.SendData(731, lEngineInfo.RPM.right < 45 and 1 or 0 ) -- lamp generator right engine 1 (0|1)
|
|
end
|
|
|
|
end
|
|
|
|
if ExportScript.Config.DACExport and lFunctionTyp == "DAC" then
|
|
ExportScript.Tools.SendDataDAC("700", lMCPState.LeftTailPlaneFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("701", lMCPState.RightTailPlaneFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("702", lMCPState.MasterWarning == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("703", lMCPState.LeftEngineFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("704", lMCPState.RightEngineFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("705", lMCPState.LeftAileronFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("706", lMCPState.RightAileronFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("707", lMCPState.LeftMainPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("708", lMCPState.RightMainPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("709", lMCPState.LeftWingPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("710", lMCPState.RightWingPumpFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("711", lMCPState.EOSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("712", lMCPState.ECMFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("713", lMCPState.CannonFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("714", lMCPState.MLWSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("715", lMCPState.ACSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("716", lMCPState.RadarFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("717", lMCPState.HelmetFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("718", lMCPState.HUDFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("719", lMCPState.MFDFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("720", lMCPState.RWSFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("721", lMCPState.GearFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("722", lMCPState.HydraulicsFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("723", lMCPState.AutopilotFailure == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("724", lMCPState.FuelTankDamage == true and 1 or 0 )
|
|
--ExportScript.Tools.SendDataDAC("725", lMCPState.CanopyOpen == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("726", lMCPState.StallSignalization == true and 1 or 0 )
|
|
ExportScript.Tools.SendDataDAC("727", lMCPState.AutopilotOn == true and 1 or 0 )
|
|
|
|
local lEngineInfo = LoGetEngineInfo()
|
|
if lEngineInfo ~= nil then
|
|
--ExportScript.Tools.WriteToLog('lEngineInfo: '..ExportScript.Tools.dump(lEngineInfo))
|
|
ExportScript.Tools.SendDataDAC("728", lEngineInfo.EngineStart.left ) -- lamp start left engine 1 (0|1)
|
|
ExportScript.Tools.SendDataDAC("729", lEngineInfo.EngineStart.right ) -- lamp start right engine 1 (0|1)
|
|
|
|
ExportScript.Tools.SendDataDAC("730", lEngineInfo.RPM.left < 45 and 1 or 0 ) -- lamp generator left engine 1 (0|1)
|
|
ExportScript.Tools.SendDataDAC("731", lEngineInfo.RPM.right < 45 and 1 or 0 ) -- lamp generator right engine 1 (0|1)
|
|
end
|
|
end
|
|
end
|
|
|
|
function ExportScript.AF.FlareChaff(FunctionTyp)
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
local lSnares = LoGetSnares() -- Flare and Chaff
|
|
if lSnares == nil then
|
|
return
|
|
end
|
|
--ExportScript.Tools.WriteToLog('lSnares: '..ExportScript.Tools.dump(lSnares))
|
|
|
|
--[chaff] = number: "30"
|
|
--[flare] = number: "30"
|
|
|
|
if ExportScript.AF.maxChaff == nil then
|
|
ExportScript.AF.maxChaff = lSnares.chaff
|
|
ExportScript.AF.tmpChaff = ExportScript.AF.maxChaff
|
|
end
|
|
if ExportScript.AF.maxFlare == nil then
|
|
ExportScript.AF.maxFlare = lSnares.flare
|
|
ExportScript.AF.tmpFlare = ExportScript.AF.maxFlare
|
|
end
|
|
if ExportScript.AF.timerChaff == nil then
|
|
ExportScript.AF.timerChaff = 0
|
|
ExportScript.AF.timerChaffCounter = 3
|
|
end
|
|
if ExportScript.AF.timerFlare == nil then
|
|
ExportScript.AF.timerFlare = 0
|
|
ExportScript.AF.timerFlareCounter = 3
|
|
end
|
|
local lblinkChaff = 0
|
|
local lblinkFlare = 0
|
|
local ltmp = 0
|
|
|
|
if ExportScript.AF.tmpChaff == 0 then
|
|
lblinkChaff = 1
|
|
end
|
|
if ExportScript.AF.tmpFlare == 0 then
|
|
lblinkFlare = 1
|
|
end
|
|
|
|
if lSnares.chaff < ExportScript.AF.tmpChaff then
|
|
--ExportScript.Tools.WriteToLog('Chaff: '..ExportScript.Tools.dump(lSnares.chaff)..', ExportScript.AF.tmpChaff:'..ExportScript.Tools.dump(ExportScript.AF.tmpChaff))
|
|
ExportScript.AF.tmpChaff = lSnares.chaff
|
|
--ExportScript.AF.timerChaff = os.time()
|
|
ExportScript.AF.timerChaff = os.clock()
|
|
ExportScript.Tools.WriteToLog('Chaff ausgeworfen, Zeit: '..ExportScript.Tools.dump(ExportScript.AF.timerChaff))
|
|
ExportScript.AF.timerChaffCounter = 3
|
|
end
|
|
if lSnares.flare < ExportScript.AF.tmpFlare then
|
|
--ExportScript.Tools.WriteToLog('Flare: '..ExportScript.Tools.dump(lSnares.flare)..', ExportScript.AF.tmpFlare:'..ExportScript.Tools.dump(ExportScript.AF.tmpFlare))
|
|
ExportScript.AF.tmpFlare = lSnares.flare
|
|
--ExportScript.AF.timerFlare = os.time()
|
|
ExportScript.AF.timerFlare = os.clock()
|
|
ExportScript.Tools.WriteToLog('Flare ausgeworfen, Zeit: '..ExportScript.Tools.dump(ExportScript.AF.timerFlare))
|
|
ExportScript.AF.timerFlareCounter = 3
|
|
end
|
|
|
|
if lblinkChaff == 0 and ExportScript.AF.timerChaff > 0.0 and ExportScript.AF.timerChaffCounter > 0 then
|
|
--local ldiffTimer = os.difftime (os.time(), ExportScript.AF.timerChaff)
|
|
local ldiffTimer = os.clock() - ExportScript.AF.timerChaff
|
|
ltmp, ldiffTimer = math.modf(ldiffTimer)
|
|
--ExportScript.Tools.WriteToLog('Zeit: '..ExportScript.AF.timerChaff..', Counter: '..ExportScript.AF.timerChaffCounter)
|
|
--ExportScript.Tools.WriteToLog('Zeit Diff: '..ldiffTimer)
|
|
if ExportScript.AF.timerChaffCounter == 1 and ldiffTimer > 0.9 then
|
|
--ExportScript.Tools.WriteToLog('0')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = 3
|
|
ExportScript.AF.timerChaff = 0.0
|
|
elseif ExportScript.AF.timerChaffCounter == 1 and ldiffTimer > 0.8 then
|
|
--ExportScript.Tools.WriteToLog('1')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 2 and ldiffTimer > 0.6 then
|
|
--ExportScript.Tools.WriteToLog('2')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 2 and ldiffTimer > 0.4 then
|
|
--ExportScript.Tools.WriteToLog('3')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 3 and ldiffTimer > 0.2 then
|
|
--ExportScript.Tools.WriteToLog('4')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 3 and ldiffTimer > 0.0 then
|
|
--ExportScript.Tools.WriteToLog('5')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ldiffTimer > 0.95 then
|
|
--ExportScript.Tools.WriteToLog('else')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = 3
|
|
ExportScript.AF.timerChaff = 0.0
|
|
end
|
|
|
|
--[[
|
|
if ExportScript.AF.timerChaffCounter == 3 and ldiffTimer < 0.5 then
|
|
ExportScript.Tools.WriteToLog('0')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 3 and ldiffTimer < 1.0 then
|
|
ExportScript.Tools.WriteToLog('1')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 2 and ldiffTimer < 1.5 then
|
|
ExportScript.Tools.WriteToLog('2')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 2 and ldiffTimer < 2.0 then
|
|
ExportScript.Tools.WriteToLog('3')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 1 and ldiffTimer < 2.5 then
|
|
ExportScript.Tools.WriteToLog('4')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 1 and ldiffTimer < 3.0 then
|
|
ExportScript.Tools.WriteToLog('5')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 0 or ldiffTimer > 3.0 then
|
|
ExportScript.Tools.WriteToLog('else')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = 3
|
|
ExportScript.AF.timerChaff = 0
|
|
end]]
|
|
--[[
|
|
if ExportScript.AF.timerChaffCounter == 1 and ldiffTimer == 5 then
|
|
ExportScript.Tools.WriteToLog('0')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 1 and ldiffTimer == 4 then
|
|
ExportScript.Tools.WriteToLog('1')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 2 and ldiffTimer == 3 then
|
|
ExportScript.Tools.WriteToLog('2')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 2 and ldiffTimer == 2 then
|
|
ExportScript.Tools.WriteToLog('3')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 3 and ldiffTimer == 1 then
|
|
ExportScript.Tools.WriteToLog('4')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 3 and ldiffTimer == 0 then
|
|
ExportScript.Tools.WriteToLog('5')
|
|
lblinkChaff = 1
|
|
--ExportScript.AF.timerChaffCounter = ExportScript.AF.timerChaffCounter - 1
|
|
elseif ExportScript.AF.timerChaffCounter == 0 or ldiffTimer > 5 then
|
|
ExportScript.Tools.WriteToLog('else')
|
|
lblinkChaff = 0
|
|
ExportScript.AF.timerChaffCounter = 3
|
|
ExportScript.AF.timerChaff = 0
|
|
end]]
|
|
end
|
|
|
|
if lblinkFlare == 0 and ExportScript.AF.timerFlare > 0.0 and ExportScript.AF.timerFlareCounter > 0 then
|
|
--local ldiffTimer = os.difftime (os.time(), ExportScript.AF.timerFlare)
|
|
local ldiffTimer = os.clock() - ExportScript.AF.timerFlare
|
|
ltmp, ldiffTimer = math.modf(ldiffTimer)
|
|
--ExportScript.Tools.WriteToLog('Zeit: '..ExportScript.AF.timerFlare..', Counter: '..ExportScript.AF.timerFlareCounter)
|
|
--ExportScript.Tools.WriteToLog('Zeit Diff: '..ldiffTimer)
|
|
if ExportScript.AF.timerFlareCounter == 1 and ldiffTimer > 0.9 then
|
|
--ExportScript.Tools.WriteToLog('0')
|
|
lblinkFlare = 0
|
|
ExportScript.AF.timerFlareCounter = 3
|
|
ExportScript.AF.timerFlare = 0.0
|
|
elseif ExportScript.AF.timerFlareCounter == 1 and ldiffTimer > 0.8 then
|
|
--ExportScript.Tools.WriteToLog('1')
|
|
lblinkFlare = 1
|
|
--ExportScript.AF.timerFlareCounter = ExportScript.AF.timerFlareCounter - 1
|
|
elseif ExportScript.AF.timerFlareCounter == 2 and ldiffTimer > 0.6 then
|
|
--ExportScript.Tools.WriteToLog('2')
|
|
lblinkFlare = 0
|
|
ExportScript.AF.timerFlareCounter = ExportScript.AF.timerFlareCounter - 1
|
|
elseif ExportScript.AF.timerFlareCounter == 2 and ldiffTimer > 0.4 then
|
|
--ExportScript.Tools.WriteToLog('3')
|
|
lblinkFlare = 1
|
|
--ExportScript.AF.timerFlareCounter = ExportScript.AF.timerFlareCounter - 1
|
|
elseif ExportScript.AF.timerFlareCounter == 3 and ldiffTimer > 0.2 then
|
|
--ExportScript.Tools.WriteToLog('4')
|
|
lblinkFlare = 0
|
|
ExportScript.AF.timerFlareCounter = ExportScript.AF.timerFlareCounter - 1
|
|
elseif ExportScript.AF.timerFlareCounter == 3 and ldiffTimer > 0.0 then
|
|
--ExportScript.Tools.WriteToLog('5')
|
|
lblinkFlare = 1
|
|
--ExportScript.AF.timerFlareCounter = ExportScript.AF.timerFlareCounter - 1
|
|
elseif ldiffTimer > 0.95 then
|
|
--ExportScript.Tools.WriteToLog('else')
|
|
lblinkFlare = 0
|
|
ExportScript.AF.timerFlareCounter = 3
|
|
ExportScript.AF.timerFlare = 0.0
|
|
end
|
|
end
|
|
|
|
--ExportScript.Tools.WriteToLog('lblinkChaff: '..lblinkChaff)
|
|
|
|
if ExportScript.Config.IkarusExport and lFunctionTyp == "Ikarus" then
|
|
ExportScript.Tools.SendData(800, lSnares.chaff ) -- display chaff
|
|
ExportScript.Tools.SendData(801, lSnares.flare ) -- display flare
|
|
ExportScript.Tools.SendData(802, lblinkChaff ) -- blink chaff active/aktive empty chaff
|
|
ExportScript.Tools.SendData(803, lblinkFlare ) -- blink flare active/aktive empty flare
|
|
ExportScript.Tools.SendData(804, ExportScript.AF.tmpChaff < 20 and 1 or 0 ) -- minimum chaff lamp
|
|
ExportScript.Tools.SendData(805, ExportScript.AF.tmpFlare < 10 and 1 or 0 ) -- minimum flare lamp
|
|
end
|
|
if ExportScript.Config.DACExport and lFunctionTyp == "DAC" then
|
|
ExportScript.Tools.SendDataDAC(800, lSnares.chaff ) -- display chaff
|
|
ExportScript.Tools.SendDataDAC(801, lSnares.flare ) -- display flare
|
|
ExportScript.Tools.SendDataDAC(802, lblinkChaff ) -- blink chaff active/aktive empty chaff
|
|
ExportScript.Tools.SendDataDAC(803, lblinkFlare ) -- blink flare active/aktive empty flare
|
|
ExportScript.Tools.SendDataDAC(804, ExportScript.AF.tmpChaff < 20 and 1 or 0 ) -- minimum chaff lamp
|
|
ExportScript.Tools.SendDataDAC(805, ExportScript.AF.tmpFlare < 10 and 1 or 0 ) -- minimum flare lamp
|
|
end
|
|
end
|
|
|
|
function ExportScript.AF.MechanicalDevicesIndicator(FunctionTyp)
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
-- The mechanical devices indicator shows the position of the landing gear, flaps, leading edge flaps and airbrake
|
|
local lMechInfo = LoGetMechInfo() -- mechanical components, e.g. Flaps, Wheelbrakes,...
|
|
if lMechInfo == nil then
|
|
return
|
|
end
|
|
local lTrueAirSpeed = LoGetTrueAirSpeed()
|
|
if lTrueAirSpeed == nil then
|
|
lTrueAirSpeed = 0
|
|
end
|
|
--ExportScript.Tools.WriteToLog('ExportScript.AF.MechanicalDevicesIndicator: '..ExportScript.Tools.dump(lMechInfo))
|
|
--[[
|
|
[hook] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[parachute] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[controlsurfaces] = {
|
|
[eleron] = {
|
|
[left] = number: "0"
|
|
[right] = number: "-0.21084336936474"
|
|
}
|
|
[elevator] = {
|
|
[left] = number: "-0"
|
|
[right] = number: "-0"
|
|
}
|
|
[rudder] = {
|
|
[left] = number: "0"
|
|
[right] = number: "0"
|
|
}
|
|
}
|
|
[airintake] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[canopy] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[refuelingboom] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[wing] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[noseflap] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[gear] = {
|
|
[value] = number: "0"
|
|
[nose] = {
|
|
[rod] = number: "0"
|
|
}
|
|
[main] = {
|
|
[left] = {
|
|
[rod] = number: "0"
|
|
}
|
|
[right] = {
|
|
[rod] = number: "0"
|
|
}
|
|
}
|
|
[status] = number: "0"
|
|
}
|
|
[speedbrakes] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[wheelbrakes] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}
|
|
[flaps] = {
|
|
[status] = number: "0"
|
|
[value] = number: "0"
|
|
}]]
|
|
|
|
if ExportScript.Config.IkarusExport and lFunctionTyp == "Ikarus" then
|
|
ExportScript.Tools.SendData(501, (lMechInfo.gear.value > 0.85 and 1 or 0) ) -- nose gear
|
|
ExportScript.Tools.SendData(502, (lMechInfo.gear.value > 0.95 and 1 or 0) ) -- left gear
|
|
ExportScript.Tools.SendData(503, (lMechInfo.gear.value == 1 and 1 or 0) ) -- right gear
|
|
|
|
ExportScript.Tools.SendData(510, (lMechInfo.speedbrakes.value > 0.1 and 1 or 0) ) -- speedbreakes on > 0.1 (0 - 1)
|
|
|
|
ExportScript.Tools.SendData(531, ((lMechInfo.flaps.value > 0.25 and lMechInfo.flaps.value < 0.93) and 1 or 0) ) -- flap 1. position
|
|
ExportScript.Tools.SendData(532, (lMechInfo.flaps.value > 0.93 and 1 or 0) ) -- flap 2. position
|
|
ExportScript.Tools.SendData(533, ((lMechInfo.flaps.value > 0.93 and lTrueAirSpeed > 340) and 1 or 0) ) -- Speed Warning for Flaps, same light as gear warning light, but blinking light
|
|
ExportScript.Tools.SendData(534, (lMechInfo.gear.value > 0.5 and 1 or 0) ) -- Intake FOD shields
|
|
|
|
ExportScript.Tools.SendData(725, (lMechInfo.canopy.value == 1 and 1 or 0) ) -- CanopyOpen
|
|
end
|
|
|
|
if ExportScript.Config.DACExport and lFunctionTyp == "DAC" then
|
|
ExportScript.Tools.SendDataDAC(501, (lMechInfo.gear.value > 0.85 and 1 or 0) ) -- nose gear
|
|
ExportScript.Tools.SendDataDAC(502, (lMechInfo.gear.value > 0.95 and 1 or 0) ) -- left gear
|
|
ExportScript.Tools.SendDataDAC(503, (lMechInfo.gear.value == 1 and 1 or 0) ) -- right gear
|
|
|
|
ExportScript.Tools.SendDataDAC(510, (lMechInfo.speedbrakes.value > 0.1 and 1 or 0) ) -- speedbreakes on > 0.1 (0 - 1)
|
|
|
|
ExportScript.Tools.SendDataDAC(531, ((lMechInfo.flaps.value > 0.25 and lMechInfo.flaps.value < 0.93) and 1 or 0) ) -- flap 1. position
|
|
ExportScript.Tools.SendDataDAC(532, (lMechInfo.flaps.value > 0.93 and 1 or 0) ) -- flap 2. position
|
|
ExportScript.Tools.SendDataDAC(533, ((lMechInfo.flaps.value > 0.93 and lTrueAirSpeed > 340) and 1 or 0) ) -- Speed Warning for Flaps, same light as gear warning light, but blinking light
|
|
ExportScript.Tools.SendDataDAC(534, (lMechInfo.gear.value > 0.5 and 1 or 0) ) -- Intake FOD shields
|
|
|
|
ExportScript.Tools.SendDataDAC(725, (lMechInfo.canopy.value == 1 and 1 or 0) ) -- CanopyOpen
|
|
end
|
|
end
|
|
|
|
function ExportScript.AF.WeaponStatusPanel(FunctionTyp)
|
|
-- The weapon status panel, quantity and readiness of the currently selected weapon and the remaining gun ammunition are indicated.
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
ExportScript.AF.PayloadInfo = LoGetPayloadInfo()
|
|
if ExportScript.AF.PayloadInfo == nil then
|
|
return
|
|
end
|
|
--ExportScript.Tools.WriteToLog('ExportScript.AF.PayloadInfo: '..ExportScript.Tools.dump(ExportScript.AF.PayloadInfo))
|
|
--[[ exsample
|
|
[Stations] = {
|
|
[1] = {
|
|
[CLSID] = string: "{6D21ECEA-F85B-4E8D-9D51-31DC9B8AA4EF}"
|
|
[container] = boolean: "false"
|
|
[count] = number: "1"
|
|
[weapon] = {
|
|
[level3] = number: "45"
|
|
[level1] = number: "4"
|
|
[level4] = number: "25"
|
|
[level2] = number: "15"
|
|
}
|
|
}
|
|
[2] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "117"
|
|
[level2] = number: "7"
|
|
}
|
|
[count] = number: "7"
|
|
[CLSID] = string: "{69926055-0DA8-4530-9F2F-C86B157EA9F6}"
|
|
[adapter] = {
|
|
[level3] = number: "0"
|
|
[level1] = number: "0"
|
|
[level4] = number: "0"
|
|
[level2] = number: "0"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "33"
|
|
[level1] = number: "4"
|
|
[level4] = number: "147"
|
|
[level2] = number: "7"
|
|
}
|
|
}
|
|
[3] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "135"
|
|
[level2] = number: "4"
|
|
}
|
|
[count] = number: "2"
|
|
[CLSID] = string: "LAU_88_AGM_65H_2_L"
|
|
[adapter] = {
|
|
[level3] = number: "47"
|
|
[level1] = number: "4"
|
|
[level4] = number: "4"
|
|
[level2] = number: "15"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "8"
|
|
[level1] = number: "4"
|
|
[level4] = number: "138"
|
|
[level2] = number: "4"
|
|
}
|
|
}
|
|
[4] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "114"
|
|
[level2] = number: "5"
|
|
}
|
|
[count] = number: "3"
|
|
[CLSID] = string: "BRU-42_3*BDU-33"
|
|
[adapter] = {
|
|
[level3] = number: "0"
|
|
[level1] = number: "0"
|
|
[level4] = number: "0"
|
|
[level2] = number: "0"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "9"
|
|
[level1] = number: "4"
|
|
[level4] = number: "69"
|
|
[level2] = number: "5"
|
|
}
|
|
}
|
|
[5] = {
|
|
[CLSID] = string: "{5335D97A-35A5-4643-9D9B-026C75961E52}"
|
|
[container] = boolean: "false"
|
|
[count] = number: "1"
|
|
[weapon] = {
|
|
[level3] = number: "38"
|
|
[level1] = number: "4"
|
|
[level4] = number: "35"
|
|
[level2] = number: "5"
|
|
}
|
|
}
|
|
[6] = {
|
|
[CLSID] = string: "Fuel_Tank_FT600"
|
|
[container] = boolean: "false"
|
|
[count] = number: "1"
|
|
[weapon] = {
|
|
[level3] = number: "43"
|
|
[level1] = number: "1"
|
|
[level4] = number: "103"
|
|
[level2] = number: "3"
|
|
}
|
|
}
|
|
[7] = {
|
|
[CLSID] = string: "{5335D97A-35A5-4643-9D9B-026C75961E52}"
|
|
[container] = boolean: "false"
|
|
[count] = number: "1"
|
|
[weapon] = {
|
|
[level3] = number: "38"
|
|
[level1] = number: "4"
|
|
[level4] = number: "35"
|
|
[level2] = number: "5"
|
|
}
|
|
}
|
|
[8] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "114"
|
|
[level2] = number: "5"
|
|
}
|
|
[count] = number: "3"
|
|
[CLSID] = string: "BRU-42_3*BDU-33"
|
|
[adapter] = {
|
|
[level3] = number: "0"
|
|
[level1] = number: "0"
|
|
[level4] = number: "0"
|
|
[level2] = number: "0"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "9"
|
|
[level1] = number: "4"
|
|
[level4] = number: "69"
|
|
[level2] = number: "5"
|
|
}
|
|
}
|
|
[9] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "106"
|
|
[level2] = number: "4"
|
|
}
|
|
[count] = number: "2"
|
|
[CLSID] = string: "{E6A6262A-CA08-4B3D-B030-E1A993B98453}"
|
|
[adapter] = {
|
|
[level3] = number: "47"
|
|
[level1] = number: "4"
|
|
[level4] = number: "4"
|
|
[level2] = number: "15"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "8"
|
|
[level1] = number: "4"
|
|
[level4] = number: "77"
|
|
[level2] = number: "4"
|
|
}
|
|
}
|
|
[10] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "117"
|
|
[level2] = number: "7"
|
|
}
|
|
[count] = number: "7"
|
|
[CLSID] = string: "{69926055-0DA8-4530-9F2F-C86B157EA9F6}"
|
|
[adapter] = {
|
|
[level3] = number: "0"
|
|
[level1] = number: "0"
|
|
[level4] = number: "0"
|
|
[level2] = number: "0"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "33"
|
|
[level1] = number: "4"
|
|
[level4] = number: "147"
|
|
[level2] = number: "7"
|
|
}
|
|
}
|
|
[11] = {
|
|
[wstype] = {
|
|
[level3] = number: "32"
|
|
[level1] = number: "4"
|
|
[level4] = number: "50"
|
|
[level2] = number: "4"
|
|
}
|
|
[count] = number: "2"
|
|
[CLSID] = string: "{DB434044-F5D0-4F1F-9BA9-B73027E18DD3}"
|
|
[adapter] = {
|
|
[level3] = number: "0"
|
|
[level1] = number: "0"
|
|
[level4] = number: "0"
|
|
[level2] = number: "0"
|
|
}
|
|
[container] = boolean: "true"
|
|
[weapon] = {
|
|
[level3] = number: "7"
|
|
[level1] = number: "4"
|
|
[level4] = number: "22"
|
|
[level2] = number: "4"
|
|
}
|
|
}
|
|
}
|
|
[CurrentStation] = number: "0"
|
|
[Cannon] = {
|
|
[shells] = number: "1150"
|
|
}
|
|
]]
|
|
--[[
|
|
Weapon Panel
|
|
|
|
|
---------------------------------------------------
|
|
| | | | | | | | | | |
|
|
1 2 3 4 5 6 7 8 9 10 11
|
|
]]
|
|
-- Payload Info
|
|
-- weapon stations (panel) 1 (left) - 11 (right) reserved
|
|
|
|
--ExportScript.Tools.SendDataDAC("CurrentStation", ExportScript.AF.PayloadInfo.CurrentStation )
|
|
-- air-to-air missils panel 1 and 11, air combat modus, CurrentStation = 1, panel 1 and 11 on
|
|
-- wenn die Waffenstationen gleichmässig belegt sind, hat bei Auswahl CurrentStation immer den Wert der linken Station
|
|
-- bei ungleichmäßiger Belegung, hat CurrentStation immer den Wert der jeweiligen Station
|
|
-- Waffenbezeichnung als UUID, ExportScript.AF.PayloadInfo.Stations[X].CLSID
|
|
ExportScript.Tools.SendDataDAC("100", ExportScript.AF.PayloadInfo.Cannon.shells ) -- count cannon shells
|
|
ExportScript.Tools.SendDataDAC("101", (ExportScript.AF.PayloadInfo.Stations[1].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 1)
|
|
ExportScript.Tools.SendDataDAC("102", (ExportScript.AF.PayloadInfo.Stations[2].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 2)
|
|
ExportScript.Tools.SendDataDAC("103", (ExportScript.AF.PayloadInfo.Stations[3].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 3)
|
|
ExportScript.Tools.SendDataDAC("104", (ExportScript.AF.PayloadInfo.Stations[4].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 4)
|
|
ExportScript.Tools.SendDataDAC("105", (ExportScript.AF.PayloadInfo.Stations[5].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 5)
|
|
ExportScript.Tools.SendDataDAC("106", (ExportScript.AF.PayloadInfo.Stations[6].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 6, center station)
|
|
ExportScript.Tools.SendDataDAC("107", (ExportScript.AF.PayloadInfo.Stations[7].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 7)
|
|
ExportScript.Tools.SendDataDAC("108", (ExportScript.AF.PayloadInfo.Stations[8].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 8)
|
|
ExportScript.Tools.SendDataDAC("109", (ExportScript.AF.PayloadInfo.Stations[9].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 9)
|
|
ExportScript.Tools.SendDataDAC("110", (ExportScript.AF.PayloadInfo.Stations[10].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 10)
|
|
ExportScript.Tools.SendDataDAC("111", (ExportScript.AF.PayloadInfo.Stations[11].count > 0 and 1 or 0) ) -- weapon presend > 0 (panel 11)
|
|
-- weapon stations (panel) 1 (left) - 11 (right) empty
|
|
ExportScript.Tools.SendDataDAC("121", (ExportScript.AF.PayloadInfo.Stations[1].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 1)
|
|
ExportScript.Tools.SendDataDAC("122", (ExportScript.AF.PayloadInfo.Stations[2].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 2)
|
|
ExportScript.Tools.SendDataDAC("123", (ExportScript.AF.PayloadInfo.Stations[3].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 3)
|
|
ExportScript.Tools.SendDataDAC("124", (ExportScript.AF.PayloadInfo.Stations[4].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 4)
|
|
ExportScript.Tools.SendDataDAC("125", (ExportScript.AF.PayloadInfo.Stations[5].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 5)
|
|
ExportScript.Tools.SendDataDAC("126", (ExportScript.AF.PayloadInfo.Stations[6].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 6, center station)
|
|
ExportScript.Tools.SendDataDAC("127", (ExportScript.AF.PayloadInfo.Stations[7].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 7)
|
|
ExportScript.Tools.SendDataDAC("128", (ExportScript.AF.PayloadInfo.Stations[8].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 8)
|
|
ExportScript.Tools.SendDataDAC("129", (ExportScript.AF.PayloadInfo.Stations[9].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 9)
|
|
ExportScript.Tools.SendDataDAC("130", (ExportScript.AF.PayloadInfo.Stations[10].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 10)
|
|
ExportScript.Tools.SendDataDAC("131", (ExportScript.AF.PayloadInfo.Stations[11].count == 0 and 1 or 0) ) -- weapon presend > 0 (panel 11)
|
|
|
|
-- defination
|
|
if ExportScript.AF.CurrentStationTmp == nil then
|
|
ExportScript.AF.CurrentStationTmp = -1
|
|
end
|
|
|
|
if ExportScript.AF.PayloadInfo.CurrentStation > 0 and
|
|
ExportScript.AF.CurrentStationTmp ~= ExportScript.AF.PayloadInfo.CurrentStation then
|
|
ExportScript.AF.CurrentStationTmp = ExportScript.AF.PayloadInfo.CurrentStation
|
|
|
|
ExportScript.AF.TmpStationToPanel = {}
|
|
ExportScript.AF.TmpStationToPanel[1] = {Panel = 1, StationID = 101, CurrentID = 201, CurrentID2 = 221 } -- left
|
|
ExportScript.AF.TmpStationToPanel[2] = {Panel = 2, StationID = 102, CurrentID = 202, CurrentID2 = 222 }
|
|
ExportScript.AF.TmpStationToPanel[3] = {Panel = 3, StationID = 103, CurrentID = 203, CurrentID2 = 223 }
|
|
ExportScript.AF.TmpStationToPanel[4] = {Panel = 4, StationID = 104, CurrentID = 204, CurrentID2 = 224 }
|
|
ExportScript.AF.TmpStationToPanel[5] = {Panel = 5, StationID = 105, CurrentID = 205, CurrentID2 = 225 }
|
|
ExportScript.AF.TmpStationToPanel[6] = {Panel = 6, StationID = 106, CurrentID = 206, CurrentID2 = 226 }
|
|
ExportScript.AF.TmpStationToPanel[7] = {Panel = 7, StationID = 107, CurrentID = 207, CurrentID2 = 227 }
|
|
ExportScript.AF.TmpStationToPanel[8] = {Panel = 8, StationID = 108, CurrentID = 208, CurrentID2 = 228 }
|
|
ExportScript.AF.TmpStationToPanel[9] = {Panel = 9, StationID = 109, CurrentID = 209, CurrentID2 = 229 }
|
|
ExportScript.AF.TmpStationToPanel[10] = {Panel = 10, StationID = 110, CurrentID = 210, CurrentID2 = 230 }
|
|
ExportScript.AF.TmpStationToPanel[11] = {Panel = 11, StationID = 111, CurrentID = 211, CurrentID2 = 231 } -- right
|
|
|
|
ExportScript.AF.WeaponStatusPanel_Reset(201, 211)
|
|
ExportScript.AF.WeaponStatusPanel_Reset(221, 231)
|
|
|
|
ExportScript.Tools.SendDataDAC(ExportScript.AF.TmpStationToPanel[ExportScript.AF.PayloadInfo.CurrentStation].CurrentID, 1) -- eigentliche Auswahl
|
|
--ExportScript.Tools.WriteToLog('aktiv: '..ExportScript.AF.TmpStationToPanel[ExportScript.AF.PayloadInfo.CurrentStation].CurrentID)
|
|
if ExportScript.AF.PayloadInfo.Stations[ExportScript.AF.PayloadInfo.CurrentStation].container then
|
|
if ExportScript.AF.PayloadInfo.Stations[ExportScript.AF.PayloadInfo.CurrentStation].count > 1 then
|
|
ExportScript.Tools.SendDataDAC(ExportScript.AF.TmpStationToPanel[ExportScript.AF.PayloadInfo.CurrentStation].CurrentID2, 1) -- eigentliche Auswahl
|
|
--ExportScript.Tools.WriteToLog('aktiv2: '..ExportScript.AF.TmpStationToPanel[ExportScript.AF.PayloadInfo.CurrentStation].CurrentID2)
|
|
end
|
|
end
|
|
table.foreach(ExportScript.AF.PayloadInfo.Stations, ExportScript.AF.WeaponStatusPanel_selectCurrentPayloadStation_F15C) -- zugehörige Stationen
|
|
elseif ExportScript.AF.PayloadInfo.CurrentStation == 0 and ExportScript.AF.CurrentStationTmp > 0 then
|
|
ExportScript.AF.WeaponStatusPanel_Reset(201, 211)
|
|
ExportScript.AF.WeaponStatusPanel_Reset(221, 231)
|
|
ExportScript.AF.CurrentStationTmp = -1
|
|
end
|
|
end
|
|
|
|
function ExportScript.AF.RWRlite(FunctionTyp)
|
|
local lFunctionTyp = FunctionTyp or "Ikarus"
|
|
local lTWSInfo = LoGetTWSInfo() -- RWR Information
|
|
if lTWSInfo == nil then
|
|
return
|
|
end
|
|
|
|
local lPriorityTmp = 0
|
|
local lPrimaryThreatTmp = 0
|
|
local lPrimaryAir = 0
|
|
local lPrimarySAM = 0
|
|
|
|
if(#lTWSInfo.Emitters > 0) then
|
|
for EmitterIndex = 1, #lTWSInfo.Emitters, 1 do
|
|
if(lTWSInfo.Emitters[EmitterIndex].Priority > lPriorityTmp) then
|
|
lPriorityTmp = lTWSInfo.Emitters[EmitterIndex].Priority
|
|
lPrimaryThreatTmp = EmitterIndex
|
|
end
|
|
end
|
|
|
|
for EmitterIndex = 1, #lTWSInfo.Emitters, 1 do
|
|
local lType = lTWSInfo.Emitters[EmitterIndex].Type
|
|
--ExportScript.Tools.WriteToLog('level: '..lType.level1..', '..lType.level2..', '..lType.level3..', '..lType.level4)
|
|
|
|
local lAzimut = ExportScript.Tools.round(lTWSInfo.Emitters[EmitterIndex].Azimuth * 90, 1)
|
|
|
|
if EmitterIndex == lPrimaryThreatTmp then
|
|
ExportScript.AF.RWRlite_FoundErmitter = true
|
|
lPrimaryAir = (lType.level1 == 1 and 1 or 0)
|
|
lPrimarySAM = ((lType.level1 == 2 and lType.level2 == 16) and 1 or 0)
|
|
end
|
|
end
|
|
else
|
|
if ExportScript.AF.RWRlite_FoundErmitter ~= nil and ExportScript.AF.RWRlite_FoundErmitter then
|
|
lPrimaryAir = 0
|
|
lPrimarySAM = 0
|
|
end
|
|
end
|
|
|
|
if ExportScript.Config.IkarusExport and lFunctionTyp == "Ikarus" then
|
|
ExportScript.Tools.SendData(400, lPrimaryAir) -- primary Air
|
|
ExportScript.Tools.SendData(401, lPrimarySAM) -- primary SAM
|
|
end
|
|
if ExportScript.Config.DACExport and lFunctionTyp == "DAC" then
|
|
ExportScript.Tools.SendDataDAC(400, lPrimaryAir) -- primary Air
|
|
ExportScript.Tools.SendDataDAC(401, lPrimarySAM) -- primary SAM
|
|
end
|
|
end
|
|
|
|
-- Helper functions
|
|
|
|
function ExportScript.AF.WeaponStatusPanel_selectCurrentPayloadStation_F15C(_index)
|
|
if ExportScript.AF.PayloadInfo.Stations[ExportScript.AF.PayloadInfo.CurrentStation].CLSID == ExportScript.AF.PayloadInfo.Stations[_index].CLSID and ExportScript.AF.PayloadInfo.CurrentStation ~= _index then
|
|
ExportScript.Tools.SendDataDAC(ExportScript.AF.TmpStationToPanel[_index].CurrentID, 1)
|
|
--ExportScript.Tools.WriteToLog('aktiv3: '..ExportScript.AF.TmpStationToPanel[_index].CurrentID)
|
|
if ExportScript.AF.PayloadInfo.Stations[ExportScript.AF.PayloadInfo.CurrentStation].container then
|
|
if ExportScript.AF.PayloadInfo.Stations[ExportScript.AF.PayloadInfo.CurrentStation].count > 1 then
|
|
ExportScript.Tools.SendDataDAC(ExportScript.AF.TmpStationToPanel[_index].CurrentID2, 1)
|
|
--ExportScript.Tools.WriteToLog('aktiv3: '..ExportScript.AF.TmpStationToPanel[_index].CurrentID2)
|
|
end
|
|
end
|
|
end
|
|
end |