Moved file to it's own aircraft specific directory so it doesn't waste
resources for everyone.
This commit is contained in:
curt
parent
b66f6ded8a
commit
a9c8aeac7e
1 changed files with 0 additions and 628 deletions
628
Nasal/atcsim.nas
628
Nasal/atcsim.nas
|
|
@ -1,628 +0,0 @@
|
||||||
##
|
|
||||||
# ATC Flight Simulator specific code to manipulate avionics based on
|
|
||||||
# raw switch inputs.
|
|
||||||
#
|
|
||||||
|
|
||||||
##
|
|
||||||
# Initialize property nodes via a timer, to insure the props module is
|
|
||||||
# loaded. See notes in view.nas.
|
|
||||||
#
|
|
||||||
have_hardware = nil;
|
|
||||||
|
|
||||||
last_com1_swap = 0;
|
|
||||||
last_com1_fine = 0;
|
|
||||||
last_com1_coarse = 0;
|
|
||||||
|
|
||||||
last_com2_swap = 0;
|
|
||||||
last_com2_fine = 0;
|
|
||||||
last_com2_coarse = 0;
|
|
||||||
|
|
||||||
last_nav1_swap = 0;
|
|
||||||
last_nav1_fine = 0;
|
|
||||||
last_nav1_coarse = 0;
|
|
||||||
|
|
||||||
last_nav2_swap = 0;
|
|
||||||
last_nav2_fine = 0;
|
|
||||||
last_nav2_coarse = 0;
|
|
||||||
|
|
||||||
last_adf_fine = 0;
|
|
||||||
last_adf_coarse = 0;
|
|
||||||
|
|
||||||
last_xpdr = [ 1, 2, 0, 0 ];
|
|
||||||
xpdr = [ 1, 2, 0, 0 ];
|
|
||||||
|
|
||||||
tuners_inited = 0;
|
|
||||||
|
|
||||||
INIT = func {
|
|
||||||
have_hardware = props.globals.getNode( "/input/atc-board[0]" );
|
|
||||||
}
|
|
||||||
settimer( INIT, 0 );
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# convenience functions
|
|
||||||
#
|
|
||||||
adf_working = func {
|
|
||||||
has_power = getprop("/systems/electrical/outputs/adf");
|
|
||||||
if ( has_power == nil ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( has_power < 1.0 ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/kr-87/inputs/power-btn") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/adf/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
dme_working = func {
|
|
||||||
if ( getprop("/systems/electrical/outputs/dme") < 1.0 ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/input/atc-board/radio-switches/raw/dme-switch-position") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/dme/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
navcom1_has_power = func {
|
|
||||||
if ( getprop("/systems/electrical/outputs/nav[0]") < 1.0 ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/nav[0]/power-btn") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
navcom2_has_power = func {
|
|
||||||
if ( getprop("/systems/electrical/outputs/nav[1]") < 1.0 ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/nav[1]/power-btn") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
com1_working = func {
|
|
||||||
if ( !navcom1_has_power() ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/comm[0]/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
com2_working = func {
|
|
||||||
if ( !navcom2_has_power() ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/comm[1]/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
nav1_working = func {
|
|
||||||
if ( !navcom1_has_power() ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/nav[0]/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
nav2_working = func {
|
|
||||||
if ( !navcom2_has_power() ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/nav[1]/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
xpdr_working = func {
|
|
||||||
has_power = getprop("/systems/electrical/outputs/transponder");
|
|
||||||
if ( has_power == nil ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( has_power < 1.0 ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/kt-70/inputs/func-knob") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
if ( !getprop("/instrumentation/kt-70/inputs/serviceable") ) {
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# Map DME switch input
|
|
||||||
#
|
|
||||||
do_dme_inputs = func {
|
|
||||||
# dme switch
|
|
||||||
dme_selector
|
|
||||||
= getprop( "/input/atc-board/radio-switches/raw/dme-switch-position" );
|
|
||||||
if ( dme_selector == 0 ) {
|
|
||||||
setprop( "/instrumentation/dme/switch-position", 0 );
|
|
||||||
} elsif ( dme_selector == 2 ) {
|
|
||||||
setprop( "/instrumentation/dme/switch-position", 1 );
|
|
||||||
setprop( "/instrumentation/dme/frequencies/source",
|
|
||||||
"/instrumentation/nav[0]/frequencies/selected-mhz" );
|
|
||||||
freq = getprop( "/instrumentation/nav[0]/frequencies/selected-mhz" );
|
|
||||||
if ( freq == nil ) {
|
|
||||||
freq = "117.30";
|
|
||||||
}
|
|
||||||
setprop( "/instrumentation/dme/frequencies/selected-mhz", freq );
|
|
||||||
} elsif ( dme_selector == 1 ) {
|
|
||||||
setprop( "/instrumentation/dme/switch-position", 3 );
|
|
||||||
setprop( "/instrumentation/dme/frequencies/source",
|
|
||||||
"/instrumentation/nav[1]/frequencies/selected-mhz" );
|
|
||||||
freq = getprop( "/instrumentation/nav[1]/frequencies/selected-mhz" );
|
|
||||||
if ( freq == nil ) {
|
|
||||||
freq = "117.30";
|
|
||||||
}
|
|
||||||
setprop( "/instrumentation/dme/frequencies/selected-mhz", freq );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
#
|
|
||||||
#
|
|
||||||
initialize_tuners = func {
|
|
||||||
last_com1_fine = getprop("/instrumentation/comm[0]/inputs/fine-tuner");
|
|
||||||
last_com1_coarse = getprop("/instrumentation/comm[0]/inputs/coarse-tuner");
|
|
||||||
|
|
||||||
last_com2_fine = getprop("/instrumentation/comm[1]/inputs/fine-tuner");
|
|
||||||
last_com2_coarse = getprop("/instrumentation/comm[1]/inputs/coarse-tuner");
|
|
||||||
|
|
||||||
last_nav1_fine = getprop("/instrumentation/nav[0]/inputs/fine-tuner");
|
|
||||||
last_nav1_coarse = getprop("/instrumentation/nav[0]/inputs/coarse-tuner");
|
|
||||||
|
|
||||||
last_nav2_fine = getprop("/instrumentation/nav[1]/inputs/fine-tuner");
|
|
||||||
last_nav2_coarse = getprop("/instrumentation/nav[1]/inputs/coarse-tuner");
|
|
||||||
|
|
||||||
last_adf_fine = getprop( "/instrumentation/kr-87/inputs/fine-tuner" );
|
|
||||||
last_adf_coarse = getprop("/instrumentation/kr-87/inputs/coarse-tuner");
|
|
||||||
|
|
||||||
last_xpdr[0] = getprop( "/instrumentation/kt-70/inputs/tuner1" );
|
|
||||||
last_xpdr[1] = getprop( "/instrumentation/kt-70/inputs/tuner2" );
|
|
||||||
last_xpdr[2] = getprop( "/instrumentation/kt-70/inputs/tuner3" );
|
|
||||||
last_xpdr[3] = getprop( "/instrumentation/kt-70/inputs/tuner4" );
|
|
||||||
|
|
||||||
tuners_inited = 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# Com1 inputs
|
|
||||||
#
|
|
||||||
do_com1_inputs = func {
|
|
||||||
if ( com1_working() ) {
|
|
||||||
com1_swap = getprop( "/instrumentation/comm[0]/inputs/freq-swap" );
|
|
||||||
if ( com1_swap and (last_com1_swap != com1_swap) ) {
|
|
||||||
selected = getprop( "/instrumentation/comm[0]/frequencies/selected-mhz" );
|
|
||||||
standby = getprop( "/instrumentation/comm[0]/frequencies/standby-mhz" );
|
|
||||||
setprop( "/instrumentation/comm[0]/frequencies/selected-mhz", standby );
|
|
||||||
setprop( "/instrumentation/comm[0]/frequencies/standby-mhz", selected );
|
|
||||||
}
|
|
||||||
last_com1_swap = com1_swap;
|
|
||||||
|
|
||||||
com1_fine = getprop("/instrumentation/comm[0]/inputs/fine-tuner");
|
|
||||||
com1_coarse = getprop("/instrumentation/comm[0]/inputs/coarse-tuner");
|
|
||||||
freq = getprop( "/instrumentation/comm[0]/frequencies/standby-mhz" );
|
|
||||||
coarse_freq = int( freq );
|
|
||||||
fine_freq = int( (freq - coarse_freq) * 40 + 0.5 );
|
|
||||||
if ( com1_fine != last_com1_fine ) {
|
|
||||||
diff = com1_fine - last_com1_fine;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( com1_fine < last_com1_fine ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_com1_fine + com1_fine;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = com1_fine - 12 - last_com1_fine;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
fine_freq = fine_freq + diff;
|
|
||||||
}
|
|
||||||
while ( fine_freq >= 40.0 ) { fine_freq = fine_freq - 40.0; }
|
|
||||||
while ( fine_freq < 0.0 ) { fine_freq = fine_freq + 40.0; }
|
|
||||||
|
|
||||||
if ( com1_coarse != last_com1_coarse ) {
|
|
||||||
diff = com1_coarse - last_com1_coarse;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( com1_coarse < last_com1_coarse ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_com1_coarse + com1_coarse;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = com1_coarse - 12 - last_com1_coarse;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
coarse_freq = coarse_freq + diff;
|
|
||||||
}
|
|
||||||
if ( coarse_freq < 118.0 ) { coarse_freq = coarse_freq + 19.0; }
|
|
||||||
if ( coarse_freq > 136.0 ) { coarse_freq = coarse_freq - 19.0; }
|
|
||||||
|
|
||||||
last_com1_fine = com1_fine;
|
|
||||||
last_com1_coarse = com1_coarse;
|
|
||||||
|
|
||||||
setprop( "/instrumentation/comm[0]/frequencies/standby-mhz",
|
|
||||||
coarse_freq + fine_freq / 40.0 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# Com2 inputs
|
|
||||||
#
|
|
||||||
do_com2_inputs = func {
|
|
||||||
if ( com2_working() ) {
|
|
||||||
com2_swap = getprop( "/instrumentation/comm[1]/inputs/freq-swap" );
|
|
||||||
if ( com2_swap and (last_com2_swap != com2_swap) ) {
|
|
||||||
selected = getprop( "/instrumentation/comm[1]/frequencies/selected-mhz" );
|
|
||||||
standby = getprop( "/instrumentation/comm[1]/frequencies/standby-mhz" );
|
|
||||||
setprop( "/instrumentation/comm[1]/frequencies/selected-mhz", standby );
|
|
||||||
setprop( "/instrumentation/comm[1]/frequencies/standby-mhz", selected );
|
|
||||||
}
|
|
||||||
last_com2_swap = com2_swap;
|
|
||||||
|
|
||||||
com2_fine = getprop("/instrumentation/comm[1]/inputs/fine-tuner");
|
|
||||||
com2_coarse = getprop("/instrumentation/comm[1]/inputs/coarse-tuner");
|
|
||||||
freq = getprop( "/instrumentation/comm[1]/frequencies/standby-mhz" );
|
|
||||||
coarse_freq = int( freq );
|
|
||||||
fine_freq = int( (freq - coarse_freq) * 40 + 0.5 );
|
|
||||||
if ( com2_fine != last_com2_fine ) {
|
|
||||||
diff = com2_fine - last_com2_fine;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( com2_fine < last_com2_fine ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_com2_fine + com2_fine;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = com2_fine - 12 - last_com2_fine;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
fine_freq = fine_freq + diff;
|
|
||||||
}
|
|
||||||
while ( fine_freq >= 40.0 ) { fine_freq = fine_freq - 40.0; }
|
|
||||||
while ( fine_freq < 0.0 ) { fine_freq = fine_freq + 40.0; }
|
|
||||||
|
|
||||||
if ( com2_coarse != last_com2_coarse ) {
|
|
||||||
diff = com2_coarse - last_com2_coarse;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( com2_coarse < last_com2_coarse ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_com2_coarse + com2_coarse;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = com2_coarse - 12 - last_com2_coarse;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
coarse_freq = coarse_freq + diff;
|
|
||||||
}
|
|
||||||
if ( coarse_freq < 118.0 ) { coarse_freq = coarse_freq + 19.0; }
|
|
||||||
if ( coarse_freq > 136.0 ) { coarse_freq = coarse_freq - 19.0; }
|
|
||||||
|
|
||||||
last_com2_fine = com2_fine;
|
|
||||||
last_com2_coarse = com2_coarse;
|
|
||||||
|
|
||||||
setprop( "/instrumentation/comm[1]/frequencies/standby-mhz",
|
|
||||||
coarse_freq + fine_freq / 40.0 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# Nav1 inputs
|
|
||||||
#
|
|
||||||
do_nav1_inputs = func {
|
|
||||||
if ( nav1_working() ) {
|
|
||||||
nav1_swap = getprop( "/instrumentation/nav[0]/inputs/freq-swap" );
|
|
||||||
if ( nav1_swap and (last_nav1_swap != nav1_swap) ) {
|
|
||||||
selected = getprop( "/instrumentation/nav[0]/frequencies/selected-mhz" );
|
|
||||||
standby = getprop( "/instrumentation/nav[0]/frequencies/standby-mhz" );
|
|
||||||
setprop( "/instrumentation/nav[0]/frequencies/selected-mhz", standby );
|
|
||||||
setprop( "/instrumentation/nav[0]/frequencies/standby-mhz", selected );
|
|
||||||
}
|
|
||||||
last_nav1_swap = nav1_swap;
|
|
||||||
|
|
||||||
nav1_fine = getprop("/instrumentation/nav[0]/inputs/fine-tuner");
|
|
||||||
nav1_coarse = getprop("/instrumentation/nav[0]/inputs/coarse-tuner");
|
|
||||||
freq = getprop( "/instrumentation/nav[0]/frequencies/standby-mhz" );
|
|
||||||
coarse_freq = int( freq );
|
|
||||||
fine_freq = int( (freq - coarse_freq) * 20 + 0.5 );
|
|
||||||
if ( nav1_fine != last_nav1_fine ) {
|
|
||||||
diff = nav1_fine - last_nav1_fine;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( nav1_fine < last_nav1_fine ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_nav1_fine + nav1_fine;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = nav1_fine - 12 - last_nav1_fine;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
fine_freq = fine_freq + diff;
|
|
||||||
}
|
|
||||||
while ( fine_freq >= 20.0 ) { fine_freq = fine_freq - 20.0; }
|
|
||||||
while ( fine_freq < 0.0 ) { fine_freq = fine_freq + 20.0; }
|
|
||||||
|
|
||||||
if ( nav1_coarse != last_nav1_coarse ) {
|
|
||||||
diff = nav1_coarse - last_nav1_coarse;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( nav1_coarse < last_nav1_coarse ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_nav1_coarse + nav1_coarse;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = nav1_coarse - 12 - last_nav1_coarse;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
coarse_freq = coarse_freq + diff;
|
|
||||||
}
|
|
||||||
if ( coarse_freq < 108.0 ) { coarse_freq = coarse_freq + 10.0; }
|
|
||||||
if ( coarse_freq > 117.0 ) { coarse_freq = coarse_freq - 10.0; }
|
|
||||||
|
|
||||||
last_nav1_fine = nav1_fine;
|
|
||||||
last_nav1_coarse = nav1_coarse;
|
|
||||||
|
|
||||||
setprop( "/instrumentation/nav[0]/frequencies/standby-mhz",
|
|
||||||
coarse_freq + fine_freq / 20.0 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# Nav2 inputs
|
|
||||||
#
|
|
||||||
do_nav2_inputs = func {
|
|
||||||
if ( nav2_working() ) {
|
|
||||||
nav2_swap = getprop( "/instrumentation/nav[1]/inputs/freq-swap" );
|
|
||||||
if ( nav2_swap and (last_nav2_swap != nav2_swap) ) {
|
|
||||||
selected = getprop( "/instrumentation/nav[1]/frequencies/selected-mhz" );
|
|
||||||
standby = getprop( "/instrumentation/nav[1]/frequencies/standby-mhz" );
|
|
||||||
setprop( "/instrumentation/nav[1]/frequencies/selected-mhz", standby );
|
|
||||||
setprop( "/instrumentation/nav[1]/frequencies/standby-mhz", selected );
|
|
||||||
}
|
|
||||||
last_nav2_swap = nav2_swap;
|
|
||||||
|
|
||||||
nav2_fine = getprop("/instrumentation/nav[1]/inputs/fine-tuner");
|
|
||||||
nav2_coarse = getprop("/instrumentation/nav[1]/inputs/coarse-tuner");
|
|
||||||
freq = getprop( "/instrumentation/nav[1]/frequencies/standby-mhz" );
|
|
||||||
coarse_freq = int( freq );
|
|
||||||
fine_freq = int( (freq - coarse_freq) * 20 + 0.5 );
|
|
||||||
if ( nav2_fine != last_nav2_fine ) {
|
|
||||||
diff = nav2_fine - last_nav2_fine;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( nav2_fine < last_nav2_fine ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_nav2_fine + nav2_fine;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = nav2_fine - 12 - last_nav2_fine;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
fine_freq = fine_freq + diff;
|
|
||||||
}
|
|
||||||
while ( fine_freq >= 20.0 ) { fine_freq = fine_freq - 20.0; }
|
|
||||||
while ( fine_freq < 0.0 ) { fine_freq = fine_freq + 20.0; }
|
|
||||||
|
|
||||||
if ( nav2_coarse != last_nav2_coarse ) {
|
|
||||||
diff = nav2_coarse - last_nav2_coarse;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( nav2_coarse < last_nav2_coarse ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_nav2_coarse + nav2_coarse;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = nav2_coarse - 12 - last_nav2_coarse;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
coarse_freq = coarse_freq + diff;
|
|
||||||
}
|
|
||||||
if ( coarse_freq < 108.0 ) { coarse_freq = coarse_freq + 10.0; }
|
|
||||||
if ( coarse_freq > 117.0 ) { coarse_freq = coarse_freq - 10.0; }
|
|
||||||
|
|
||||||
last_nav2_fine = nav2_fine;
|
|
||||||
last_nav2_coarse = nav2_coarse;
|
|
||||||
|
|
||||||
setprop( "/instrumentation/nav[1]/frequencies/standby-mhz",
|
|
||||||
coarse_freq + fine_freq / 20.0 );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# ADF inputs
|
|
||||||
#
|
|
||||||
do_adf_inputs = func {
|
|
||||||
if ( adf_working() ) {
|
|
||||||
adf_fine = getprop( "/instrumentation/kr-87/inputs/fine-tuner" );
|
|
||||||
adf_coarse = getprop( "/instrumentation/kr-87/inputs/coarse-tuner" );
|
|
||||||
adf_count_mode = getprop( "/instrumentation/kr-87/modes/count" );
|
|
||||||
adf_stby_mode = getprop( "/instrumentation/kr-87/modes/stby" );
|
|
||||||
if ( adf_count_mode == 2 ) {
|
|
||||||
# tune count down timer
|
|
||||||
value = getprop( "/instrumentation/kr-87/outputs/elapsed-timer" );
|
|
||||||
} else {
|
|
||||||
# tune frequency
|
|
||||||
if ( adf_stby_mode == 1 ) {
|
|
||||||
value = getprop( "/instrumentation/kr-87/outputs/selected-khz");
|
|
||||||
} else {
|
|
||||||
value = getprop( "/instrumentation/kr-87/outputs/standby-khz" );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
if ( adf_fine != last_adf_fine ) {
|
|
||||||
diff = adf_fine - last_adf_fine;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( adf_fine < last_adf_fine ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_adf_fine + adf_fine;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = adf_fine - 12 - last_adf_fine;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
value = value + diff;
|
|
||||||
}
|
|
||||||
|
|
||||||
if ( adf_coarse != last_adf_coarse ) {
|
|
||||||
diff = adf_coarse - last_adf_coarse;
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( adf_coarse < last_adf_coarse ) {
|
|
||||||
# going up
|
|
||||||
diff = 12 - last_adf_coarse + adf_coarse;
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = adf_coarse - 12 - last_adf_coarse;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
if ( adf_count_mode == 2 ) {
|
|
||||||
value = value + 60 * diff;
|
|
||||||
} else {
|
|
||||||
value = value + 25 * diff;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
if ( adf_count_mode == 2 ) {
|
|
||||||
if ( value < 0 ) { value = value + 3600; }
|
|
||||||
if ( value > 3599 ) { value = value - 3600; }
|
|
||||||
} else {
|
|
||||||
if ( value < 200 ) { value = value + 1600; }
|
|
||||||
if ( value > 1799 ) { value = value - 1600; }
|
|
||||||
}
|
|
||||||
|
|
||||||
last_adf_fine = adf_fine;
|
|
||||||
last_adf_coarse = adf_coarse;
|
|
||||||
|
|
||||||
if ( adf_count_mode == 2 ) {
|
|
||||||
setprop( "/instrumentation/kr-87/outputs/elapsed-timer", value );
|
|
||||||
} else {
|
|
||||||
if ( adf_stby_mode == 1 ) {
|
|
||||||
setprop( "/instrumentation/kr-87/outputs/selected-khz", value );
|
|
||||||
} else {
|
|
||||||
setprop( "/instrumentation/kr-87/outputs/standby-khz", value );
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# ADF inputs
|
|
||||||
#
|
|
||||||
do_xpdr_inputs = func {
|
|
||||||
# map the function knob
|
|
||||||
raw_knob = getprop( "/instrumentation/kt-70/inputs/raw-func-knob" );
|
|
||||||
if ( raw_knob == 0 ) {
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/func-knob", 0 );
|
|
||||||
} elsif ( raw_knob == 1 ) {
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/func-knob", 1 );
|
|
||||||
} elsif ( raw_knob == 2 ) {
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/func-knob", 2 );
|
|
||||||
} elsif ( raw_knob == 4 ) {
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/func-knob", 3 );
|
|
||||||
} elsif ( raw_knob == 8 ) {
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/func-knob", 4 );
|
|
||||||
} elsif ( raw_knob == 16 ) {
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/func-knob", 5 );
|
|
||||||
}
|
|
||||||
|
|
||||||
if ( xpdr_working() ) {
|
|
||||||
|
|
||||||
xpdr[0] = getprop( "/instrumentation/kt-70/inputs/tuner1" );
|
|
||||||
xpdr[1] = getprop( "/instrumentation/kt-70/inputs/tuner2" );
|
|
||||||
xpdr[2] = getprop( "/instrumentation/kt-70/inputs/tuner3" );
|
|
||||||
xpdr[3] = getprop( "/instrumentation/kt-70/inputs/tuner4" );
|
|
||||||
|
|
||||||
id_code = getprop( "/instrumentation/kt-70/outputs/id-code" );
|
|
||||||
|
|
||||||
place = 1000;
|
|
||||||
digit = [ 0, 0, 0, 0 ];
|
|
||||||
for ( i = 0; i < 4; i = i + 1 ) {
|
|
||||||
digit[i] = int( id_code / place );
|
|
||||||
id_code = id_code - digit[i] * place;
|
|
||||||
place = place / 10;
|
|
||||||
}
|
|
||||||
|
|
||||||
for ( i = 0; i < 4; i = i + 1 ) {
|
|
||||||
if ( xpdr[i] != last_xpdr[i] ) {
|
|
||||||
diff = xpdr[i] - last_xpdr[i];
|
|
||||||
if ( globals.abs(diff) > 4 ) {
|
|
||||||
# roll over
|
|
||||||
if ( xpdr[i] < last_xpdr[i] ) {
|
|
||||||
# going up
|
|
||||||
diff = 16 - last_xpdr[i] + xpdr[i];
|
|
||||||
} else {
|
|
||||||
# going down
|
|
||||||
diff = xpdr[i] - 16 - last_xpdr[i];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
digit[i] = digit[i] + diff;
|
|
||||||
}
|
|
||||||
while ( digit[i] >= 8 ) { digit[i] = digit[i] - 8; }
|
|
||||||
while ( digit[i] < 0 ) { digit[i] = digit[i] + 8; }
|
|
||||||
}
|
|
||||||
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/digit1", digit[0] );
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/digit2", digit[1] );
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/digit3", digit[2] );
|
|
||||||
setprop( "/instrumentation/kt-70/inputs/digit4", digit[3] );
|
|
||||||
|
|
||||||
for ( i = 0; i < 4; i = i + 1 ) {
|
|
||||||
last_xpdr[i] = xpdr[i];
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
##
|
|
||||||
# This is the main function. This is called explicitely from the ATC interface
|
|
||||||
# C++ code in the src/Networks/ directory. This lets us run the code exactly
|
|
||||||
# when we want, rather than depending on the nasal system to run it whenever.
|
|
||||||
#
|
|
||||||
do_hardware = func {
|
|
||||||
# only execute if atcflightsim hardware is present and configured
|
|
||||||
if ( have_hardware != nil ) {
|
|
||||||
if ( ! tuners_inited ) {
|
|
||||||
initialize_tuners();
|
|
||||||
}
|
|
||||||
do_dme_inputs();
|
|
||||||
do_com1_inputs();
|
|
||||||
do_com2_inputs();
|
|
||||||
do_nav1_inputs();
|
|
||||||
do_nav2_inputs();
|
|
||||||
do_adf_inputs();
|
|
||||||
do_xpdr_inputs();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
Loading…
Reference in a new issue