mirror of
https://github.com/weyne85/DCS-ExportScripts.git
synced 2025-10-29 16:58:18 +00:00
added initial A4E mod lua
This commit is contained in:
Bailey
GitHub
parent
83c45a04c2
commit
49019b4bcd
335
Scripts/DCS-ExportScript/ExportsModules/A-4E-C.lua
Normal file
335
Scripts/DCS-ExportScript/ExportsModules/A-4E-C.lua
Normal file
@ -0,0 +1,335 @@
|
||||
-- A-4E-C
|
||||
|
||||
ExportScript.FoundDCSModule = true
|
||||
ExportScript.Version.A4EC = "1.2.1"
|
||||
|
||||
ExportScript.ConfigEveryFrameArguments =
|
||||
{
|
||||
--[[
|
||||
every frames arguments
|
||||
based of "mainpanel_init.lua"
|
||||
Example (http://www.lua.org/manual/5.1/manual.html#pdf-string.format)
|
||||
[DeviceID] = "Format"
|
||||
[4] = "%.4f", <- floating-point number with 4 digits after point
|
||||
[19] = "%0.1f", <- floating-point number with 1 digit after point
|
||||
[129] = "%1d", <- decimal number
|
||||
[5] = "%.f", <- floating point number rounded to a decimal number
|
||||
]]
|
||||
|
||||
}
|
||||
|
||||
ExportScript.ConfigArguments =
|
||||
{
|
||||
--[[
|
||||
arguments for export in low tick interval
|
||||
based on "clickabledata.lua"
|
||||
]]
|
||||
[8] = "%0.4f", --Landing Gear Handle {1,0,1}
|
||||
[10] = "%0.4f", --Arresting Hook Handle {1,0,1}
|
||||
[24] = "%0.4f", --Shoulder Harness Control Handle {1,0,1}
|
||||
[25] = "%0.4f", --Alternate Ejection Handle {1,0,1}
|
||||
[82] = "%0.4f", --Rudder Trim Switch {0,-1,1}
|
||||
[83] = "%0.4f", --Master Exterior Lights Switch {1,-1,1}
|
||||
[84] = "%0.4f", --Spoiler Arm Switch {1,0,1}
|
||||
[85] = "%0.4f", --Speedbrake Switch {1,0,1}
|
||||
[100] = "%0.4f", --Engine Starter Switch {1,0,1}
|
||||
[101] = "%0.4f", --Drop Tank Pressurization Switch {1,-1,1}
|
||||
[103] = "%0.4f", --Fuel Dump Switch {1,-1,1}
|
||||
[104] = "%0.4f", --Fuel Control Switch {1,0,1}
|
||||
[106] = "%0.4f", --Instrument Lights Control {0,0,1}
|
||||
[107] = "%0.4f", --Console Lights Control {0,0,1}
|
||||
[108] = "%0.4f", --Instrument Lights Brightness {1,-1,1}
|
||||
[110] = "%0.4f", --White Floodlights Control {0,0,1}
|
||||
[120] = "%0.4f", --AN/APG-53A Radar Mode Switch {0.1,0,0.4}
|
||||
[121] = "%0.4f", --Radar AoA Compensation Switch {1,0,1}
|
||||
[122] = "%0.4f", --Radar Antenna Tilt Switch {0.4,0,1}
|
||||
[123] = "%0.4f", --Radar Obstacle Tone Volume {0,-1,1}
|
||||
[125] = "%0.4f", --Oxygen Switch {1,0,1}
|
||||
[128] = "%0.4f", --Emergency Speedbrake Knob {1,-1,1}
|
||||
[130] = "%0.4f", --Manual Fuel Shutoff Control Lever {1,0,1}
|
||||
[131] = "%0.4f", --Manual Fuel Shutoff Control Catch {1,0,1}
|
||||
[132] = "%0.4f", --Flap Handle {1,-1,1}
|
||||
[133] = "%0.4f", --JATO Arming Switch {1,0,1}
|
||||
[134] = "%0.4f", --JATO Jettison Switch {1,0,1}
|
||||
[135] = "%0.4f", --APC Power Switch {1,-1,1}
|
||||
[136] = "%0.4f", --APC Temperature Switch {1,-1,1}
|
||||
[139] = "%0.4f", --Accelerometer Reset {1,0,1}
|
||||
[146] = "%0.4f", --Elapsed-Time Clock {1,0,1}
|
||||
[160] = "%0.4f", --AFCS Standby Switch {1,0,1}
|
||||
[161] = "%0.4f", --AFCS Engage Switch {1,0,1}
|
||||
[162] = "%0.4f", --AFCS Heading Select Switch {1,0,1}
|
||||
[163] = "%0.4f", --AFCS Altitude Switch {1,0,1}
|
||||
[164] = "%0.4f", --AFCS Heading Select Pull-to-Set Knob {0,0,1}
|
||||
[165] = "%0.4f", --AFCS Stability Augmentation Switch (Yaw Damper) {1,0,1}
|
||||
[166] = "%0.4f", --AFCS Aileron Trim Switch (unimplemented) {1,0,1}
|
||||
[170] = "%0.4f", --AN/APN-153 Doppler Navigation Radar Mode Switch {0.1,0,0.4}
|
||||
[176] = "%0.4f", --AN/ASN-41 Function Selector Switch {0.1,0,0.4}
|
||||
[177] = "%0.4f", --Present Latitude Push-to-Set Knob {1,0,1}
|
||||
[183] = "%0.4f", --Present Longitude Push-to-Set Knob {1,0,1}
|
||||
[190] = "%0.4f", --Destination Latitude Push-to-Set Knob {1,0,1}
|
||||
[196] = "%0.4f", --Destination Longitude Push-to-Set Knob {1,0,1}
|
||||
[203] = "%0.4f", --Magnetic Variation Push-to-Set Knob {1,0,1}
|
||||
[209] = "%0.4f", --Wind Speed Push-to-Set Knob {1,0,1}
|
||||
[213] = "%0.4f", --Wind Direction Push-to-Set Knob {1,0,1}
|
||||
[217] = "%0.4f", --Probe Light Switch {1,-1,1}
|
||||
[218] = "%0.4f", --Taxi Light Switch {1,0,1}
|
||||
[219] = "%0.4f", --Anti-Collision Light Switch {1,0,1}
|
||||
[220] = "%0.4f", --Fuselage Light Switch {1,-1,1}
|
||||
[221] = "%0.4f", --Lighting Flash/Steady Switch {1,0,1}
|
||||
[222] = "%0.4f", --Navigation Lights Switch {1,-1,1}
|
||||
[223] = "%0.4f", --Tail Light Switch {1,-1,1}
|
||||
[224] = "%0.4f", --Cabin Pressure Switch {1,0,1}
|
||||
[225] = "%0.4f", --Windshield Defrost Switch {1,-1,1}
|
||||
[226] = "%0.4f", --Cabin Temperature Knob {0,0,1}
|
||||
[236] = "%0.4f", --Present Latitude Push-to-Set Knob {1,0,1}
|
||||
[237] = "%0.4f", --Present Longitude Push-to-Set Knob {1,0,1}
|
||||
[238] = "%0.4f", --Destination Latitude Push-to-Set Knob {1,0,1}
|
||||
[239] = "%0.4f", --Destination Longitude Push-to-Set Knob {1,0,1}
|
||||
[240] = "%0.4f", --Magnetic Variation Push-to-Set Knob {1,0,1}
|
||||
[241] = "%0.4f", --Wind Speed Push-to-Set Knob {1,0,1}
|
||||
[242] = "%0.4f", --Wind Direction Push-to-Set Knob {1,0,1}
|
||||
[247] = "%0.4f", --AN/APN-153 Memory Light Test {1,0,1}
|
||||
[248] = "%0.4f", --Destination Latitude Slew Knob {1,-1,1}
|
||||
[249] = "%0.4f", --Destination Longitude Slew Knob {1,-1,1}
|
||||
[250] = "%0.4f", --MCL Channel Selector Switch {0.05,0,0.95}
|
||||
[251] = "%0.4f", --Seat Adjustment Switch (unimplemented) {1,-1,1}
|
||||
[252] = "%0.4f", --Emergency Generator Switch {1,0,1}
|
||||
[253] = "%0.4f", --AN/ARA-63 MCL Power Switch {1,-1,1}
|
||||
[254] = "%0.4f", --TACAN Antenna Control Switch (unimplemented) {1,-1,1}
|
||||
[255] = "%0.4f", --Navigation Dead Reckoning/Doppler Switch (unimplemented) {1,0,1}
|
||||
[256] = "%0.4f", --Fuel Transfer Switch {1,0,1}
|
||||
[257] = "%0.4f", --Rain Removal Switch (unimplemented) {1,0,1}
|
||||
[258] = "%0.4f", --AFCS 1-N-2 Guard Switch {1,0,1}
|
||||
[259] = "%0.4f", --AFCS 1-N-2 Switch {1,-1,1}
|
||||
[361] = "%0.4f", --Radio Preset Channel Selector {0.05,0,0.95}
|
||||
[365] = "%0.4f", --Radio Volume {0.5,0,1}
|
||||
[366] = "%0.4f", --Radio Frequency Mode {-1,-1,1}
|
||||
[366] = "%0.4f", --Radio Frequency Mode {1,-1,1}
|
||||
[367] = "%0.4f", --Radio Frequency 10 MHz {0.05,0,0.85}
|
||||
[368] = "%0.4f", --Radio Frequency 1 MHz {0.1,0,0.9}
|
||||
[369] = "%0.4f", --Radio Frequency 50 kHz {0.05,0,0.95}
|
||||
[370] = "%0.4f", --Radio Squelch Disable {1,0,1}
|
||||
[372] = "%0.4f", --AN/ARC-51A UHF Radio Mode Switch {0.1,0,0.3}
|
||||
[390] = "%0.4f", --Gunpod Switch {1,-1,1}
|
||||
[391] = "%0.4f", --Gunpod Station LH Switch {1,0,1}
|
||||
[392] = "%0.4f", --Gunpod Station CTR Switch {1,0,1}
|
||||
[393] = "%0.4f", --Gunpod Station RH Switch {1,0,1}
|
||||
[400] = "%0.4f", --Radar Indicator Storage {0,0,1}
|
||||
[401] = "%0.4f", --Radar Indicator Brilliance {0,0,1}
|
||||
[402] = "%0.4f", --Radar Indicator Detail {0,0,1}
|
||||
[403] = "%0.4f", --Radar Indicator Gain {0,0,1}
|
||||
[404] = "%0.4f", --Radar Indicator Reticle {0,0,1}
|
||||
[405] = "%0.4f", --Radar Indicator Filter Plate {1,0,1}
|
||||
[501] = "%0.4f", --APR-27 Switch {1,0,1}
|
||||
[502] = "%0.4f", --AN/APR-23 Function Selector Switch {0.33,0,0.99}
|
||||
[503] = "%0.4f", --Audio ALQ Switch {1,0,1}
|
||||
[504] = "%0.4f", --APR-25 Switch {1,0,1}
|
||||
[505] = "%0.4f", --Missile Alert Volume {0,-0.8,0.8}
|
||||
[506] = "%0.4f", --PRF Volume {0,-0.8,0.8}
|
||||
[507] = "%0.4f", --APR-27 Test {1,0,1}
|
||||
[509] = "%0.4f", --Compass Latitude Knob (unimplemented) {0,-1,1}
|
||||
[510] = "%0.4f", --APR-27 Light {1,0,1}
|
||||
[511] = "%0.4f", --Compass Heading Set Knob (unimplemented) {1,-1,1}
|
||||
[512] = "%0.4f", --Compass Mode (unimplemented) {1,0,1}
|
||||
[513] = "%0.4f", --Compass Push-to-Sync (unimplemented) {1,0,1}
|
||||
[522] = "%0.4f", --Dispenser Select {1,-1,1}
|
||||
[523] = "%0.4f", --Chaff AUTO Pushbutton (ALE-29A Salvo) {1,0,1}
|
||||
[524] = "%0.4f", --Dispenser 1 Counter {0,0,1}
|
||||
[525] = "%0.4f", --Dispenser 2 Counter {0,0,1}
|
||||
[530] = "%0.4f", --Chaff Power Switch {1,0,1}
|
||||
[602] = "%0.4f", --AN/APN-141 Radar Altimeter {0.5,0,1}
|
||||
[603] = "%0.4f", --AN/APN-141 Radar Altimeter {1,-1,0}
|
||||
[662] = "%0.4f", --Standby Attitude Horizon {0.5,0,1}
|
||||
[663] = "%0.4f", --Standby Attitude Horizon {1,0,1}
|
||||
[700] = "%0.4f", --Emergency Release Selector {0.1,0,0.6}
|
||||
[701] = "%0.4f", --Guns Charging Switch {1,0,1}
|
||||
[702] = "%0.4f", --Bomb Arm Switch {1,-1,1}
|
||||
[703] = "%0.4f", --Station 1 Selector Switch {1,0,1}
|
||||
[704] = "%0.4f", --Station 2 Selector Switch {1,0,1}
|
||||
[705] = "%0.4f", --Station 3 Selector Switch {1,0,1}
|
||||
[706] = "%0.4f", --Station 4 Selector Switch {1,0,1}
|
||||
[707] = "%0.4f", --Station 5 Selector Switch {1,0,1}
|
||||
[708] = "%0.4f", --Weapon Function Selector Switch {0.1,0,0.6}
|
||||
[709] = "%0.4f", --Master Armament Switch {1,0,1}
|
||||
[720] = "%0.4f", --Internal-External Fuel Switch {1,0,1}
|
||||
[721] = "%0.4f", --Radar Terrain Clearance Switch {1,0,1}
|
||||
[722] = "%0.4f", --Radar Range Switch {1,0,1}
|
||||
[723] = "%0.4f", --Master Test Switch {1,0,1}
|
||||
[724] = "%0.4f", --BDHI Switch {1,-1,1}
|
||||
[725] = "%0.4f", --Shrike Selector Knob {0.1,0,0.4}
|
||||
[726] = "%0.4f", --Shrike/Sidewinder Volume Knob {0,-1,1}
|
||||
[740] = "%0.4f", --AWRS Quantity Selector Switch {0.05,0,0.55}
|
||||
[742] = "%0.4f", --AWRS Drop Interval Knob {0,0,0.9}
|
||||
[743] = "%0.4f", --AWRS Multiplier Switch {1,0,1}
|
||||
[744] = "%0.4f", --AWRS Mode Selector Switch {0.1,0,0.5}
|
||||
[827] = "%0.4f", --Altimeter Pressure {0,0,1}
|
||||
[853] = "%0.4f", --AoA Indexer Dimming Wheel {1,-1,1}
|
||||
[884] = "%0.4f", --IAS Index {0.5,0,1}
|
||||
[885] = "%0.4f", --IAS Index {1,0,1}
|
||||
[891] = "%0.4f", --Gunsight Day-Night Switch {1,0,1}
|
||||
[895] = "%0.4f", --Gunsight Light Control {0,0,1}
|
||||
[900] = "%0.4f", --AN/ARN-52 TACAN Mode Switch {0.1,0,0.3}
|
||||
[901] = "%0.4f", --TACAN Channel 10s {0.05,0,0.6}
|
||||
[902] = "%0.4f", --TACAN Channel 1s {0.1,0,0.9}
|
||||
[903] = "%0.4f", --TACAN Volume {0,-1,1}
|
||||
[1240] = "%0.4f", --Emergency Landing Gear Release Handle {1,0,1}
|
||||
[1241] = "%0.4f", --Emergency Stores Release Handle {1,0,1}
|
||||
[1242] = "%0.4f", --Manual Flight Control Handle {1,0,1}
|
||||
[1243] = "%0.4f", --Emergency Generator Release Handle {1,0,1}
|
||||
|
||||
}
|
||||
|
||||
-----------------------------
|
||||
-- HIGH IMPORTANCE EXPORTS --
|
||||
-- done every export event --
|
||||
-----------------------------
|
||||
|
||||
-- Pointed to by ProcessIkarusDCSHighImportance
|
||||
function ExportScript.ProcessIkarusDCSConfigHighImportance(mainPanelDevice)
|
||||
--[[
|
||||
export in low tick interval to Ikarus
|
||||
Example from A-10C
|
||||
Get Radio Frequencies
|
||||
get data from device
|
||||
local lUHFRadio = GetDevice(54)
|
||||
ExportScript.Tools.SendData("ExportID", "Format")
|
||||
ExportScript.Tools.SendData(2000, string.format("%7.3f", lUHFRadio:get_frequency()/1000000)) -- <- special function for get frequency data
|
||||
ExportScript.Tools.SendData(2000, ExportScript.Tools.RoundFreqeuncy((UHF_RADIO:get_frequency()/1000000))) -- ExportScript.Tools.RoundFreqeuncy(frequency (MHz|KHz), format ("7.3"), PrefixZeros (false), LeastValue (0.025))
|
||||
]]
|
||||
end
|
||||
|
||||
function ExportScript.ProcessDACConfigHighImportance(mainPanelDevice)
|
||||
--[[
|
||||
every frame export to DAC
|
||||
Example from A-10C
|
||||
Get Radio Frequencies
|
||||
get data from device
|
||||
local UHF_RADIO = GetDevice(54)
|
||||
ExportScript.Tools.SendDataDAC("ExportID", "Format")
|
||||
ExportScript.Tools.SendDataDAC("ExportID", "Format", HardwareConfigID)
|
||||
ExportScript.Tools.SendDataDAC("2000", string.format("%7.3f", UHF_RADIO:get_frequency()/1000000))
|
||||
ExportScript.Tools.SendDataDAC("2000", ExportScript.Tools.RoundFreqeuncy((UHF_RADIO:get_frequency()/1000000))) -- ExportScript.Tools.RoundFreqeuncy(frequency (MHz|KHz), format ("7.3"), PrefixZeros (false), LeastValue (0.025))
|
||||
]]
|
||||
end
|
||||
|
||||
-----------------------------------------------------
|
||||
-- LOW IMPORTANCE EXPORTS --
|
||||
-- done every gExportLowTickInterval export events --
|
||||
-----------------------------------------------------
|
||||
|
||||
-- Pointed to by ExportScript.ProcessIkarusDCSConfigLowImportance
|
||||
function ExportScript.ProcessIkarusDCSConfigLowImportance(mainPanelDevice)
|
||||
--[[
|
||||
export in low tick interval to GlassCockpit
|
||||
Example from A-10C
|
||||
Get Radio Frequencies
|
||||
get data from device
|
||||
local lUHFRadio = GetDevice(54)
|
||||
ExportScript.Tools.SendData("ExportID", "Format")
|
||||
ExportScript.Tools.SendData(2000, string.format("%7.3f", lUHFRadio:get_frequency()/1000000)) -- <- special function for get frequency data
|
||||
ExportScript.Tools.SendData(2000, ExportScript.Tools.RoundFreqeuncy((UHF_RADIO:get_frequency()/1000000))) -- ExportScript.Tools.RoundFreqeuncy(frequency (MHz|KHz), format ("7.3"), PrefixZeros (false), LeastValue (0.025))
|
||||
]]
|
||||
end
|
||||
|
||||
function ExportScript.ProcessDACConfigLowImportance(mainPanelDevice)
|
||||
--[[
|
||||
every frame export to hardware
|
||||
Example from A-10C
|
||||
Get Radio Frequencies
|
||||
get data from device
|
||||
local UHF_RADIO = GetDevice(54)
|
||||
ExportScript.Tools.SendDataDAC("ExportID", "Format")
|
||||
ExportScript.Tools.SendDataDAC("ExportID", "Format", HardwareConfigID)
|
||||
ExportScript.Tools.SendDataDAC("2000", string.format("%7.3f", UHF_RADIO:get_frequency()/1000000))
|
||||
ExportScript.Tools.SendDataDAC("2000", ExportScript.Tools.RoundFreqeuncy((UHF_RADIO:get_frequency()/1000000))) -- ExportScript.Tools.RoundFreqeuncy(frequency (MHz|KHz), format ("7.3"), PrefixZeros (false), LeastValue (0.025))
|
||||
]]
|
||||
end
|
||||
|
||||
----------------------
|
||||
-- Custom Functions --
|
||||
----------------------
|
||||
|
||||
|
||||
|
||||
------------------------------
|
||||
-- General Helper Functions --
|
||||
------------------------------
|
||||
|
||||
|
||||
function percentSignFromFuel(s)
|
||||
return s:gsub("%\%", "")
|
||||
end
|
||||
|
||||
|
||||
function ExportScript.Linearize(current_value, raw_tab, final_tab)
|
||||
-- (c) scoobie
|
||||
if current_value <= raw_tab[1] then
|
||||
return final_tab[1]
|
||||
end
|
||||
for index, value in pairs(raw_tab) do
|
||||
if current_value <= value then
|
||||
local ft = final_tab[index]
|
||||
local rt = raw_tab[index]
|
||||
return (current_value - rt) * (ft - final_tab[index - 1]) / (rt - raw_tab[index - 1]) + ft
|
||||
end
|
||||
end
|
||||
-- we shouldn't be here, so something went wrong - return arbitrary max. final value, maybe the user will notice the problem:
|
||||
return final_tab[#final_tab]
|
||||
end
|
||||
|
||||
|
||||
function round(num, numDecimalPlaces) --http://lua-users.org/wiki/SimpleRound
|
||||
local mult = 10^(numDecimalPlaces or 0)
|
||||
return math.floor(num * mult + 0.5) / mult
|
||||
end
|
||||
|
||||
|
||||
function format_int(number) --https://stackoverflow.com/questions/10989788/format-integer-in-lua
|
||||
|
||||
local i, j, minus, int, fraction = tostring(number):find('([-]?)(%d+)([.]?%d*)')
|
||||
|
||||
-- reverse the int-string and append a comma to all blocks of 3 digits
|
||||
int = int:reverse():gsub("(%d%d%d)", "%1,")
|
||||
|
||||
-- reverse the int-string back remove an optional comma and put the
|
||||
-- optional minus and fractional part back
|
||||
return minus .. int:reverse():gsub("^,", "") .. fraction
|
||||
end
|
||||
|
||||
|
||||
function trim(s) --http://lua-users.org/wiki/CommonFunctions
|
||||
-- from PiL2 20.4
|
||||
return (s:gsub("^%s*(.-)%s*$", "%1"))
|
||||
end
|
||||
|
||||
|
||||
function addZeros3(number)
|
||||
number = string.format("%.1d" , number)
|
||||
if #number == 2 then
|
||||
number = "0" .. number
|
||||
elseif #number == 1 then
|
||||
number = "00" .. number
|
||||
end
|
||||
return number
|
||||
end
|
||||
|
||||
|
||||
-- inspired by https://github.com/ciribob/DCS-SimpleRadioStandalone/blob/a3021661a084e8dca285ffad7cf640b3c1dbccb2/Scripts/DCS-SRS/Scripts/DCS-SRS-Export.lua#L4195
|
||||
function getCockpitParam()
|
||||
local ListIindicator = list_cockpit_params() --list_indication(IndicatorID)
|
||||
local TmpReturn = {}
|
||||
--if ListIindicator == "" then
|
||||
-- return nil
|
||||
--end
|
||||
local ListindicatorMatch = ListIindicator:gmatch("([^\n]+):([^\n]+)")
|
||||
|
||||
while true do
|
||||
local Key, Value = ListindicatorMatch()
|
||||
if not Key then
|
||||
break
|
||||
end
|
||||
TmpReturn[Key] = Value
|
||||
end
|
||||
return TmpReturn
|
||||
end
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user