]> git.mxchange.org Git - flightgear.git/blobdiff - src/Instrumentation/navradio.cxx
Add a hardwired instrument approach for testing. This will be removed and read from...
[flightgear.git] / src / Instrumentation / navradio.cxx
index 466564010aea72ae1524cd897137d75918aaa313..3e779bbcd47353f38b918226aada6b390e1178c2 100644 (file)
@@ -16,7 +16,7 @@
 //
 // You should have received a copy of the GNU General Public License
 // along with this program; if not, write to the Free Software
-// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 //
 // $Id$
 
 #  include <config.h>
 #endif
 
-#include <iostream>
-#include <string>
+#include "navradio.hxx"
+
 #include <sstream>
 
-#include <simgear/compiler.h>
 #include <simgear/sg_inlines.h>
-#include <simgear/math/sg_random.h>
+#include <simgear/timing/sg_time.hxx>
 #include <simgear/math/vector.hxx>
+#include <simgear/math/sg_random.h>
+#include <simgear/misc/sg_path.hxx>
+#include <simgear/math/sg_geodesy.hxx>
+#include <simgear/structure/exception.hxx>
+#include <simgear/math/interpolater.hxx>
+
+#include <Navaids/navrecord.hxx>
 
-#include <Aircraft/aircraft.hxx>
+#include <Airports/runways.hxx>
 #include <Navaids/navlist.hxx>
+#include <Main/util.hxx>
 
-#include "navradio.hxx"
 
-#include <string>
-SG_USING_STD(string);
+using std::string;
 
+// General-purpose sawtooth function.  Graph looks like this:
+//         /\                                    .
+//       \/
+// Odd symmetry, inversion symmetry about the origin.
+// Unit slope at the origin.
+// Max 1, min -1, period 4.
+// Two zero-crossings per period, one with + slope, one with - slope.
+// Useful for false localizer courses.
+static double sawtooth(double xx)
+{
+  return 4.0 * fabs(xx/4.0 + 0.25 - floor(xx/4.0 + 0.75)) - 1.0;
+}
+
+// Calculate a unit vector in the horizontal tangent plane
+// starting at the given "tail" of the vector and going off 
+// with the given heading.
+static SGVec3d tangentVector(const SGGeod& tail, const SGVec3d& tail_xyz, 
+          const double heading)
+{
+// The fudge factor here is presumably intended to improve
+// numerical stability.  I don't know if it is necessary.
+// It gets divided out later.
+  double fudge(100.0);
+  SGGeod head;
+  double az2; // ignored
+  SGGeodesy::direct(tail, heading, fudge, head, az2);
+  head.setElevationM(tail.getElevationM());
+  SGVec3d head_xyz = SGVec3d::fromGeod(head);
+  return (head_xyz - tail_xyz) * (1.0/fudge);
+}
 
 // Constructor
 FGNavRadio::FGNavRadio(SGPropertyNode *node) :
@@ -52,16 +87,17 @@ FGNavRadio::FGNavRadio(SGPropertyNode *node) :
     power_btn_node(NULL),
     freq_node(NULL),
     alt_freq_node(NULL),
-    fmt_freq_node(NULL),
-    fmt_alt_freq_node(NULL),
     sel_radial_node(NULL),
     vol_btn_node(NULL),
     ident_btn_node(NULL),
     audio_btn_node(NULL),
+    backcourse_node(NULL),
     nav_serviceable_node(NULL),
     cdi_serviceable_node(NULL),
     gs_serviceable_node(NULL),
     tofrom_serviceable_node(NULL),
+    fmt_freq_node(NULL),
+    fmt_alt_freq_node(NULL),
     heading_node(NULL),
     radial_node(NULL),
     recip_radial_node(NULL),
@@ -71,13 +107,17 @@ FGNavRadio::FGNavRadio(SGPropertyNode *node) :
     to_flag_node(NULL),
     from_flag_node(NULL),
     inrange_node(NULL),
+    signal_quality_norm_node(NULL),
     cdi_deflection_node(NULL),
+    cdi_deflection_norm_node(NULL),
     cdi_xtrack_error_node(NULL),
     cdi_xtrack_hdg_err_node(NULL),
     has_gs_node(NULL),
     loc_node(NULL),
     loc_dist_node(NULL),
     gs_deflection_node(NULL),
+    gs_deflection_deg_node(NULL),
+    gs_deflection_norm_node(NULL),
     gs_rate_of_climb_node(NULL),
     gs_dist_node(NULL),
     nav_id_node(NULL),
@@ -89,18 +129,17 @@ FGNavRadio::FGNavRadio(SGPropertyNode *node) :
     gps_cdi_deflection_node(NULL),
     gps_to_flag_node(NULL),
     gps_from_flag_node(NULL),
-    last_nav_id(""),
-    last_nav_vor(false),
+    gps_has_gs_node(NULL),
     play_count(0),
     last_time(0),
-    radial(0.0),
     target_radial(0.0),
     horiz_vel(0.0),
     last_x(0.0),
     last_loc_dist(0.0),
     last_xtrack_error(0.0),
-    name("nav"),
-    num(0),
+    _localizerWidth(5.0),
+    _name(node->getStringValue("name", "nav")),
+    _num(node->getIntValue("number", 0)),
     _time_before_search_sec(-1.0)
 {
     SGPath path( globals->get_fg_root() );
@@ -114,25 +153,6 @@ FGNavRadio::FGNavRadio(SGPropertyNode *node) :
     term_tbl = new SGInterpTable( term.str() );
     low_tbl = new SGInterpTable( low.str() );
     high_tbl = new SGInterpTable( high.str() );
-
-    int i;
-    for ( i = 0; i < node->nChildren(); ++i ) {
-        SGPropertyNode *child = node->getChild(i);
-        string cname = child->getName();
-        string cval = child->getStringValue();
-        if ( cname == "name" ) {
-            name = cval;
-        } else if ( cname == "number" ) {
-            num = child->getIntValue();
-        } else {
-            SG_LOG( SG_INSTR, SG_WARN, 
-                    "Error in nav radio config logic" );
-            if ( name.length() ) {
-                SG_LOG( SG_INSTR, SG_WARN, "Section = " << name );
-            }
-        }
-    }
-
 }
 
 
@@ -151,12 +171,12 @@ FGNavRadio::init ()
     morse.init();
 
     string branch;
-    branch = "/instrumentation/" + name;
+    branch = "/instrumentation/" + _name;
 
-    SGPropertyNode *node = fgGetNode(branch.c_str(), num, true );
+    SGPropertyNode *node = fgGetNode(branch.c_str(), _num, true );
 
     bus_power_node = 
-       fgGetNode(("/systems/electrical/outputs/" + name).c_str(), true);
+       fgGetNode(("/systems/electrical/outputs/" + _name).c_str(), true);
 
     // inputs
     is_valid_node = node->getChild("data-is-valid", 0, true);
@@ -167,6 +187,8 @@ FGNavRadio::init ()
     ident_btn_node->setBoolValue( true );
     audio_btn_node = node->getChild("audio-btn", 0, true);
     audio_btn_node->setBoolValue( true );
+    backcourse_node = node->getChild("back-course-btn", 0, true);
+    backcourse_node->setBoolValue( false );
     nav_serviceable_node = node->getChild("serviceable", 0, true);
     cdi_serviceable_node = (node->getChild("cdi", 0, true))
        ->getChild("serviceable", 0, true);
@@ -196,7 +218,9 @@ FGNavRadio::init ()
     to_flag_node = node->getChild("to-flag", 0, true);
     from_flag_node = node->getChild("from-flag", 0, true);
     inrange_node = node->getChild("in-range", 0, true);
+    signal_quality_norm_node = node->getChild("signal-quality-norm", 0, true);
     cdi_deflection_node = node->getChild("heading-needle-deflection", 0, true);
+    cdi_deflection_norm_node = node->getChild("heading-needle-deflection-norm", 0, true);
     cdi_xtrack_error_node = node->getChild("crosstrack-error-m", 0, true);
     cdi_xtrack_hdg_err_node
         = node->getChild("crosstrack-heading-error-deg", 0, true);
@@ -204,6 +228,8 @@ FGNavRadio::init ()
     loc_node = node->getChild("nav-loc", 0, true);
     loc_dist_node = node->getChild("nav-distance", 0, true);
     gs_deflection_node = node->getChild("gs-needle-deflection", 0, true);
+    gs_deflection_deg_node = node->getChild("gs-needle-deflection-deg", 0, true);
+    gs_deflection_norm_node = node->getChild("gs-needle-deflection-norm", 0, true);
     gs_rate_of_climb_node = node->getChild("gs-rate-of-climb", 0, true);
     gs_dist_node = node->getChild("gs-distance", 0, true);
     nav_id_node = node->getChild("nav-id", 0, true);
@@ -217,11 +243,12 @@ FGNavRadio::init ()
     gps_cdi_deflection_node = fgGetNode("/instrumentation/gps/cdi-deflection", true);
     gps_to_flag_node = fgGetNode("/instrumentation/gps/to-flag", true);
     gps_from_flag_node = fgGetNode("/instrumentation/gps/from-flag", true);
+    gps_has_gs_node = fgGetNode("/instrumentation/gps/has-gs", true);
     
     std::ostringstream temp;
-    temp << name << "nav-ident" << num;
+    temp << _name << "nav-ident" << _num;
     nav_fx_name = temp.str();
-    temp << name << "dme-ident" << num;
+    temp << _name << "dme-ident" << _num;
     dme_fx_name = temp.str();
 }
 
@@ -230,8 +257,8 @@ FGNavRadio::bind ()
 {
     std::ostringstream temp;
     string branch;
-    temp << num;
-    branch = "/instrumentation/" + name + "[" + temp.str() + "]";
+    temp << _num;
+    branch = "/instrumentation/" + _name + "[" + temp.str() + "]";
 }
 
 
@@ -240,8 +267,8 @@ FGNavRadio::unbind ()
 {
     std::ostringstream temp;
     string branch;
-    temp << num;
-    branch = "/instrumentation/" + name + "[" + temp.str() + "]";
+    temp << _num;
+    branch = "/instrumentation/" + _name + "[" + temp.str() + "]";
 }
 
 
@@ -314,647 +341,563 @@ double FGNavRadio::adjustILSRange( double stationElev, double aircraftElev,
 void 
 FGNavRadio::update(double dt) 
 {
-    // Do a nav station search only once a second to reduce
-    // unnecessary work. (Also, make sure to do this before caching
-    // any values!)
-    _time_before_search_sec -= dt;
-    if ( _time_before_search_sec < 0 ) {
-       search();
+  if (dt <= 0.0) {
+    return; // paused
+  }
+    
+  // Create "formatted" versions of the nav frequencies for
+  // instrument displays.
+  char tmp[16];
+  sprintf( tmp, "%.2f", freq_node->getDoubleValue() );
+  fmt_freq_node->setStringValue(tmp);
+  sprintf( tmp, "%.2f", alt_freq_node->getDoubleValue() );
+  fmt_alt_freq_node->setStringValue(tmp);
+
+  if (power_btn_node->getBoolValue() 
+      && (bus_power_node->getDoubleValue() > 1.0)
+      && nav_serviceable_node->getBoolValue() )
+  {   
+    if (nav_slaved_to_gps_node->getBoolValue()) {
+      updateGPSSlaved();
+    } else {
+      updateReceiver(dt);
     }
+    
+    updateCDI(dt);
+  } else {
+    clearOutputs();
+  }
+  
+  updateAudio();
+}
 
-    // cache a few strategic values locally for speed
-    double lon = lon_node->getDoubleValue() * SGD_DEGREES_TO_RADIANS;
-    double lat = lat_node->getDoubleValue() * SGD_DEGREES_TO_RADIANS;
-    double elev = alt_node->getDoubleValue() * SG_FEET_TO_METER;
-    bool power_btn = power_btn_node->getBoolValue();
-    bool nav_serviceable = nav_serviceable_node->getBoolValue();
-    bool cdi_serviceable = cdi_serviceable_node->getBoolValue();
-    bool tofrom_serviceable = tofrom_serviceable_node->getBoolValue();
-    bool inrange = inrange_node->getBoolValue();
-    bool has_gs = has_gs_node->getBoolValue();
-    bool is_loc = loc_node->getBoolValue();
-    double loc_dist = loc_dist_node->getDoubleValue();
-
-    Point3D aircraft = sgGeodToCart( Point3D( lon, lat, elev ) );
-    Point3D station;
-    double az1, az2, s;
-
-    // Create "formatted" versions of the nav frequencies for
-    // instrument displays.
-    char tmp[16];
-    sprintf( tmp, "%.2f", freq_node->getDoubleValue() );
-    fmt_freq_node->setStringValue(tmp);
-    sprintf( tmp, "%.2f", alt_freq_node->getDoubleValue() );
-    fmt_alt_freq_node->setStringValue(tmp);
-
-    // cout << "is_valid = " << is_valid
-    //      << " power_btn = " << power_btn
-    //      << " bus_power = " << bus_power_node->getDoubleValue()
-    //      << " nav_serviceable = " << nav_serviceable
-    //      << endl;
-
-    if ( is_valid && power_btn && (bus_power_node->getDoubleValue() > 1.0)
-         && nav_serviceable )
-    {
-       station = Point3D( nav_x, nav_y, nav_z );
-       loc_dist = aircraft.distance3D( station );
-       loc_dist_node->setDoubleValue( loc_dist );
-        // cout << "station = " << station << " dist = " << loc_dist << endl;
-
-       if ( has_gs ) {
-            // find closest distance to the gs base line
-            sgdVec3 p;
-            sgdSetVec3( p, aircraft.x(), aircraft.y(), aircraft.z() );
-            sgdVec3 p0;
-            sgdSetVec3( p0, gs_x, gs_y, gs_z );
-            double dist = sgdClosestPointToLineDistSquared( p, p0,
-                                                            gs_base_vec );
-            gs_dist_node->setDoubleValue( sqrt( dist ) );
-            // cout << "gs_dist = " << gs_dist_node->getDoubleValue()
-            //      << endl;
-
-            Point3D tmp( gs_x, gs_y, gs_z );
-            // cout << " (" << aircraft.distance3D( tmp ) << ")" << endl;
-
-            // wgs84 heading to glide slope (to determine sign of distance)
-            geo_inverse_wgs_84( elev,
-                                lat * SGD_RADIANS_TO_DEGREES,
-                                lon * SGD_RADIANS_TO_DEGREES, 
-                                gs_lat, gs_lon,
-                                &az1, &az2, &s );
-            double r = az1 - target_radial;
-            while ( r >  180.0 ) { r -= 360.0;}
-            while ( r < -180.0 ) { r += 360.0;}
-            if ( r >= -90.0 && r <= 90.0 ) {
-                gs_dist_signed = gs_dist_node->getDoubleValue();
-            } else {
-                gs_dist_signed = -gs_dist_node->getDoubleValue();
-            }
-            /* cout << "Target Radial = " << target_radial 
-                 << "  Bearing = " << az1
-                 << "  dist (signed) = " << gs_dist_signed
-                 << endl; */
-            
-       } else {
-           gs_dist_node->setDoubleValue( 0.0 );
-       }
-       
-        //////////////////////////////////////////////////////////
+void FGNavRadio::clearOutputs()
+{
+  inrange_node->setBoolValue( false );
+  cdi_deflection_node->setDoubleValue( 0.0 );
+  cdi_deflection_norm_node->setDoubleValue( 0.0 );
+  cdi_xtrack_error_node->setDoubleValue( 0.0 );
+  cdi_xtrack_hdg_err_node->setDoubleValue( 0.0 );
+  time_to_intercept->setDoubleValue( 0.0 );
+  gs_deflection_node->setDoubleValue( 0.0 );
+  gs_deflection_deg_node->setDoubleValue(0.0);
+  gs_deflection_norm_node->setDoubleValue(0.0);
+  
+  to_flag_node->setBoolValue( false );
+  from_flag_node->setBoolValue( false );
+}
+
+void FGNavRadio::updateReceiver(double dt)
+{
+  // Do a nav station search only once a second to reduce
+  // unnecessary work. (Also, make sure to do this before caching
+  // any values!)
+  _time_before_search_sec -= dt;
+  if ( _time_before_search_sec < 0 ) {
+   search();
+  }
+
+  if (!_navaid) {
+    _cdiDeflection = 0.0;
+    _cdiCrossTrackErrorM = 0.0;
+    _toFlag = _fromFlag = false;
+    _gsNeedleDeflection = 0.0;
+    _gsNeedleDeflectionNorm = 0.0;
+    inrange_node->setBoolValue(false);
+    return;
+  }
+
+  SGGeod pos = SGGeod::fromDegFt(lon_node->getDoubleValue(),
+                               lat_node->getDoubleValue(),
+                               alt_node->getDoubleValue());
+                               
+  double nav_elev = _navaid->get_elev_ft();
+  SGVec3d aircraft = SGVec3d::fromGeod(pos);
+  double loc_dist = dist(aircraft, _navaid->cart());
+  loc_dist_node->setDoubleValue( loc_dist );
+  bool is_loc = loc_node->getBoolValue();
+  double signal_quality_norm = signal_quality_norm_node->getDoubleValue();
+  
+  double az2, s;
+  //////////////////////////////////////////////////////////
        // compute forward and reverse wgs84 headings to localizer
-        //////////////////////////////////////////////////////////
-        double hdg;
-       geo_inverse_wgs_84( elev,
-                            lat * SGD_RADIANS_TO_DEGREES,
-                            lon * SGD_RADIANS_TO_DEGREES, 
-                           loc_lat, loc_lon,
-                           &hdg, &az2, &s );
-       // cout << "az1 = " << az1 << " magvar = " << nav_magvar << endl;
-        heading_node->setDoubleValue( hdg );
-        radial = az2 - twist;
-        double recip = radial + 180.0;
-        if ( recip >= 360.0 ) { recip -= 360.0; }
-       radial_node->setDoubleValue( radial );
-       recip_radial_node->setDoubleValue( recip );
-       // cout << " heading = " << heading_node->getDoubleValue()
-       //      << " dist = " << nav_dist << endl;
-
-        //////////////////////////////////////////////////////////
-        // compute the target/selected radial in "true" heading
-        //////////////////////////////////////////////////////////
-        double trtrue = 0.0;
-        if ( is_loc ) {
-            // ILS localizers radials are already "true" in our
-            // database
-            trtrue = target_radial;
-        } else {
-            // VOR radials need to have that vor's offset added in
-            trtrue = target_radial + twist;
-        }
-
-        while ( trtrue < 0.0 ) { trtrue += 360.0; }
-        while ( trtrue > 360.0 ) { trtrue -= 360.0; }
-        target_radial_true_node->setDoubleValue( trtrue );
-
-        //////////////////////////////////////////////////////////
-       // adjust reception range for altitude
-        //////////////////////////////////////////////////////////
+  //////////////////////////////////////////////////////////
+  double hdg;
+  SGGeodesy::inverse(pos, _navaid->geod(), hdg, az2, s);
+  heading_node->setDoubleValue(hdg);
+  double radial = az2 - twist;
+  double recip = radial + 180.0;
+  SG_NORMALIZE_RANGE(recip, 0.0, 360.0);
+  radial_node->setDoubleValue( radial );
+  recip_radial_node->setDoubleValue( recip );
+  
+  //////////////////////////////////////////////////////////
+  // compute the target/selected radial in "true" heading
+  //////////////////////////////////////////////////////////
+  if (!is_loc) {
+    target_radial = sel_radial_node->getDoubleValue();
+  }
+  
+  // VORs need twist (mag-var) added; ILS/LOCs don't but we set twist to 0.0
+  double trtrue = target_radial + twist;
+  SG_NORMALIZE_RANGE(trtrue, 0.0, 360.0);
+  target_radial_true_node->setDoubleValue( trtrue );
+
+  //////////////////////////////////////////////////////////
+  // adjust reception range for altitude
+  // FIXME: make sure we are using the navdata range now that
+  //        it is valid in the data file
+  //////////////////////////////////////////////////////////
        if ( is_loc ) {
            double offset = radial - target_radial;
-           while ( offset < -180.0 ) { offset += 360.0; }
-           while ( offset > 180.0 ) { offset -= 360.0; }
-           // cout << "ils offset = " << offset << endl;
+      SG_NORMALIZE_RANGE(offset, -180.0, 180.0);
            effective_range
-                = adjustILSRange( nav_elev, elev, offset,
+                = adjustILSRange( nav_elev, pos.getElevationM(), offset,
                                   loc_dist * SG_METER_TO_NM );
        } else {
-           effective_range = adjustNavRange( nav_elev, elev, range );
-       }
-       // cout << "nav range = " << effective_range
-       //      << " (" << range << ")" << endl;
-
-       if ( loc_dist < effective_range * SG_NM_TO_METER ) {
-           inrange = true;
-       } else if ( loc_dist < 2 * effective_range * SG_NM_TO_METER ) {
-           inrange = sg_random() < ( 2 * effective_range * SG_NM_TO_METER
-                                      - loc_dist )
-                                      / (effective_range * SG_NM_TO_METER);
-       } else {
-           inrange = false;
+           effective_range
+                = adjustNavRange( nav_elev, pos.getElevationM(), _navaid->get_range() );
        }
-        inrange_node->setBoolValue( inrange );
 
-       if ( !is_loc ) {
-           target_radial = sel_radial_node->getDoubleValue();
-       }
+  double effective_range_m = effective_range * SG_NM_TO_METER;
+
+  //////////////////////////////////////////////////////////
+  // compute signal quality
+  // 100% within effective_range
+  // decreases 1/x^2 further out
+  //////////////////////////////////////////////////////////  
+  double last_signal_quality_norm = signal_quality_norm;
+
+  if ( loc_dist < effective_range_m ) {
+    signal_quality_norm = 1.0;
+  } else {
+    double range_exceed_norm = loc_dist/effective_range_m;
+    signal_quality_norm = 1/(range_exceed_norm*range_exceed_norm);
+  }
+
+  signal_quality_norm = fgGetLowPass( last_signal_quality_norm, 
+           signal_quality_norm, dt );
+  
+  signal_quality_norm_node->setDoubleValue( signal_quality_norm );
+  bool inrange = signal_quality_norm > 0.2;
+  inrange_node->setBoolValue( inrange );
+  
+  //////////////////////////////////////////////////////////
+  // compute to/from flag status
+  //////////////////////////////////////////////////////////
+  if (inrange) {
+    if (is_loc) {
+      _toFlag = true;
+    } else {
+      double offset = fabs(radial - target_radial);
+      _toFlag = (offset > 90.0 && offset < 270.0);
+    }
+    _fromFlag = !_toFlag;
+  } else {
+    _toFlag = _fromFlag = false;
+  }
+  
+  // CDI deflection
+  double r = target_radial - radial;
+  SG_NORMALIZE_RANGE(r, -180.0, 180.0);
+  
+  if ( is_loc ) {
+    // The factor of 30.0 gives a period of 120 which gives us 3 cycles and six 
+    // zeros i.e. six courses: one front course, one back course, and four 
+    // false courses. Three of the six are reverse sensing.
+    _cdiDeflection = 30.0 * sawtooth(r / 30.0);
+    const double VOR_FULL_ARC = 20.0; // VOR is -10 .. 10 degree swing
+    _cdiDeflection *= VOR_FULL_ARC / _localizerWidth; // increased localiser sensitivity
+  } else {
+    // handle the TO side of the VOR
+    if (fabs(r) > 90.0) {
+      r = ( r<0.0 ? -r-180.0 : -r+180.0 );
+    }
+    _cdiDeflection = r;
+  } // of non-localiser case
+  
+  SG_CLAMP_RANGE(_cdiDeflection, -10.0, 10.0 );
+  _cdiDeflection *= signal_quality_norm;
+  
+  // cross-track error (in metres)
+  _cdiCrossTrackErrorM = loc_dist * sin(r * SGD_DEGREES_TO_RADIANS);
+  
+  updateGlideSlope(dt, aircraft, signal_quality_norm);
+  
+  last_loc_dist = loc_dist;
+}
 
-        //////////////////////////////////////////////////////////
-        // compute to/from flag status
-        //////////////////////////////////////////////////////////
-        double value = false;
-        double offset = fabs(radial - target_radial);
-        if ( tofrom_serviceable ) {
-            if ( nav_slaved_to_gps_node->getBoolValue() ) {
-                value = gps_to_flag_node->getBoolValue();
-            } else if ( inrange ) {
-                if ( is_loc ) {
-                    value = true;
-                } else {
-                    value = !(offset <= 90.0 || offset >= 270.0);
-                }
-            }
-        } else {
-            value = false;
-        }
-        to_flag_node->setBoolValue( value );
-
-        value = false;
-        if ( tofrom_serviceable ) {
-            if ( nav_slaved_to_gps_node->getBoolValue() ) {
-                value = gps_from_flag_node->getBoolValue();
-            } else if ( inrange ) {
-                if ( is_loc ) {
-                    value = false;
-                } else {
-                    value = !(offset > 90.0 && offset < 270.0);
-                }
-            }
-        } else {
-            value = false;
-        }
-        from_flag_node->setBoolValue( value );
-
-        //////////////////////////////////////////////////////////
-        // compute the deflection of the CDI needle, clamped to the range
-        // of ( -10 , 10 )
-        //////////////////////////////////////////////////////////
-        double r = 0.0;
-        if ( cdi_serviceable ) {
-            if ( nav_slaved_to_gps_node->getBoolValue() ) {
-                r = gps_cdi_deflection_node->getDoubleValue();
-                // We want +- 5 dots deflection for the gps, so clamp
-                // to -12.5/12.5
-                if ( r < -12.5 ) { r = -12.5; }
-                if ( r >  12.5 ) { r =  12.5; }
-            } else if ( inrange ) {
-                r = radial - target_radial;
-                // cout << "Target radial = " << target_radial 
-                //      << "  Actual radial = " << radial << endl;
-                
-                while ( r >  180.0 ) { r -= 360.0;}
-                while ( r < -180.0 ) { r += 360.0;}
-                if ( fabs(r) > 90.0 ) {
-                    r = ( r<0.0 ? -r-180.0 : -r+180.0 );
-                }
-
-                // According to Robin Peel, the ILS is 4x more
-                // sensitive than a vor
-                r = -r;         // reverse, since radial is outbound
-                if ( is_loc ) { r *= 4.0; }
-                if ( r < -10.0 ) { r = -10.0; }
-                if ( r >  10.0 ) { r =  10.0; }
-            }
-        }
-        cdi_deflection_node->setDoubleValue( r );
-
-        //////////////////////////////////////////////////////////
-        // compute the amount of cross track distance error in meters
-        //////////////////////////////////////////////////////////
-        double xtrack_error = 0.0;
-        if ( inrange && nav_serviceable && cdi_serviceable ) {
-            r = radial - target_radial;
-            // cout << "Target radial = " << target_radial 
-            //     << "  Actual radial = " << radial
-            //     << "  r = " << r << endl;
+void FGNavRadio::updateGlideSlope(double dt, const SGVec3d& aircraft, double signal_quality_norm)
+{
+  _gsNeedleDeflection = 0.0;
+  if (!_gs || !inrange_node->getBoolValue()) {
+    gs_dist_node->setDoubleValue( 0.0 );
+    return;
+  }
+  
+  double gsDist = dist(aircraft, _gsCart);
+  gs_dist_node->setDoubleValue(gsDist);
+  if (gsDist > (_gs->get_range() * SG_NM_TO_METER)) {
+    return;
+  }
+  
+  SGVec3d pos = aircraft - _gsCart; // relative vector from gs antenna to aircraft
+  // The positive GS axis points along the runway in the landing direction,
+  // toward the far end, not toward the approach area, so we need a - sign here:
+  double dot_h = -dot(pos, _gsAxis);
+  double dot_v = dot(pos, _gsVertical);
+  double angle = atan2(dot_v, dot_h) * SGD_RADIANS_TO_DEGREES;
+  double deflectionAngle = target_gs - angle;
     
-            while ( r >  180.0 ) { r -= 360.0;}
-            while ( r < -180.0 ) { r += 360.0;}
-            if ( fabs(r) > 90.0 ) {
-                r = ( r<0.0 ? -r-180.0 : -r+180.0 );
-            }
-
-            r = -r;             // reverse, since radial is outbound
-
-            xtrack_error = loc_dist * sin(r * SGD_DEGREES_TO_RADIANS);
-        } else {
-            xtrack_error = 0.0;
-        }
-        cdi_xtrack_error_node->setDoubleValue( xtrack_error );
-
-        //////////////////////////////////////////////////////////
-        // compute an approximate ground track heading error
-        //////////////////////////////////////////////////////////
-        double hdg_error = 0.0;
-        if ( inrange && cdi_serviceable ) {
-            double ddist = last_loc_dist - loc_dist;
-            double dxtrack = last_xtrack_error - xtrack_error;
-            double a = atan2( dxtrack, ddist ) * SGD_RADIANS_TO_DEGREES;
-            if ( from_flag_node->getBoolValue() ) {
-                a = 180.0 - a;
-                if ( a > 180.0 ) { a -= 360.0; }
-                if ( a < -180.0 ) { a += 360.0; }
-            }
-            SGPropertyNode *true_hdg
-                = fgGetNode("/orientation/heading-deg", true);
-            // cout << "true heading = " << true_hdg->getDoubleValue()
-            //      << " selrad = " << sel_radial_node->getDoubleValue()
-            //      << " artr = " << a
-            //      << endl;
-            double est_hdg = trtrue + a;
-            if ( est_hdg < 0.0 ) { est_hdg += 360.0; }
-            if ( est_hdg >= 360.0 ) { est_hdg -= 360.0; }
-            hdg_error = est_hdg - true_hdg->getDoubleValue();
-        }
-        cdi_xtrack_hdg_err_node->setDoubleValue( hdg_error );
-
-        //////////////////////////////////////////////////////////
-        // compute the time to intercept selected radial (based on
-        // current and last cross track errors and dt
-        //////////////////////////////////////////////////////////
-        double t = 0.0;
-        if ( inrange && cdi_serviceable ) {
-            double xrate_ms = (last_xtrack_error - xtrack_error) / dt;
-            if ( fabs(xrate_ms) > 0.00001 ) {
-                t = xtrack_error / xrate_ms;
-            } else {
-                t = 9999.9;
-            }
-        }
-        time_to_intercept->setDoubleValue( t );
-
-        //////////////////////////////////////////////////////////
-        // compute the amount of glide slope needle deflection
-        // (.i.e. the number of degrees we are off the glide slope * 5.0
-        //////////////////////////////////////////////////////////
-        r = 0.0;
-        if ( has_gs && gs_serviceable_node->getBoolValue() ) {
-            if ( nav_slaved_to_gps_node->getBoolValue() ) {
-                // FIXME/FINISHME, what should be set here?
-            } else if ( inrange ) {
-                double x = gs_dist_node->getDoubleValue();
-                double y = (fgGetDouble("/position/altitude-ft") - nav_elev)
-                    * SG_FEET_TO_METER;
-                // cout << "dist = " << x << " height = " << y << endl;
-                double angle = asin( y / x ) * SGD_RADIANS_TO_DEGREES;
-                r = (target_gs - angle) * 5.0;
-            }
-        }
-        gs_deflection_node->setDoubleValue( r );
-
-        //////////////////////////////////////////////////////////
-        // Calculate desired rate of climb for intercepting the GS
-        //////////////////////////////////////////////////////////
-        double x = gs_dist_node->getDoubleValue();
-        double y = (alt_node->getDoubleValue() - nav_elev)
-            * SG_FEET_TO_METER;
-        double current_angle = atan2( y, x ) * SGD_RADIANS_TO_DEGREES;
-
-        double target_angle = target_gs;
-        double gs_diff = target_angle - current_angle;
-
-        // convert desired vertical path angle into a climb rate
-        double des_angle = current_angle - 10 * gs_diff;
-
-        // estimate horizontal speed towards ILS in meters per minute
-        double dist = last_x - x;
-        last_x = x;
-        if ( dt > 0.0 ) {
-            // avoid nan
-            double new_vel = ( dist / dt );
+  // Construct false glideslopes.  The scale factor of 1.5 
+  // in the sawtooth gives a period of 6 degrees.
+  // There will be zeros at 3, 6r, 9, 12r et cetera
+  // where "r" indicates reverse sensing.
+  // This is is consistent with conventional pilot lore
+  // e.g. http://www.allstar.fiu.edu/aerojava/ILS.htm
+  // but inconsistent with
+  // http://www.freepatentsonline.com/3757338.html
+  //
+  // It may be that some of each exist.
+  if (deflectionAngle < 0) {
+    deflectionAngle = 1.5 * sawtooth(deflectionAngle / 1.5);
+  } else {
+    // no false GS below the true GS
+  }
+  
+  _gsNeedleDeflection = deflectionAngle * 5.0;
+  _gsNeedleDeflection *= signal_quality_norm;
+  
+  SG_CLAMP_RANGE(deflectionAngle, -0.7, 0.7);
+  _gsNeedleDeflectionNorm = (deflectionAngle / 0.7) * signal_quality_norm;
+  
+  //////////////////////////////////////////////////////////
+  // Calculate desired rate of climb for intercepting the GS
+  //////////////////////////////////////////////////////////
+  double gs_diff = target_gs - angle;
+  // convert desired vertical path angle into a climb rate
+  double des_angle = angle - 10 * gs_diff;
+
+  // estimate horizontal speed towards ILS in meters per minute
+  double elapsedDistance = last_x - gsDist;
+  last_x = gsDist;
+      
+  double new_vel = ( elapsedDistance / dt );
+  horiz_vel = 0.75 * horiz_vel + 0.25 * new_vel;
+
+  gs_rate_of_climb_node
+      ->setDoubleValue( -sin( des_angle * SGD_DEGREES_TO_RADIANS )
+                        * horiz_vel * SG_METER_TO_FEET );
+}
+
+void FGNavRadio::updateGPSSlaved()
+{
+  has_gs_node->setBoolValue(gps_has_gs_node->getBoolValue());
  
-            horiz_vel = 0.75 * horiz_vel + 0.25 * new_vel;
-            // double horiz_vel = cur_fdm_state->get_V_ground_speed()
-            //    * SG_FEET_TO_METER * 60.0;
-            // double horiz_vel = airspeed_node->getFloatValue()
-            //    * SG_FEET_TO_METER * 60.0;
-
-            gs_rate_of_climb_node
-                ->setDoubleValue( -sin( des_angle * SGD_DEGREES_TO_RADIANS )
-                                  * horiz_vel * SG_METER_TO_FEET );
-        }
-
-        //////////////////////////////////////////////////////////
-        // Calculate a suggested target heading to smoothly intercept
-        // a nav/ils radial.
-        //////////////////////////////////////////////////////////
-
-        // FIXME: this smells odd, there must be a better (or more
-        // linear) solution
-        //
-        // determine the heading adjustment needed.
-        // over 8km scale by 3.0 
-        //    (3 is chosen because max deflection is 10
-        //    and 30 is clamped angle to radial)
-        // under 8km scale by 10.0
-        //    because the overstated error helps drive it to the radial in a 
-        //    moderate cross wind.
-        double adjustment = 0.0;
-        if ( loc_dist > 8000 ) {
-            adjustment = cdi_deflection_node->getDoubleValue() * 3.0;
-        } else {
-            adjustment = cdi_deflection_node->getDoubleValue() * 10.0;
-        }
-        SG_CLAMP_RANGE( adjustment, -30.0, 30.0 );
-        
-        // determine the target heading to fly to intercept the
-        // tgt_radial = target radial (true) + cdi offset adjustmest -
-        // xtrack heading error adjustment
-        double nta_hdg = trtrue + adjustment - hdg_error; 
-        while ( nta_hdg <   0.0 ) { nta_hdg += 360.0; }
-        while ( nta_hdg > 360.0 ) { nta_hdg -= 360.0; }
-        target_auto_hdg_node->setDoubleValue( nta_hdg );
-
-        last_xtrack_error = xtrack_error;
-   } else {
-       inrange_node->setBoolValue( false );
-        cdi_deflection_node->setDoubleValue( 0.0 );
-        cdi_xtrack_error_node->setDoubleValue( 0.0 );
-        cdi_xtrack_hdg_err_node->setDoubleValue( 0.0 );
-        time_to_intercept->setDoubleValue( 0.0 );
-        gs_deflection_node->setDoubleValue( 0.0 );
-        to_flag_node->setBoolValue( false );
-        from_flag_node->setBoolValue( false );
-       // cout << "not picking up vor. :-(" << endl;
+  _toFlag = gps_to_flag_node->getBoolValue();
+  _fromFlag = gps_from_flag_node->getBoolValue();
+
+  inrange_node->setBoolValue(_toFlag | _fromFlag);
+  
+  _cdiDeflection =  gps_cdi_deflection_node->getDoubleValue();
+  // clmap to some range (+/- 10 degrees) as the regular deflection
+  SG_CLAMP_RANGE(_cdiDeflection, -10.0, 10.0 );
+  
+  _cdiCrossTrackErrorM = 0.0; // FIXME, supply this
+  _gsNeedleDeflection = 0.0; // FIXME, supply this
+}
+
+void FGNavRadio::updateCDI(double dt)
+{
+  bool cdi_serviceable = cdi_serviceable_node->getBoolValue();
+  bool inrange = inrange_node->getBoolValue();
+                               
+  if (tofrom_serviceable_node->getBoolValue()) {
+    to_flag_node->setBoolValue(_toFlag);
+    from_flag_node->setBoolValue(_fromFlag);
+  } else {
+    to_flag_node->setBoolValue(false);
+    from_flag_node->setBoolValue(false);
+  }
+  
+  if (!cdi_serviceable) {
+    _cdiDeflection = 0.0;
+    _cdiCrossTrackErrorM = 0.0;
+  }
+  
+  cdi_deflection_node->setDoubleValue(_cdiDeflection);
+  cdi_deflection_norm_node->setDoubleValue(_cdiDeflection * 0.1);
+  cdi_xtrack_error_node->setDoubleValue(_cdiCrossTrackErrorM);
+
+  //////////////////////////////////////////////////////////
+  // compute an approximate ground track heading error
+  //////////////////////////////////////////////////////////
+  double hdg_error = 0.0;
+  if ( inrange && cdi_serviceable ) {
+    double vn = fgGetDouble( "/velocities/speed-north-fps" );
+    double ve = fgGetDouble( "/velocities/speed-east-fps" );
+    double gnd_trk_true = atan2( ve, vn ) * SGD_RADIANS_TO_DEGREES;
+    if ( gnd_trk_true < 0.0 ) { gnd_trk_true += 360.0; }
+
+    SGPropertyNode *true_hdg
+        = fgGetNode("/orientation/heading-deg", true);
+    hdg_error = gnd_trk_true - true_hdg->getDoubleValue();
+
+    // cout << "ground track = " << gnd_trk_true
+    //      << " orientation = " << true_hdg->getDoubleValue() << endl;
+  }
+  cdi_xtrack_hdg_err_node->setDoubleValue( hdg_error );
+
+  //////////////////////////////////////////////////////////
+  // Calculate a suggested target heading to smoothly intercept
+  // a nav/ils radial.
+  //////////////////////////////////////////////////////////
+
+  // Now that we have cross track heading adjustment built in,
+  // we shouldn't need to overdrive the heading angle within 8km
+  // of the station.
+  //
+  // The cdi deflection should be +/-10 for a full range of deflection
+  // so multiplying this by 3 gives us +/- 30 degrees heading
+  // compensation.
+  double adjustment = _cdiDeflection * 3.0;
+  SG_CLAMP_RANGE( adjustment, -30.0, 30.0 );
+
+  // determine the target heading to fly to intercept the
+  // tgt_radial = target radial (true) + cdi offset adjustmest -
+  // xtrack heading error adjustment
+  double nta_hdg;
+  double trtrue = target_radial_true_node->getDoubleValue();
+  if ( loc_node->getBoolValue() && backcourse_node->getBoolValue() ) {
+      // tuned to a localizer and backcourse mode activated
+      trtrue += 180.0;   // reverse the target localizer heading
+      SG_NORMALIZE_RANGE(trtrue, 0.0, 360.0);
+      nta_hdg = trtrue - adjustment - hdg_error;
+  } else {
+      nta_hdg = trtrue + adjustment - hdg_error;
+  }
+
+  SG_NORMALIZE_RANGE(nta_hdg, 0.0, 360.0);
+  target_auto_hdg_node->setDoubleValue( nta_hdg );
+
+  //////////////////////////////////////////////////////////
+  // compute the time to intercept selected radial (based on
+  // current and last cross track errors and dt
+  //////////////////////////////////////////////////////////
+  double t = 0.0;
+  if ( inrange && cdi_serviceable ) {
+    double xrate_ms = (last_xtrack_error - _cdiCrossTrackErrorM) / dt;
+    if ( fabs(xrate_ms) > 0.00001 ) {
+        t = _cdiCrossTrackErrorM / xrate_ms;
+    } else {
+        t = 9999.9;
     }
+  }
+  time_to_intercept->setDoubleValue( t );
+
+  if (!gs_serviceable_node->getBoolValue() ) {
+    _gsNeedleDeflection = 0.0;
+    _gsNeedleDeflectionNorm = 0.0;
+  }
+  gs_deflection_node->setDoubleValue(_gsNeedleDeflection);
+  gs_deflection_deg_node->setDoubleValue(_gsNeedleDeflectionNorm * 0.7);
+  gs_deflection_norm_node->setDoubleValue(_gsNeedleDeflectionNorm);
+  
+  last_xtrack_error = _cdiCrossTrackErrorM;
+}
 
-    // audio effects
-    if ( is_valid && inrange && nav_serviceable ) {
+void FGNavRadio::updateAudio()
+{
+  if (!_navaid || !inrange_node->getBoolValue() || !nav_serviceable_node->getBoolValue()) {
+    return;
+  }
+  
        // play station ident via audio system if on + ident,
        // otherwise turn it off
-       if ( power_btn
-             && (bus_power_node->getDoubleValue() > 1.0)
-             && ident_btn_node->getBoolValue()
-             && audio_btn_node->getBoolValue() )
-        {
-           SGSoundSample *sound;
-           sound = globals->get_soundmgr()->find( nav_fx_name );
-            double vol = vol_btn_node->getDoubleValue();
-            if ( vol < 0.0 ) { vol = 0.0; }
-            if ( vol > 1.0 ) { vol = 1.0; }
-            if ( sound != NULL ) {
-                sound->set_volume( vol );
-            } else {
-                SG_LOG( SG_COCKPIT, SG_ALERT,
-                        "Can't find nav-vor-ident sound" );
-            }
-           sound = globals->get_soundmgr()->find( dme_fx_name );
-            if ( sound != NULL ) {
-                sound->set_volume( vol );
-            } else {
-                SG_LOG( SG_COCKPIT, SG_ALERT,
-                        "Can't find nav-dme-ident sound" );
-            }
-            // cout << "last_time = " << last_time << " ";
-            // cout << "cur_time = "
-            //      << globals->get_time_params()->get_cur_time();
-           if ( last_time <
-                globals->get_time_params()->get_cur_time() - 30 ) {
+       if (!power_btn_node->getBoolValue()
+      || !(bus_power_node->getDoubleValue() > 1.0)
+      || !ident_btn_node->getBoolValue()
+      || !audio_btn_node->getBoolValue() ) {
+    globals->get_soundmgr()->stop( nav_fx_name );
+    globals->get_soundmgr()->stop( dme_fx_name );
+    return;
+  }
+
+  SGSoundSample *sound = globals->get_soundmgr()->find( nav_fx_name );
+  double vol = vol_btn_node->getDoubleValue();
+  SG_CLAMP_RANGE(vol, 0.0, 1.0);
+  
+  if ( sound != NULL ) {
+    sound->set_volume( vol );
+  } else {
+    SG_LOG( SG_COCKPIT, SG_ALERT, "Can't find nav-vor-ident sound" );
+  }
+  
+  sound = globals->get_soundmgr()->find( dme_fx_name );
+  if ( sound != NULL ) {
+    sound->set_volume( vol );
+  } else {
+    SG_LOG( SG_COCKPIT, SG_ALERT, "Can't find nav-dme-ident sound" );
+  }
+
+  if ( last_time < globals->get_time_params()->get_cur_time() - 30 ) {
                last_time = globals->get_time_params()->get_cur_time();
                play_count = 0;
-           }
-            // cout << " play_count = " << play_count << endl;
-            // cout << "playing = "
-            //      << globals->get_soundmgr()->is_playing(nav_fx_name)
-            //      << endl;
-           if ( play_count < 4 ) {
+  }
+  
+  if ( play_count < 4 ) {
                // play VOR ident
                if ( !globals->get_soundmgr()->is_playing(nav_fx_name) ) {
                    globals->get_soundmgr()->play_once( nav_fx_name );
                    ++play_count;
-                }
-           } else if ( play_count < 5 && has_dme ) {
+    }
+  } else if ( play_count < 5 &&  has_dme) {
                // play DME ident
                if ( !globals->get_soundmgr()->is_playing(nav_fx_name) &&
                     !globals->get_soundmgr()->is_playing(dme_fx_name) ) {
                    globals->get_soundmgr()->play_once( dme_fx_name );
                    ++play_count;
                }
-           }
-       } else {
-           globals->get_soundmgr()->stop( nav_fx_name );
-           globals->get_soundmgr()->stop( dme_fx_name );
-       }
-    }
-
-    last_loc_dist = loc_dist;
+  }
 }
 
+FGNavRecord* FGNavRadio::findPrimaryNavaid(const SGGeod& aPos, double aFreqMHz)
+{
+  FGNavRecord* nav = globals->get_navlist()->findByFreq(aFreqMHz, aPos);
+  if (nav) {
+    return nav;
+  }
+  
+  return globals->get_loclist()->findByFreq(aFreqMHz, aPos);
+}
 
 // Update current nav/adf radio stations based on current postition
 void FGNavRadio::search() 
 {
+  _time_before_search_sec = 1.0;
+  SGGeod pos = SGGeod::fromDegFt(lon_node->getDoubleValue(),
+    lat_node->getDoubleValue(), alt_node->getDoubleValue());
+  double freq = freq_node->getDoubleValue();
+  
+  FGNavRecord* nav = findPrimaryNavaid(pos, freq);
+  if (nav == _navaid) {
+    return; // found the same as last search, we're done
+  }
+  
+  _navaid = nav;
+  char identBuffer[5] = "    ";
+  if (nav) {
+    FGNavRecord* dme = globals->get_dmelist()->findByFreq(freq, pos);
+    has_dme = (dme != NULL);
+    
+    nav_id_node->setStringValue(nav->get_ident());
+    strncpy(identBuffer, nav->ident().c_str(), 5);
+    
+    effective_range = adjustNavRange(nav->get_elev_ft(), pos.getElevationM(), nav->get_range());
+    loc_node->setBoolValue(nav->type() != FGPositioned::VOR);
+    twist = nav->get_multiuse();
+
+    if (nav->type() == FGPositioned::VOR) {
+      target_radial = sel_radial_node->getDoubleValue();
+      _gs = NULL;
+    } else { // ILS or LOC
+      _gs = globals->get_gslist()->findByFreq(freq, pos);
+      _localizerWidth = localizerWidth(nav);
+      has_gs_node->setBoolValue(_gs != NULL);
+      twist = 0.0;
+           effective_range = nav->get_range();
+      
+      target_radial = nav->get_multiuse();
+      SG_NORMALIZE_RANGE(target_radial, 0.0, 360.0);
+      
+      if (_gs) {
+        int tmp = (int)(_gs->get_multiuse() / 1000.0);
+        target_gs = (double)tmp / 100.0;
+        
+        // GS axis unit tangent vector
+        // (along the runway)
+        _gsCart = _gs->cart();
+        _gsAxis = tangentVector(_gs->geod(), _gsCart, target_radial);
+
+        // GS baseline unit tangent vector
+        // (perpendicular to the runay along the ground)
+        SGVec3d baseline = tangentVector(_gs->geod(), _gsCart, target_radial + 90.0);
+        _gsVertical = cross(baseline, _gsAxis);
+      } // of have glideslope
+    } // of found LOC or ILS
+    
+    audioNavidChanged();
+  } else { // found nothing
+    _gs = NULL;
+    nav_id_node->setStringValue("");
+    has_dme = false;
+    globals->get_soundmgr()->remove( nav_fx_name );
+    globals->get_soundmgr()->remove( dme_fx_name );
+  }
+
+  is_valid_node->setBoolValue(nav != NULL);
+  id_c1_node->setIntValue( (int)identBuffer[0] );
+  id_c2_node->setIntValue( (int)identBuffer[1] );
+  id_c3_node->setIntValue( (int)identBuffer[2] );
+  id_c4_node->setIntValue( (int)identBuffer[3] );
+}
 
-    // reset search time
-    _time_before_search_sec = 1.0;
-
-    // cache values locally for speed
-    double lon = lon_node->getDoubleValue() * SGD_DEGREES_TO_RADIANS;
-    double lat = lat_node->getDoubleValue() * SGD_DEGREES_TO_RADIANS;
-    double elev = alt_node->getDoubleValue() * SG_FEET_TO_METER;
-
-    FGNavRecord *nav = NULL;
-    FGNavRecord *loc = NULL;
-    FGNavRecord *dme = NULL;
-    FGNavRecord *gs = NULL;
-
-    ////////////////////////////////////////////////////////////////////////
-    // Nav.
-    ////////////////////////////////////////////////////////////////////////
-
-    double freq = freq_node->getDoubleValue();
-    nav = globals->get_navlist()->findByFreq(freq, lon, lat, elev);
-    dme = globals->get_dmelist()->findByFreq(freq, lon, lat, elev);
-    if ( nav == NULL ) {
-        loc = globals->get_loclist()->findByFreq(freq, lon, lat, elev);
-        gs = globals->get_gslist()->findByFreq(freq, lon, lat, elev);
-    }
+double FGNavRadio::localizerWidth(FGNavRecord* aLOC)
+{
+  FGRunway* rwy = aLOC->runway();
+  assert(rwy);
+  
+  SGVec3d thresholdCart(SGVec3d::fromGeod(rwy->threshold()));
+  double axisLength = dist(aLOC->cart(), thresholdCart);
+  double landingLength = dist(thresholdCart, SGVec3d::fromGeod(rwy->end()));
+  
+// Reference: http://dcaa.slv.dk:8000/icaodocs/
+// ICAO standard width at threshold is 210 m = 689 feet = approx 700 feet.
+// ICAO 3.1.1 half course = DDM = 0.0775
+// ICAO 3.1.3.7.1 Sensitivity 0.00145 DDM/m at threshold
+//  implies peg-to-peg of 214 m ... we will stick with 210.
+// ICAO 3.1.3.7.1 "Course sector angle shall not exceed 6 degrees."
+              
+// Very short runway:  less than 1200 m (4000 ft) landing length:
+  if (landingLength < 1200.0) {
+// ICAO fudges localizer sensitivity for very short runways.
+// This produces a non-monotonic sensitivity-versus length relation.
+    axisLength += 1050.0;
+  }
+
+// Example: very short: San Diego   KMYF (Montgomery Field) ILS RWY 28R
+// Example: short:      Tom's River KMJX (Robert J. Miller) ILS RWY 6
+// Example: very long:  Denver      KDEN (Denver)           ILS RWY 16R
+  double raw_width = 210.0 / axisLength * SGD_RADIANS_TO_DEGREES;
+  return raw_width < 6.0? raw_width : 6.0;
+}
 
-    string nav_id = "";
-
-    if ( loc != NULL ) {
-        nav_id = loc->get_ident();
-       nav_id_node->setStringValue( nav_id.c_str() );
-        // cout << "localizer = " << nav_id_node->getStringValue() << endl;
-       is_valid = true;
-       if ( last_nav_id != nav_id || last_nav_vor ) {
-           trans_ident = loc->get_trans_ident();
-           target_radial = loc->get_multiuse();
-           while ( target_radial <   0.0 ) { target_radial += 360.0; }
-           while ( target_radial > 360.0 ) { target_radial -= 360.0; }
-           loc_lon = loc->get_lon();
-           loc_lat = loc->get_lat();
-           nav_x = loc->get_x();
-           nav_y = loc->get_y();
-           nav_z = loc->get_z();
-           last_nav_id = nav_id;
-           last_nav_vor = false;
-           loc_node->setBoolValue( true );
-           has_dme = (dme != NULL);
-            if ( gs != NULL ) {
-                has_gs_node->setBoolValue( true );
-                gs_lon = gs->get_lon();
-                gs_lat = gs->get_lat();
-                nav_elev = gs->get_elev_ft();
-                int tmp = (int)(gs->get_multiuse() / 1000.0);
-                target_gs = (double)tmp / 100.0;
-                gs_x = gs->get_x();
-                gs_y = gs->get_y();
-                gs_z = gs->get_z();
-
-                // derive GS baseline (perpendicular to the runay
-                // along the ground)
-                double tlon, tlat, taz;
-                geo_direct_wgs_84 ( 0.0, gs_lat, gs_lon,
-                                    target_radial + 90,  
-                                    100.0, &tlat, &tlon, &taz );
-                // cout << "target_radial = " << target_radial << endl;
-                // cout << "nav_loc = " << loc_node->getBoolValue() << endl;
-                // cout << gs_lon << "," << gs_lat << "  "
-                //      << tlon << "," << tlat << "  (" << nav_elev << ")"
-                //      << endl;
-                Point3D p1 = sgGeodToCart( Point3D(tlon*SGD_DEGREES_TO_RADIANS,
-                                                   tlat*SGD_DEGREES_TO_RADIANS,
-                                                   nav_elev*SG_FEET_TO_METER)
-                                           );
-                // cout << gs_x << "," << gs_y << "," << gs_z
-                //      << endl;
-                // cout << p1 << endl;
-                sgdSetVec3( gs_base_vec,
-                            p1.x()-gs_x, p1.y()-gs_y, p1.z()-gs_z );
-                // cout << gs_base_vec[0] << "," << gs_base_vec[1] << ","
-                //      << gs_base_vec[2] << endl;
-            } else {
-                has_gs_node->setBoolValue( false );
-                nav_elev = loc->get_elev_ft();
-            }
-           twist = 0;
-           range = FG_LOC_DEFAULT_RANGE;
-           effective_range = range;
-
-           if ( globals->get_soundmgr()->exists( nav_fx_name ) ) {
-               globals->get_soundmgr()->remove( nav_fx_name );
-           }
-           SGSoundSample *sound;
-           sound = morse.make_ident( trans_ident, LO_FREQUENCY );
-           sound->set_volume( 0.3 );
-           globals->get_soundmgr()->add( sound, nav_fx_name );
-
-           if ( globals->get_soundmgr()->exists( dme_fx_name ) ) {
-               globals->get_soundmgr()->remove( dme_fx_name );
-           }
-           sound = morse.make_ident( trans_ident, HI_FREQUENCY );
-           sound->set_volume( 0.3 );
-           globals->get_soundmgr()->add( sound, dme_fx_name );
-
-           int offset = (int)(sg_random() * 30.0);
-           play_count = offset / 4;
-           last_time = globals->get_time_params()->get_cur_time() -
-               offset;
-           // cout << "offset = " << offset << " play_count = "
-           //      << play_count
-           //      << " last_time = " << last_time
-           //      << " current time = "
-           //      << globals->get_time_params()->get_cur_time() << endl;
-
-           // cout << "Found an loc station in range" << endl;
-           // cout << " id = " << loc->get_locident() << endl;
-       }
-    } else if ( nav != NULL ) {
-        nav_id = nav->get_ident();
-       nav_id_node->setStringValue( nav_id.c_str() );
-        // cout << "nav = " << nav_id << endl;
-       is_valid = true;
-       if ( last_nav_id != nav_id || !last_nav_vor ) {
-           last_nav_id = nav_id;
-           last_nav_vor = true;
-           trans_ident = nav->get_trans_ident();
-           loc_node->setBoolValue( false );
-           has_dme = (dme != NULL);
-           has_gs_node->setBoolValue( false );
-           loc_lon = nav->get_lon();
-           loc_lat = nav->get_lat();
-           nav_elev = nav->get_elev_ft();
-           twist = nav->get_multiuse();
-           range = nav->get_range();
-           effective_range = adjustNavRange(nav_elev, elev, range);
-           target_gs = 0.0;
-           target_radial = sel_radial_node->getDoubleValue();
-           nav_x = nav->get_x();
-           nav_y = nav->get_y();
-           nav_z = nav->get_z();
-
-           if ( globals->get_soundmgr()->exists( nav_fx_name ) ) {
-               globals->get_soundmgr()->remove( nav_fx_name );
-           }
-            try {
-               SGSoundSample *sound;
-               sound = morse.make_ident( trans_ident, LO_FREQUENCY );
-               sound->set_volume( 0.3 );
-               if ( globals->get_soundmgr()->add( sound, nav_fx_name ) ) {
-                    // cout << "Added nav-vor-ident sound" << endl;
-                } else {
-                    SG_LOG(SG_COCKPIT, SG_WARN, "Failed to add v1-vor-ident sound");
-                }
-
-               if ( globals->get_soundmgr()->exists( dme_fx_name ) ) {
-                   globals->get_soundmgr()->remove( dme_fx_name );
-               }
-               sound = morse.make_ident( trans_ident, HI_FREQUENCY );
-               sound->set_volume( 0.3 );
-               globals->get_soundmgr()->add( sound, dme_fx_name );
-
-               int offset = (int)(sg_random() * 30.0);
-               play_count = offset / 4;
-               last_time = globals->get_time_params()->get_cur_time() - offset;
-               // cout << "offset = " << offset << " play_count = "
-               //      << play_count << " last_time = "
-               //      << last_time << " current time = "
-               //      << globals->get_time_params()->get_cur_time() << endl;
-
-               // cout << "Found a vor station in range" << endl;
-               // cout << " id = " << nav->get_ident() << endl;
-            } catch ( sg_io_exception &e ) {
-                SG_LOG(SG_GENERAL, SG_ALERT, e.getFormattedMessage());
-            }
-       }
-    } else {
-       is_valid = false;
-       nav_id_node->setStringValue( "" );
-       target_radial = 0;
-       trans_ident = "";
-       last_nav_id = "";
-       if ( ! globals->get_soundmgr()->remove( nav_fx_name ) ) {
-            SG_LOG(SG_COCKPIT, SG_WARN, "Failed to remove nav-vor-ident sound");
-        }
-       globals->get_soundmgr()->remove( dme_fx_name );
-       // cout << "not picking up vor1. :-(" << endl;
+void FGNavRadio::audioNavidChanged()
+{
+  if ( globals->get_soundmgr()->exists(nav_fx_name)) {
+               globals->get_soundmgr()->remove(nav_fx_name);
+  }
+  
+  try {
+    string trans_ident(_navaid->get_trans_ident());
+    SGSoundSample* sound = morse.make_ident(trans_ident, LO_FREQUENCY);
+    sound->set_volume( 0.3 );
+    if (!globals->get_soundmgr()->add( sound, nav_fx_name )) {
+      SG_LOG(SG_COCKPIT, SG_WARN, "Failed to add v1-vor-ident sound");
     }
 
-    is_valid_node->setBoolValue( is_valid );
-
-    char tmpid[5];
-    strncpy( tmpid, nav_id.c_str(), 5 );
-    id_c1_node->setIntValue( (int)tmpid[0] );
-    id_c2_node->setIntValue( (int)tmpid[1] );
-    id_c3_node->setIntValue( (int)tmpid[2] );
-    id_c4_node->setIntValue( (int)tmpid[3] );
+         if ( globals->get_soundmgr()->exists( dme_fx_name ) ) {
+      globals->get_soundmgr()->remove( dme_fx_name );
+    }
+     
+    sound = morse.make_ident( trans_ident, HI_FREQUENCY );
+    sound->set_volume( 0.3 );
+    globals->get_soundmgr()->add( sound, dme_fx_name );
+
+         int offset = (int)(sg_random() * 30.0);
+         play_count = offset / 4;
+    last_time = globals->get_time_params()->get_cur_time() - offset;
+  } catch (sg_io_exception& e) {
+    SG_LOG(SG_GENERAL, SG_ALERT, e.getFormattedMessage());
+  }
 }