]> git.mxchange.org Git - flightgear.git/commitdiff
Alexander's Approach ATC class modified to support his new menu/transmission code
authordaveluff <daveluff>
Thu, 13 Feb 2003 12:09:28 +0000 (12:09 +0000)
committerdaveluff <daveluff>
Thu, 13 Feb 2003 12:09:28 +0000 (12:09 +0000)
src/ATC/approach.cxx
src/ATC/approach.hxx

index 273fd82ab2bdf346cac39ce6744566cd22eecf4a..11cbfb24b2a42061bb4203fd1f9b7d8efec5a6d2 100644 (file)
-// FGApproach - a class to provide approach control at larger airports.
-//
-// Written by Alexander Kappes, started March 2002.
-//
-// Copyright (C) 2002  Alexander Kappes
-//
-// This program is free software; you can redistribute it and/or
-// modify it under the terms of the GNU General Public License as
-// published by the Free Software Foundation; either version 2 of the
-// License, or (at your option) any later version.
-//
-// This program is distributed in the hope that it will be useful, but
-// WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-// General Public License for more details.
-//
-// 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.
-
-#include "approach.hxx"
-#include "ATCdisplay.hxx"
-#include <Airports/runways.hxx>
-
-#include <simgear/misc/sg_path.hxx>
-
-#ifdef FG_WEATHERCM
-# include <WeatherCM/FGLocalWeatherDatabase.h>
-#else
-# include <Environment/environment_mgr.hxx>
-# include <Environment/environment.hxx>
-#endif
-
-
-PlaneApp::PlaneApp()
-:
-  ident(""),
-  lon(0.0),
-  lat(0.0),
-  alt(0.0),
-  hdg(0.0),
-  dist(0.0),
-  brg(0.0),
-  spd(0.0),
-  contact(0),
-  wpn(0),
-  dnwp(-999.),
-  dcc(0.0),
-  dnc(0.0),
-  aalt(0.0),
-  ahdg(0.0),
-  on_crs(true),
-  tlm(0.0)
-{
-}
-
-//Constructor
-FGApproach::FGApproach() :
-  bucket(0),
-  active_runway(""),
-  active_rw_hdg(0.0),
-  display(false),
-  displaying(false),
-  num_planes(0),
-  transmission(""),
-  first(true),
-  trans_ident(""),
-  approach_failed(false)
-{
-  comm1_node = fgGetNode("/radios/comm[0]/frequencies/selected-mhz", true);
-  comm2_node = fgGetNode("/radios/comm[1]/frequencies/selected-mhz", true);
-
-  lon_node = fgGetNode("/position/longitude-deg", true);
-  lat_node = fgGetNode("/position/latitude-deg", true);
-  elev_node = fgGetNode("/position/altitude-ft", true);
-}
-
-//Destructor
-FGApproach::~FGApproach(){
-}
-
-void FGApproach::Init() {
-  display    = false;
-}
-
-// ============================================================================
-// the main update function
-// ============================================================================
-void FGApproach::Update() {
-
-  int wpn;
-  double course, d;
-
-  update_plane_dat();
-  if ( active_runway == "" ) get_active_runway();
-  
-  for ( int i=0; i<num_planes; i++ ) {
-    
-    if ( planes[i].contact == 0) {
-      double comm1_freq = comm1_node->getDoubleValue();
-      if ( (int)(comm1_freq*100.0 + 0.5) == freq ) planes[i].contact = 1;
-         //cout << "comm1 = " << (int)(comm1_freq*100.0 + 0.5) << " freq = " << freq << '\n';
-    }
-    else if ( planes[i].contact == 1 ) {
-      if ( planes[i].wpn == 0 ) {    // calculate initial waypoints
-       wpn = planes[i].wpn;
-       // airport
-       planes[i].wpts[wpn][0] = active_rw_hdg;
-       planes[i].wpts[wpn][1] = 0.0;
-       planes[i].wpts[wpn][2] = elev;
-       planes[i].wpts[wpn][4] = 0.0;
-       planes[i].wpts[wpn][5] = 0.0;
-       wpn += 1;
-
-       planes[i].wpts[wpn][0] = active_rw_hdg + 180.0;
-       if ( planes[i].wpts[wpn][0] > 360.0 ) planes[i].wpts[wpn][0] -= 360.0;
-       planes[i].wpts[wpn][1] = 5;
-       planes[i].wpts[wpn][2] = elev + 1000.0;
-       calc_hd_course_dist(planes[i].wpts[wpn][0],   planes[i].wpts[wpn][1],
-                           planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],
-                           &course, &d);
-       planes[i].wpts[wpn][4] = course;
-       planes[i].wpts[wpn][5] = d;
-       wpn += 1;
-       
-       planes[i].wpts[wpn][0] = planes[i].brg;
-       planes[i].wpts[wpn][1] = planes[i].dist;
-       planes[i].wpts[wpn][2] = planes[i].alt;
-       calc_hd_course_dist(planes[i].wpts[wpn][0],   planes[i].wpts[wpn][1],
-                           planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],
-                           &course, &d);
-       planes[i].wpts[wpn][4] = course;
-       planes[i].wpts[wpn][5] = d;
-       wpn += 1;
-
-       planes[i].wpn = wpn;
-
-       planes[i].ahdg = planes[i].wpts[wpn-1][4];
-       cout << endl;
-       cout << "Contact " << planes[i].wpn << endl;
-       cout << "Turn to heading   = " << (int)(planes[i].ahdg) << endl;
-       cout << endl;
-       planes[i].on_crs = true;
-      }
-
-      // reached waypoint?
-      if ( fabs(planes[i].dnc) < 0.3 && planes[i].dnwp < 1.0 ) {
-       planes[i].wpn -= 1;
-       wpn = planes[i].wpn-1;
-       planes[i].ahdg = planes[i].wpts[wpn][4];
-       cout << endl;
-       cout << "Next waypoint = " << planes[i].wpn << endl;
-       cout << "New heading   = " << planes[i].ahdg << endl;
-       cout << endl;
-       planes[i].on_crs = true;
-      }
-
-      // update assigned parameters
-      wpn = planes[i].wpn-1;            // this is the current waypoint
-
-      planes[i].dcc  = calc_psl_dist(planes[i].brg, planes[i].dist,
-                                    planes[i].wpts[wpn][0], planes[i].wpts[wpn][1],
-                                    planes[i].wpts[wpn][4]);
-      planes[i].dnc  = calc_psl_dist(planes[i].brg, planes[i].dist,
-                                    planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],
-                                    planes[i].wpts[wpn-1][4]);
-      calc_hd_course_dist(planes[i].brg, planes[i].dist, 
-                         planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],
-                         &course, &d);
-      planes[i].dnwp = d;
-
-      //cout << planes[i].brg << " " << planes[i].dist << " " << planes[i].wpts[wpn+1][0] 
-      //<< " " << planes[i].wpts[wpn+1][1] << " " << planes[i].wpts[wpn+1][4] 
-      //cout << " distance to current course = " << planes[i].dcc << endl;
-
-      // come off course ?
-      if ( fabs(planes[i].dcc) > 0.5 && planes[i].on_crs) {
-       wpn = wpn-1;
-       if ( planes[i].wpts[wpn][4] < 0) {
-         planes[i].ahdg += 30.0;
-       }
-       else {
-         planes[i].ahdg -= 30.0;
-       }
-       planes[i].on_crs = false;
-
-       cout << endl;
-       cout << "Your are " << planes[i].dcc << " miles off the asigned course: " << endl;
-       cout << "New heading = " << (int)(planes[i].ahdg) << endl;
-       cout << endl;
-      }
-      else if ( fabs(planes[i].dcc) < 0.1 && !planes[i].on_crs) {
-       planes[i].ahdg = fabs(planes[i].wpts[wpn][4]);
-       planes[i].on_crs = true;
-       
-       cout << endl;
-       cout << "New heading = " << (int)(planes[i].ahdg) << endl;
-       cout << endl;
-       }
-      
-      // In range of tower?
-      if ( planes[i].wpn == 2 && planes[i].dnwp < 3. ) {
-       cout << endl;
-       cout << "Contact Tower";
-       cout << endl;
-       planes[i].contact = 2;
-      }
-    }
-  }
-
-}
-
-// ============================================================================
-// get active runway
-// ============================================================================
-void FGApproach::get_active_runway() {
-
-#ifdef FG_WEATHERCM
-  sgVec3 position = { lat, lon, elev };
-  FGPhysicalProperty stationweather = WeatherDatabase->get(position);
-#else
-  FGEnvironment stationweather =
-    globals->get_environment_mgr()->getEnvironment(lat, lon, elev);
-#endif
-
-  SGPath path( globals->get_fg_root() );
-  path.append( "Airports" );
-  path.append( "runways.mk4" );
-  FGRunways runways( path.c_str() );
-  
-  //Set the heading to into the wind
-#ifdef FG_WEATHERCM
-  double wind_x = stationweather.Wind[0];
-  double wind_y = stationweather.Wind[1];
-  
-  double speed = sqrt( wind_x*wind_x + wind_y*wind_y ) * SG_METER_TO_NM / (60.0*60.0);
-  double hdg;
-  
-  //If no wind use 270degrees
-  if(speed == 0) {
-    hdg = 270;
-  } else {
-    // //normalize the wind to get the direction
-    //wind_x /= speed; wind_y /= speed;
-    
-    hdg = - atan2 ( wind_x, wind_y ) * SG_RADIANS_TO_DEGREES ;
-    if (hdg < 0.0)
-      hdg += 360.0;
-  }
-#else
-  double hdg = stationweather.get_wind_from_heading_deg();
-#endif
-
-  FGRunway runway;
-  //if ( runways.search( "EGNX", int(hdg), &runway) ) {
-  if ( runways.search( ident, int(hdg), &runway) ) {
-    active_runway = runway.rwy_no;
-    active_rw_hdg = runway.heading;
-    //cout << "Active runway is: " << active_runway << "  heading = " 
-    // << active_rw_hdg << endl;
-  }
-  else cout << "FGRunways search failed" << endl;
-
-}
-
-// ========================================================================
-// update infos about plane
-// ========================================================================
-void FGApproach::update_plane_dat() {
-  
-  //cout << "Update Approach " << ident << "   " << num_planes << " registered" << endl;
-  // update plane positions
-  for (int i=0; i<num_planes; i++) {
-    planes[i].lon = lon_node->getDoubleValue();
-    planes[i].lat = lat_node->getDoubleValue();
-    planes[i].alt = elev_node->getDoubleValue();
-//    Point3D aircraft = sgGeodToCart( Point3D(planes[i].lon*SGD_DEGREES_TO_RADIANS, 
-//                                          planes[i].lat*SGD_DEGREES_TO_RADIANS, 
-//                                          planes[i].alt*SG_FEET_TO_METER) );
-    double course, distance;
-    calc_gc_course_dist(Point3D(lon*SGD_DEGREES_TO_RADIANS, lat*SGD_DEGREES_TO_RADIANS, 0.0),
-                       Point3D(planes[i].lon*SGD_DEGREES_TO_RADIANS,planes[i].lat*SGD_DEGREES_TO_RADIANS, 0.0 ),
-                       &course, &distance);
-    planes[i].dist = distance/SG_NM_TO_METER;
-    planes[i].brg  = 360.0-course*SGD_RADIANS_TO_DEGREES;
-
-    //cout << "Plane Id: " << planes[i].ident << "  Distance to " << ident 
-    //<< " is " << planes[i].dist << " m" << endl;
-    
-    //if (first) {
-    //transmission = ident;
-    //globals->get_ATC_display()->RegisterRepeatingMessage(transmission);
-    //first = false;
-    //}
-  }   
-}
-
-// =======================================================================
-// Add plane to Approach list
-// =======================================================================
-void FGApproach::AddPlane(string pid) {
-  for ( int i=0; i<num_planes; i++) {
-    if ( planes[i].ident == pid) {
-      //cout << "Plane already registered: " << ident << " " << num_planes << endl;
-      return;
-    }
-  }
-  planes[num_planes].ident = pid;
-  ++num_planes;
-  //cout << "Plane added to list: " << ident << " " << num_planes << endl;
-  return;
-}
-
-// ========================================================================
-// closest distance between a point and a straigt line in 2 dim.
-// ========================================================================
-double FGApproach::calc_psl_dist(const double &h1, const double &d1,
-                                const double &h2, const double &d2,
-                                const double &h3)
-{
-  double a1 = h1 * SGD_DEGREES_TO_RADIANS;
-  double a2 = h2 * SGD_DEGREES_TO_RADIANS;
-  double a3 = h3 * SGD_DEGREES_TO_RADIANS;
-  double x1 = cos(a1) * d1;
-  double y1 = sin(a1) * d1;
-  double x2 = cos(a2) * d2;
-  double y2 = sin(a2) * d2;
-  double x3 = cos(a3);
-  double y3 = sin(a3);
-  
-  // formula: dis = sqrt( (v1-v2)**2 - ((v1-v2)*v3)**2 ); vi = (xi,yi)
-  double val1   = (x1-x2)*(x1-x2) + (y1-y2)*(y1-y2);
-  double val2   = ((x1-x2)*x3 + (y1-y2)*y3) * ((x1-x2)*x3 + (y1-y2)*y3);
-  double dis    = val1 - val2;
-  // now get sign for offset 
-  //cout << x1 << " " << x2 << " " << y1 << " " << y2 << " " 
-  //     << x3 << " " << y3 << " " 
-  //     << val1 << " " << val2 << " " << dis << endl;
-  x3 *= sqrt(val2);
-  y3 *= sqrt(val2);
-  if ( x3*(x1-x2) < 0.0 && y3*(y1-y2) < 0.0) {
-    x3 *= -1.0;
-    y3 *= -1.0;
-  }
-  //cout << x3 << " " << y3 << endl;
-  double dis1   = x1-x2-x3;
-  double dis2   = y1-y2-y3;
-  dis = sqrt(dis);
-  if (atan2(dis2,dis1) < a3) dis *= -1.0;
-  //cout << dis1 << " " << dis2 << " " << atan2(dis2,dis1)*SGD_RADIANS_TO_DEGREES << " " << h3
-  //     << " " << sqrt(dis1*dis1 + dis2*dis2) << " " << dis << endl;
-  //cout << atan2(dis2,dis1)*SGD_RADIANS_TO_DEGREES << " " << dis << endl;
-
-  return dis;
-}
-
-// ========================================================================
-// get heading and distance between two points; point1 ---> point2
-// ========================================================================
-void FGApproach::calc_hd_course_dist(const double &h1, const double &d1, 
-                                    const double &h2, const double &d2,
-                                    double *course, double *dist)
-{
-  double a1 = h1 * SGD_DEGREES_TO_RADIANS;
-  double a2 = h2 * SGD_DEGREES_TO_RADIANS;
-  double x1 = cos(a1) * d1;
-  double y1 = sin(a1) * d1;
-  double x2 = cos(a2) * d2;
-  double y2 = sin(a2) * d2;
-          
-  *dist   = sqrt( (y2-y1)*(y2-y1) + (x2-x1)*(x2-x1) );
-  *course = atan2( (y2-y1), (x2-x1) ) * SGD_RADIANS_TO_DEGREES;
-  if ( *course < 0 ) *course = *course+360;
-  //cout << x1 << " " << y1 << " " << x2 << " " << y2 << " " << *dist << " " << *course << endl;
-}
-
-
-
-int FGApproach::RemovePlane() {
-
-  // first check if anything has to be done
-  int i;
-  bool rmplane = false;
-  for (i=0; i<num_planes; i++) {
-    if (planes[i].dist > range*SG_NM_TO_METER) {
-      rmplane = true;
-      break;
-    }
-  }
-  if (!rmplane) return num_planes;
-
-  // now make a copy of the plane list
-  PlaneApp tmp[max_planes];
-  for (i=0; i<num_planes; i++) {
-    tmp[i] = planes[i];
-  }
-  
-  int np = 0;
-  // now check which planes are still in range
-  for (i=0; i<num_planes; i++) {
-    if (tmp[i].dist <= range*SG_NM_TO_METER) {
-      planes[np] = tmp[i];
-      np += 1;
-    }
-  }
-  num_planes = np;
-  return num_planes;
-}
+// FGApproach - a class to provide approach control at larger airports.\r
+//\r
+// Written by Alexander Kappes, started March 2002.\r
+//\r
+// Copyright (C) 2002  Alexander Kappes\r
+//\r
+// This program is free software; you can redistribute it and/or\r
+// modify it under the terms of the GNU General Public License as\r
+// published by the Free Software Foundation; either version 2 of the\r
+// License, or (at your option) any later version.\r
+//\r
+// This program is distributed in the hope that it will be useful, but\r
+// WITHOUT ANY WARRANTY; without even the implied warranty of\r
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU\r
+// General Public License for more details.\r
+//\r
+// You should have received a copy of the GNU General Public License\r
+// along with this program; if not, write to the Free Software\r
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.\r
+\r
+#include "approach.hxx"\r
+#include "transmission.hxx"\r
+#include "transmissionlist.hxx"\r
+#include "ATCdisplay.hxx"\r
+#include "ATCDialog.hxx"\r
+\r
+#include <Airports/runways.hxx>\r
+#include <simgear/misc/sg_path.hxx>\r
+\r
+#ifdef FG_WEATHERCM\r
+# include <WeatherCM/FGLocalWeatherDatabase.h>\r
+#else\r
+# include <Environment/environment_mgr.hxx>\r
+# include <Environment/environment.hxx>\r
+#endif\r
+\r
+\r
+#include <GUI/gui.h>\r
+\r
+//Constructor\r
+FGApproach::FGApproach(){\r
+  comm1_node = fgGetNode("/radios/comm[0]/frequencies/selected-mhz", true);\r
+  comm2_node = fgGetNode("/radios/comm[1]/frequencies/selected-mhz", true);\r
+\r
+  num_planes = 0;\r
+  lon_node   = fgGetNode("/position/longitude-deg", true);\r
+  lat_node   = fgGetNode("/position/latitude-deg", true);\r
+  elev_node  = fgGetNode("/position/altitude-ft", true);\r
+  hdg_node   = fgGetNode("/orientation/heading-deg", true);\r
+  speed_node = fgGetNode("/velocities/airspeed-kt", true);\r
+  etime_node = fgGetNode("/sim/time/elapsed-ms", true);\r
+\r
+  first = true;\r
+  active_runway = "";\r
+  int i;\r
+  for ( i=0; i<max_planes; i++) {\r
+    planes[i].contact   = 0;\r
+    planes[i].wpn       = 0;\r
+    planes[i].dnwp      = -999.;\r
+    planes[i].on_crs    = true;\r
+    planes[i].turn_rate = 10.0;\r
+    planes[i].desc_rate = 1000.0;\r
+    planes[i].clmb_rate = 500.0;\r
+    planes[i].tlm       = 0.0;\r
+    planes[i].lmc.c1    = 0;\r
+    planes[i].lmc.c2    = 0;\r
+    planes[i].lmc.c3    = -1;\r
+    planes[i].wp_change = false;\r
+  }\r
+}\r
+\r
+//Destructor\r
+FGApproach::~FGApproach(){\r
+}\r
+\r
+void FGApproach::Init() {\r
+  display    = false;\r
+}\r
+\r
+\r
+\r
+// ============================================================================\r
+// the main update function\r
+// ============================================================================\r
+void FGApproach::Update() {\r
+       \r
+       const int max_trans = 20;\r
+       FGTransmission tmissions[max_trans];\r
+       int    wpn;\r
+       int    station = 1;\r
+       TransCode code;\r
+       TransPar TPar;\r
+       int    i,j;\r
+       //double course, d, \r
+       double adif, datp;\r
+       //char   buf[10];\r
+       string message;\r
+       //static string atcmsg1[10];\r
+       //static string atcmsg2[10];\r
+       string mentry;\r
+       string transm;\r
+       TransPar tpars;\r
+       //static bool TransDisplayed = false;\r
+       \r
+       update_plane_dat();\r
+       if ( active_runway == "" ) get_active_runway();\r
+       \r
+       double comm1_freq = comm1_node->getDoubleValue();\r
+       \r
+       //bool DisplayTransmissions = true;\r
+       \r
+       for (i=0; i<num_planes; i++) {\r
+               if ( planes[i].ident == "Player") { \r
+                       station = 1;\r
+                       tpars.station = name;\r
+                       tpars.callsign = "Player";\r
+                       tpars.airport = ident;\r
+                       \r
+                       int num_trans = 0;\r
+                       // is the frequency of the station tuned in?\r
+                       if ( freq == (int)(comm1_freq*100.0 + 0.5) ) {\r
+                               current_transmissionlist->query_station( station, tmissions, max_trans, num_trans );\r
+                               // loop over all transmissions for station\r
+                               for ( j=0; j<=num_trans-1; j++ ) {\r
+                                       code = tmissions[j].get_code();\r
+                                       // select proper transmissions\r
+                                       if ( ( code.c2 == -1 && planes[i].lmc.c3 == 0 ) || \r
+                                               ( code.c1 == 0  && code.c2 == planes[i].lmc.c2 ) ) {\r
+                                               mentry = current_transmissionlist->gen_text(station, code, tpars, false);\r
+                                               transm = current_transmissionlist->gen_text(station, code, tpars, true);\r
+                                               // is the transmission already registered?\r
+                                               if (!current_atcdialog->trans_reg( ident, transm )) {\r
+                                                       current_atcdialog->add_entry( ident, transm, mentry );\r
+                                               }\r
+                                       }\r
+                               }\r
+                       }\r
+               }\r
+       }\r
+       \r
+       for ( i=0; i<num_planes; i++ ) {\r
+               \r
+               if ( planes[i].ident == TPar.callsign && name == TPar.airport && TPar.station == "approach" ) {\r
+                       \r
+                       if ( TPar.request && TPar.intention == "landing" && ident == TPar.intid) {\r
+                               planes[i].wpn = 0; \r
+                               // ===========================\r
+                               // === calculate waypoints ===\r
+                               // ===========================\r
+                               calc_wp( i );  \r
+                               update_param( i );\r
+                               wpn = planes[i].wpn-1;\r
+                               planes[i].aalt = planes[i].wpts[wpn-1][2];\r
+                               planes[i].ahdg = planes[i].wpts[wpn][4];\r
+                               \r
+                               // generate the message\r
+                               code.c1 = 1;\r
+                               code.c2 = 1;\r
+                               code.c3 = 0;\r
+                               adif = angle_diff_deg( planes[i].hdg, planes[i].ahdg );\r
+                               tpars.station = name;\r
+                               tpars.callsign = "Player";\r
+                               if ( adif < 0 ) tpars.tdir = 1;\r
+                               else            tpars.tdir = 2;\r
+                               tpars.heading = planes[i].ahdg;\r
+                               if      (planes[i].alt-planes[i].aalt > 100.0)  tpars.VDir = 1;\r
+                               else if (planes[i].alt-planes[i].aalt < -100.0) tpars.VDir = 3;\r
+                               else tpars.VDir = 2;\r
+                               tpars.alt = planes[i].aalt;\r
+                               message = current_transmissionlist->gen_text(station, code, tpars, true );\r
+                               globals->get_ATC_display()->RegisterSingleMessage( message, 0 );\r
+                               planes[i].lmc = code;\r
+                               planes[i].tlm = etime_node->getDoubleValue();\r
+                               planes[i].on_crs = true;\r
+                               planes[i].contact = 1;\r
+                       }\r
+               }\r
+               \r
+               if ( planes[i].contact == 1 ) {\r
+                       // =========================\r
+                       // === update parameters ===\r
+                       // =========================\r
+                       update_param( i );\r
+                       //cout << planes[i].brg << " " << planes[i].dist << " " << planes[i].wpts[wpn+1][0] \r
+                       //<< " " << planes[i].wpts[wpn+1][1] << " " << planes[i].wpts[wpn+1][4] \r
+                       //cout << wpn << " distance to current course = " << planes[i].dcc << endl;\r
+                       //cout << etime_node->getDoubleValue() << endl;\r
+                       \r
+                       // =========================\r
+                       // === reached waypoint? ===\r
+                       // =========================\r
+                       wpn = planes[i].wpn-2;\r
+                       adif = angle_diff_deg( planes[i].hdg, planes[i].wpts[wpn][4] ) \r
+                       * SGD_DEGREES_TO_RADIANS;\r
+                       datp = 2*sin(fabs(adif)/2.0)*sin(fabs(adif)/2.0) *\r
+                       planes[i].spd/3600. * planes[i].turn_rate + \r
+                       planes[i].spd/3600. * 3.0;\r
+                       //cout << adif/SGD_DEGREES_TO_RADIANS << " " \r
+                       //     << datp << " " << planes[i].dnc << " " << planes[i].dcc <<endl;\r
+                       if ( fabs(planes[i].dnc) < datp ) {\r
+                       //if ( fabs(planes[i].dnc) < 0.3 && planes[i].dnwp < 1.0 ) {\r
+                               planes[i].wpn -= 1;\r
+                               wpn = planes[i].wpn-1;\r
+                               planes[i].ahdg = planes[i].wpts[wpn][4];\r
+                               planes[i].aalt = planes[i].wpts[wpn-1][2];\r
+                               planes[i].wp_change = true;\r
+                               \r
+                               // generate the message\r
+                               adif = angle_diff_deg( planes[i].hdg, planes[i].ahdg );\r
+                               tpars.station = name;\r
+                               tpars.callsign = "Player";\r
+                               if ( adif < 0 ) tpars.tdir = 1;\r
+                               else            tpars.tdir = 2;\r
+                               tpars.heading = planes[i].ahdg;\r
+                               \r
+                               if ( wpn-1 != 0) { \r
+                                       code.c1 = 1;\r
+                                       code.c2 = 1;\r
+                                       code.c3 = 0;\r
+                                       if      (planes[i].alt-planes[i].aalt > 100.0)  tpars.VDir = 1;\r
+                                       else if (planes[i].alt-planes[i].aalt < -100.0) tpars.VDir = 3;\r
+                                       else tpars.VDir = 2;\r
+                                       tpars.alt = planes[i].aalt;\r
+                                       message = current_transmissionlist->gen_text(station, code, tpars, true );\r
+                                       globals->get_ATC_display()->RegisterSingleMessage( message, 0 );\r
+                                       \r
+                               }\r
+                               else {\r
+                                       code.c1 = 1;\r
+                                       code.c2 = 3;\r
+                                       code.c3 = 0;\r
+                                       tpars.runway = active_runway;\r
+                                       message = current_transmissionlist->gen_text(station, code, tpars, true);\r
+                                       globals->get_ATC_display()->RegisterSingleMessage( message, 0 );\r
+                               }\r
+                               planes[i].lmc = code;\r
+                               planes[i].tlm = etime_node->getDoubleValue();\r
+                               planes[i].on_crs = true;\r
+                               \r
+                               update_param( i );\r
+                       }\r
+                       \r
+                       // =========================\r
+                       // === come off course ? ===\r
+                       // =========================\r
+                       if ( fabs(planes[i].dcc) > 1.0 && \r
+                               ( !planes[i].wp_change || \r
+                       etime_node->getDoubleValue() - planes[i].tlm > tbm ) ) {\r
+                               if ( planes[i].on_crs ) {\r
+                                       if ( planes[i].dcc < 0) {\r
+                                               planes[i].ahdg += 30.0;\r
+                                       }\r
+                                       else {\r
+                                               planes[i].ahdg -= 30.0;\r
+                                       }\r
+                                       if (planes[i].ahdg > 360.0) planes[i].ahdg -= 360.0;\r
+                                       else if (planes[i].ahdg < 0.0) planes[i].ahdg += 360.0;\r
+                               }\r
+                               //cout << planes[i].on_crs << " " \r
+                               //     << angle_diff_deg( planes[i].hdg, planes[i].ahdg) << " "\r
+                               //     << etime_node->getDoubleValue() << " "\r
+                               //     << planes[i].tlm << endl;\r
+                               // generate the message\r
+                               if ( planes[i].on_crs || \r
+                                       ( fabs(angle_diff_deg( planes[i].hdg, planes[i].ahdg )) >  30.0  && \r
+                               etime_node->getDoubleValue() - planes[i].tlm > tbm) ) {\r
+                                       // generate the message\r
+                                       code.c1 = 1;\r
+                                       code.c2 = 4;\r
+                                       code.c3 = 0;\r
+                                       adif = angle_diff_deg( planes[i].hdg, planes[i].ahdg );\r
+                                       tpars.station = name;\r
+                                       tpars.callsign = "Player";\r
+                                       tpars.miles   = fabs(planes[i].dcc);\r
+                                       if ( adif < 0 ) tpars.tdir = 1;\r
+                                       else            tpars.tdir = 2;\r
+                                       tpars.heading = planes[i].ahdg;\r
+                                       message = current_transmissionlist->gen_text(station, code, tpars, true);\r
+                                       globals->get_ATC_display()->RegisterSingleMessage( message, 0 );\r
+                                       planes[i].lmc = code;\r
+                                       planes[i].tlm = etime_node->getDoubleValue();\r
+                               }\r
+                               \r
+                               planes[i].on_crs = false;\r
+                       }\r
+                       else if ( !planes[i].on_crs ) {\r
+                               wpn = planes[i].wpn-1;\r
+                               adif = angle_diff_deg( planes[i].hdg, planes[i].wpts[wpn][4] ) \r
+                               * SGD_DEGREES_TO_RADIANS;\r
+                               datp = 2*sin(fabs(adif)/2.0)*sin(fabs(adif)/2.0) *\r
+                               planes[i].spd/3600. * planes[i].turn_rate + \r
+                               planes[i].spd/3600. * 3.0;\r
+                               if ( fabs(planes[i].dcc) < datp ) { \r
+                                       planes[i].ahdg = fabs(planes[i].wpts[wpn][4]);\r
+                                       \r
+                                       // generate the message\r
+                                       code.c1 = 1;\r
+                                       code.c2 = 2;\r
+                                       code.c3 = 0;\r
+                                       tpars.station = name;\r
+                                       tpars.callsign = "Player";\r
+                                       if ( adif < 0 ) tpars.tdir = 1;\r
+                                       else            tpars.tdir = 2;\r
+                                       tpars.heading = planes[i].ahdg;\r
+                                       message = current_transmissionlist->gen_text(station, code, tpars, true);\r
+                                       globals->get_ATC_display()->RegisterSingleMessage( message, 0 );\r
+                                       planes[i].lmc = code;\r
+                                       planes[i].tlm = etime_node->getDoubleValue();\r
+                                       \r
+                                       planes[i].on_crs = true;          \r
+                               } \r
+                       }\r
+                       else if ( planes[i].wp_change  ) {\r
+                               planes[i].wp_change = false;\r
+                       }\r
+                       \r
+                       // ===================================================================\r
+                       // === Less than two minutes away from touchdown? -> Contact Tower ===\r
+                       // ===================================================================\r
+                       if ( planes[i].wpn == 2 && planes[i].dnwp < planes[i].spd/60.*2.0 ) {\r
+                               \r
+                               double freq = 121.95;\r
+                               // generate message\r
+                               code.c1 = 1;\r
+                               code.c2 = 5;\r
+                               code.c3 = 0;\r
+                               tpars.station = name;\r
+                               tpars.callsign = "Player";\r
+                               tpars.freq    = freq;\r
+                               message = current_transmissionlist->gen_text(station, code, tpars, true);\r
+                               globals->get_ATC_display()->RegisterSingleMessage( message, 0 );\r
+                               planes[i].lmc = code;\r
+                               planes[i].tlm = etime_node->getDoubleValue();\r
+                               \r
+                               planes[i].contact = 2;\r
+                       }\r
+               }\r
+       }\r
+       \r
+}\r
+\r
+\r
+// ============================================================================\r
+// update course parameters\r
+// ============================================================================\r
+void FGApproach::update_param( const int &i ) {\r
+  \r
+  double course, d;\r
+\r
+  int wpn = planes[i].wpn-1;            // this is the current waypoint\r
+\r
+  planes[i].dcc  = calc_psl_dist(planes[i].brg, planes[i].dist,\r
+                                planes[i].wpts[wpn][0], planes[i].wpts[wpn][1],\r
+                                planes[i].wpts[wpn][4]);\r
+  planes[i].dnc  = calc_psl_dist(planes[i].brg, planes[i].dist,\r
+                                planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+                                planes[i].wpts[wpn-1][4]);\r
+  calc_hd_course_dist(planes[i].brg, planes[i].dist, \r
+                     planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+                     &course, &d);\r
+  planes[i].dnwp = d;\r
+\r
+}\r
+\r
+// ============================================================================\r
+// smallest difference between two angles in degree\r
+// difference is negative if a1 > a2 and positive if a2 > a1\r
+// ===========================================================================\r
+double FGApproach::angle_diff_deg( const double &a1, const double &a2) {\r
+  \r
+  double a3 = a2 - a1;\r
+  if (a3 < 180.0) a3 += 360.0;\r
+  if (a3 > 180.0) a3 -= 360.0;\r
+\r
+  return a3;\r
+}\r
+\r
+// ============================================================================\r
+// calculate waypoints\r
+// ============================================================================\r
+void FGApproach::calc_wp( const int &i ) {\r
+       \r
+       int j;\r
+       double course, d, cd, a1;\r
+       \r
+       int wpn = planes[i].wpn;\r
+       // waypoint 0: Threshold of active runway\r
+       calc_gc_course_dist(Point3D(lon*SGD_DEGREES_TO_RADIANS, lat*SGD_DEGREES_TO_RADIANS, 0.0),\r
+       Point3D(active_rw_lon*SGD_DEGREES_TO_RADIANS,active_rw_lat*SGD_DEGREES_TO_RADIANS, 0.0 ),\r
+       &course, &d);\r
+       double d1 = active_rw_hdg+180.0;\r
+       if ( d1 > 360.0 ) d1 -=360.0;\r
+       calc_cd_head_dist(360.0-course*SGD_RADIANS_TO_DEGREES, d/SG_NM_TO_METER, \r
+       d1, active_rw_len/SG_NM_TO_METER/2., \r
+       &planes[i].wpts[wpn][0], &planes[i].wpts[wpn][1]);\r
+       planes[i].wpts[wpn][2] = elev;\r
+       planes[i].wpts[wpn][4] = 0.0;\r
+       planes[i].wpts[wpn][5] = 0.0;\r
+       wpn += 1;\r
+       \r
+       // ======================\r
+       // horizontal navigation\r
+       // ======================\r
+       // waypoint 1: point for turning onto final\r
+       calc_cd_head_dist(planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1] , \r
+       d1, lfl,\r
+       &planes[i].wpts[wpn][0], &planes[i].wpts[wpn][1]);\r
+       calc_hd_course_dist(planes[i].wpts[wpn][0],   planes[i].wpts[wpn][1],\r
+       planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+       &course, &d);\r
+       planes[i].wpts[wpn][4] = course;\r
+       planes[i].wpts[wpn][5] = d;\r
+       wpn += 1;\r
+       \r
+       // calculate course and distance from plane position to waypoint 1\r
+       calc_hd_course_dist(planes[i].brg, planes[i].dist,\r
+       planes[i].wpts[1][0], planes[i].wpts[1][1],\r
+       &course, &d);\r
+       // check if airport is not between plane and waypoint 1 and\r
+       // DCA to airport on course to waypoint 1 is larger than 10 miles\r
+       double zero = 0.0;\r
+       if ( fabs(angle_diff_deg( planes[i].wpts[1][0], planes[i].brg  )) < 90.0 ||\r
+               calc_psl_dist( zero, zero, planes[i].brg, planes[i].dist, course ) > 10.0 ) {\r
+               // check if turning angle at waypoint 1 would be > max_ta\r
+               if ( fabs(angle_diff_deg( planes[i].wpts[1][4], course )) > max_ta ) {\r
+                       cd = calc_psl_dist(planes[i].brg, planes[i].dist,\r
+                       planes[i].wpts[1][0], planes[i].wpts[1][1],\r
+                       planes[i].wpts[1][4]);\r
+                       a1 = atan2(cd,planes[i].wpts[1][1]);\r
+                       planes[i].wpts[wpn][0] = planes[i].wpts[1][0] - a1/SGD_DEGREES_TO_RADIANS;\r
+                       if ( planes[i].wpts[wpn][0] < 0.0)   planes[i].wpts[wpn][0] += 360.0;   \r
+                       if ( planes[i].wpts[wpn][0] > 360.0) planes[i].wpts[wpn][0] -= 360.0;   \r
+                       planes[i].wpts[wpn][1] = fabs(cd) / sin(fabs(a1));\r
+                       calc_hd_course_dist(planes[i].wpts[wpn][0],   planes[i].wpts[wpn][1],\r
+                       planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+                       &course, &d);\r
+                       planes[i].wpts[wpn][4] = course;\r
+                       planes[i].wpts[wpn][5] = d;\r
+                       wpn += 1;\r
+                       \r
+                       calc_hd_course_dist(planes[i].brg, planes[i].dist,\r
+                       planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+                       &course, &d);\r
+               }\r
+       } else {\r
+               double leg = 10.0;\r
+               a1 = atan2(planes[i].wpts[1][1], leg );\r
+               \r
+               if ( angle_diff_deg(planes[i].brg,planes[i].wpts[1][0]) < 0 ) \r
+                       planes[i].wpts[wpn][0] = planes[i].wpts[1][0] + a1/SGD_DEGREES_TO_RADIANS;\r
+               else planes[i].wpts[wpn][0] = planes[i].wpts[1][0] - a1/SGD_DEGREES_TO_RADIANS;\r
+               \r
+               planes[i].wpts[wpn][1] = sqrt( planes[i].wpts[1][1]*planes[i].wpts[1][1] + leg*leg );\r
+               calc_hd_course_dist(planes[i].wpts[wpn][0],   planes[i].wpts[wpn][1],\r
+               planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+               &course, &d);\r
+               planes[i].wpts[wpn][4] = course;\r
+               planes[i].wpts[wpn][5] = d;\r
+               wpn += 1;\r
+               \r
+               calc_hd_course_dist(planes[i].brg, planes[i].dist,\r
+               planes[i].wpts[wpn-1][0], planes[i].wpts[wpn-1][1],\r
+               &course, &d);\r
+       }\r
+       \r
+       planes[i].wpts[wpn][0] = planes[i].brg;\r
+       planes[i].wpts[wpn][1] = planes[i].dist;\r
+       planes[i].wpts[wpn][2] = planes[i].alt;\r
+       planes[i].wpts[wpn][4] = course;\r
+       planes[i].wpts[wpn][5] = d;\r
+       wpn += 1;\r
+       \r
+       planes[i].wpn = wpn;\r
+       \r
+       // Now check if legs are too short or if legs can be shortend\r
+       // legs must be at least 2 flight minutes long\r
+       double mdist = planes[i].spd / 60.0 * 2.0;\r
+       for ( j=2; j<wpn-1; ++j ) {\r
+               if ( planes[i].wpts[j][1] < mdist) {\r
+               }\r
+       }\r
+       \r
+       // ====================\r
+       // vertical navigation\r
+       // ====================\r
+       double alt = elev+3000.0;\r
+       planes[i].wpts[1][2] = round_alt( true, alt );\r
+       for ( j=2; j<wpn-1; ++j ) {\r
+               double dalt = planes[i].alt - planes[i].wpts[j-1][2];\r
+               if ( dalt > 0 ) {\r
+                       alt = planes[i].wpts[j-1][2] + \r
+                       (planes[i].wpts[j][5] / planes[i].spd) * 60.0 * planes[i].desc_rate;\r
+                       planes[i].wpts[j][2] = round_alt( false, alt );\r
+                       if ( planes[i].wpts[j][2] > planes[i].alt ) \r
+                               planes[i].wpts[j][2] = round_alt( false, planes[i].alt );\r
+               }\r
+               else {\r
+                       planes[i].wpts[j][2] = planes[i].wpts[1][2];\r
+               }\r
+       }\r
+       \r
+       cout << "Plane position: " << planes[i].brg << " " << planes[i].dist << endl;\r
+       for ( j=0; j<wpn; ++j ) {\r
+               cout << "Waypoint " << j << endl;\r
+               cout << "------------------" << endl;\r
+               cout << planes[i].wpts[j][0] << "   " << planes[i].wpts[j][1]\r
+               << "   " << planes[i].wpts[j][2] << "   " << planes[i].wpts[j][5]; \r
+               cout << endl << endl;\r
+       }\r
+       \r
+}\r
+\r
+\r
+// ============================================================================\r
+// round altitude value to next highest/lowest 500 feet\r
+// ============================================================================\r
+double FGApproach::round_alt( const bool hl, double alt ) {\r
+\r
+  alt = alt/1000.0;\r
+  if ( hl ) {\r
+    if ( alt > (int)(alt)+0.5 ) alt = ((int)(alt)+1)*1000.0;\r
+    else alt = ((int)(alt)+0.5)*1000.0;\r
+  }\r
+  else {\r
+    if ( alt > (int)(alt)+0.5 ) alt = ((int)(alt)+0.5)*1000.0;\r
+    else alt = ((int)(alt))*1000.0;\r
+  }\r
+  \r
+  return alt;\r
+}\r
+\r
+\r
+// ============================================================================\r
+// get active runway\r
+// ============================================================================\r
+void FGApproach::get_active_runway() {\r
+\r
+#ifdef FG_WEATHERCM\r
+  sgVec3 position = { lat, lon, elev };\r
+  FGPhysicalProperty stationweather = WeatherDatabase->get(position);\r
+#else\r
+  FGEnvironment stationweather =\r
+    globals->get_environment_mgr()->getEnvironment(lat, lon, elev);\r
+#endif\r
+\r
+  SGPath path( globals->get_fg_root() );\r
+  path.append( "Airports" );\r
+  path.append( "runways.mk4" );\r
+  FGRunways runways( path.c_str() );\r
+  \r
+#ifdef FG_WEATHERCM\r
+  //Set the heading to into the wind\r
+  double wind_x = stationweather.Wind[0];\r
+  double wind_y = stationweather.Wind[1];\r
+  \r
+  double speed = sqrt( wind_x*wind_x + wind_y*wind_y ) * SG_METER_TO_NM / (60.0*60.0);\r
+  double hdg;\r
+  \r
+  //If no wind use 270degrees\r
+  if(speed == 0) {\r
+    hdg = 270;\r
+  } else {\r
+    // //normalize the wind to get the direction\r
+    //wind_x /= speed; wind_y /= speed;\r
+    \r
+    hdg = - atan2 ( wind_x, wind_y ) * SG_RADIANS_TO_DEGREES ;\r
+    if (hdg < 0.0)\r
+      hdg += 360.0;\r
+  }\r
+#else\r
+  double hdg = stationweather.get_wind_from_heading_deg();\r
+#endif\r
+  \r
+  FGRunway runway;\r
+  if ( runways.search( ident, int(hdg), &runway) ) {\r
+    active_runway = runway.rwy_no;\r
+    active_rw_hdg = runway.heading;\r
+    active_rw_lon = runway.lon;\r
+    active_rw_lat = runway.lat;\r
+    active_rw_len = runway.length;\r
+    //cout << "Active runway is: " << active_runway << "  heading = " \r
+    // << active_rw_hdg \r
+    // << " lon = " << active_rw_lon \r
+    // << " lat = " << active_rw_lat <<endl;\r
+  }\r
+  else cout << "FGRunways search failed\n";\r
+\r
+}\r
+\r
+// ========================================================================\r
+// update infos about plane\r
+// ========================================================================\r
+void FGApproach::update_plane_dat() {\r
+  \r
+  //cout << "Update Approach " << ident << "   " << num_planes << " registered" << endl;\r
+  // update plane positions\r
+  int i;\r
+  for (i=0; i<num_planes; i++) {\r
+    planes[i].lon = lon_node->getDoubleValue();\r
+    planes[i].lat = lat_node->getDoubleValue();\r
+    planes[i].alt = elev_node->getDoubleValue();\r
+    planes[i].hdg = hdg_node->getDoubleValue();\r
+    planes[i].spd = speed_node->getDoubleValue();\r
+\r
+    /*Point3D aircraft = sgGeodToCart( Point3D(planes[i].lon*SGD_DEGREES_TO_RADIANS, \r
+                                            planes[i].lat*SGD_DEGREES_TO_RADIANS, \r
+                                            planes[i].alt*SG_FEET_TO_METER) );*/\r
+    double course, distance;\r
+    calc_gc_course_dist(Point3D(lon*SGD_DEGREES_TO_RADIANS, lat*SGD_DEGREES_TO_RADIANS, 0.0),\r
+                       Point3D(planes[i].lon*SGD_DEGREES_TO_RADIANS,planes[i].lat*SGD_DEGREES_TO_RADIANS, 0.0 ),\r
+                       &course, &distance);\r
+    planes[i].dist = distance/SG_NM_TO_METER;\r
+    planes[i].brg  = 360.0-course*SGD_RADIANS_TO_DEGREES;\r
+\r
+    //cout << "Plane Id: " << planes[i].ident << "  Distance to " << ident \r
+    // << " is " << planes[i].dist << " miles   " << "Bearing " << planes[i].brg << endl;\r
+    \r
+  }   \r
+}\r
+\r
+// =======================================================================\r
+// Add plane to Approach list\r
+// =======================================================================\r
+void FGApproach::AddPlane(string pid) {\r
+\r
+  int i;\r
+  for ( i=0; i<num_planes; i++) {\r
+    if ( planes[i].ident == pid) {\r
+      //cout << "Plane already registered: " << ident << " " << num_planes << endl;\r
+      return;\r
+    }\r
+  }\r
+  planes[num_planes].ident = pid;\r
+  ++num_planes;\r
+  //cout << "Plane added to list: " << ident << " " << num_planes << endl;\r
+  return;\r
+}\r
+\r
+// ================================================================================\r
+// closest distance between a point (h1,d1) and a straigt line (h2,d2,h3) in 2 dim.\r
+// ================================================================================\r
+double FGApproach::calc_psl_dist(const double &h1, const double &d1,\r
+                                const double &h2, const double &d2,\r
+                                const double &h3)\r
+{\r
+  double a1 = h1 * SGD_DEGREES_TO_RADIANS;\r
+  double a2 = h2 * SGD_DEGREES_TO_RADIANS;\r
+  double a3 = h3 * SGD_DEGREES_TO_RADIANS;\r
+  double x1 = cos(a1) * d1;\r
+  double y1 = sin(a1) * d1;\r
+  double x2 = cos(a2) * d2;\r
+  double y2 = sin(a2) * d2;\r
+  double x3 = cos(a3);\r
+  double y3 = sin(a3);\r
+  \r
+  // formula: dis = sqrt( (v1-v2)**2 - ((v1-v2)*v3)**2 ); vi = (xi,yi)\r
+  double val1   = (x1-x2)*(x1-x2) + (y1-y2)*(y1-y2);\r
+  double val2   = ((x1-x2)*x3 + (y1-y2)*y3) * ((x1-x2)*x3 + (y1-y2)*y3);\r
+  double dis    = val1 - val2;\r
+  // now get sign for offset \r
+  //cout << x1 << " " << x2 << " " << y1 << " " << y2 << " " \r
+  //     << x3 << " " << y3 << " " \r
+  //     << val1 << " " << val2 << " " << dis << endl;\r
+  x3 *= sqrt(val2);\r
+  y3 *= sqrt(val2);\r
+  double da = fabs(atan2(y3,x3) - atan2(y1-y2,x1-x2));\r
+  if ( da > SGD_PI ) da -= 2*SGD_PI;\r
+  if ( fabs(da) > SGD_PI/2.) {\r
+    //if ( x3*(x1-x2) < 0.0 && y3*(y1-y2) < 0.0) {\r
+    x3 *= -1.0;\r
+    y3 *= -1.0;\r
+  }\r
+  //cout << x3 << " " << y3 << endl;\r
+  double dis1   = x1-x2-x3;\r
+  double dis2   = y1-y2-y3;\r
+  dis = sqrt(dis);\r
+  da = atan2(dis2,dis1);\r
+  if ( da < 0.0 ) da  += 2*SGD_PI;\r
+  if ( da < a3 )  dis *= -1.0;\r
+  //cout << dis1 << " " << dis2 << " " << da*SGD_RADIANS_TO_DEGREES << " " << h3\r
+  //     << " " << sqrt(dis1*dis1 + dis2*dis2) << " " << dis << endl;\r
+  //cout << atan2(dis2,dis1)*SGD_RADIANS_TO_DEGREES << " " << dis << endl;\r
+\r
+  return dis;\r
+}\r
+\r
+\r
+// ========================================================================\r
+// Calculate new bear/dist given starting bear/dis, and offset radial,\r
+// and distance.\r
+// ========================================================================\r
+void FGApproach::calc_cd_head_dist(const double &h1, const double &d1, \r
+                                  const double &course, const double &dist,\r
+                                  double *h2, double *d2)\r
+{\r
+  double a1 = h1 * SGD_DEGREES_TO_RADIANS;\r
+  double a2 = course * SGD_DEGREES_TO_RADIANS;\r
+  double x1 = cos(a1) * d1;\r
+  double y1 = sin(a1) * d1;\r
+  double x2 = cos(a2) * dist;\r
+  double y2 = sin(a2) * dist;\r
+    \r
+  *d2 = sqrt((x1+x2)*(x1+x2) + (y1+y2)*(y1+y2));\r
+  *h2 = atan2( (y1+y2), (x1+x2) ) * SGD_RADIANS_TO_DEGREES;\r
+  if ( *h2 < 0 ) *h2 = *h2+360;\r
+  }\r
+\r
+\r
+\r
+// ========================================================================\r
+// get heading and distance between two points; point1 ---> point2\r
+// ========================================================================\r
+void FGApproach::calc_hd_course_dist(const double &h1, const double &d1, \r
+                                    const double &h2, const double &d2,\r
+                                    double *course, double *dist)\r
+{\r
+  double a1 = h1 * SGD_DEGREES_TO_RADIANS;\r
+  double a2 = h2 * SGD_DEGREES_TO_RADIANS;\r
+  double x1 = cos(a1) * d1;\r
+  double y1 = sin(a1) * d1;\r
+  double x2 = cos(a2) * d2;\r
+  double y2 = sin(a2) * d2;\r
+          \r
+  *dist   = sqrt( (y2-y1)*(y2-y1) + (x2-x1)*(x2-x1) );\r
+  *course = atan2( (y2-y1), (x2-x1) ) * SGD_RADIANS_TO_DEGREES;\r
+  if ( *course < 0 ) *course = *course+360;\r
+  //cout << x1 << " " << y1 << " " << x2 << " " << y2 << " " << *dist << " " << *course << endl;\r
+}\r
+\r
+\r
+\r
+int FGApproach::RemovePlane() {\r
+\r
+  // first check if anything has to be done\r
+  bool rmplane = false;\r
+  int i;\r
+\r
+  for (i=0; i<num_planes; i++) {\r
+    if (planes[i].dist > range*SG_NM_TO_METER) {\r
+      rmplane = true;\r
+      break;\r
+    }\r
+  }\r
+  if (!rmplane) return num_planes;\r
+\r
+  // now make a copy of the plane list\r
+  PlaneApp tmp[max_planes];\r
+  for (i=0; i<num_planes; i++) {\r
+    tmp[i] = planes[i];\r
+  }\r
+  \r
+  int np = 0;\r
+  // now check which planes are still in range\r
+  for (i=0; i<num_planes; i++) {\r
+    if (tmp[i].dist <= range*SG_NM_TO_METER) {\r
+      planes[np] = tmp[i];\r
+      np += 1;\r
+    }\r
+  }\r
+  num_planes = np;\r
+\r
+  return num_planes;\r
+}\r
index a5217abf595aa282b14caf3f5101069242a7da2c..cdd06a68c20c1dff3e336818023e5cd9179e0319 100644 (file)
-// approach.hxx -- Approach class
-//
-// Written by Alexander Kappes, started March 2002.
-//
-// Copyright (C) 2002  Alexander Kappes
-//
-// This program is free software; you can redistribute it and/or
-// modify it under the terms of the GNU General Public License as
-// published by the Free Software Foundation; either version 2 of the
-// License, or (at your option) any later version.
-//
-// This program is distributed in the hope that it will be useful, but
-// WITHOUT ANY WARRANTY; without even the implied warranty of
-// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-// General Public License for more details.
-//
-// 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.
-
-
-#ifndef _FG_APPROACH_HXX
-#define _FG_APPROACH_HXX
-
-#include <stdio.h>
-
-#include <simgear/compiler.h>
-#include <simgear/math/sg_geodesy.hxx>
-#include <simgear/misc/sgstream.hxx>
-#include <simgear/magvar/magvar.hxx>
-#include <simgear/timing/sg_time.hxx>
-#include <simgear/bucket/newbucket.hxx>
-
-#include <Main/fg_props.hxx>
-
-#ifdef SG_HAVE_STD_INCLUDES
-#  include <istream>
-#include <iomanip>
-#elif defined( __BORLANDC__ ) || (__APPLE__)
-#  include <iostream>
-#else
-#  include <istream.h>
-#include <iomanip.h>
-#endif
-
-SG_USING_STD(istream);
-SG_USING_STD(string);
-
-#include "ATC.hxx"
-
-//DCL - a complete guess for now.
-#define FG_APPROACH_DEFAULT_RANGE 100
-
-// Contains all information about a plane that the approach control needs
-const int max_planes = 20;  // max number of planes on the stack
-const int max_wp = 10;      // max number of waypoints for approach phase
-struct PlaneApp {
-
-  // variables for plane if it's on the radar
-  string ident;          // indentification of plane
-  double lon;            // longitude in degrees
-  double lat;            // latitude in degrees
-  double alt;            // Altitute above sea level in feet
-  double hdg;            // heading of plane in degrees
-  double dist;           // distance to airport in miles
-  double brg;            // bearing relative to airport in degrees
-  double spd;            // speed above ground
-  int    contact;        // contact with approach established?
-                         // 0 = no contact yet
-                         // 1 = in contact
-                         // 2 = handed off to tower
-
-  // additional variables if contact has been established
-  int    wpn;                 // number of waypoints
-  double wpts[max_wp][6];     // assigned waypoints for approach phase 
-                              // first wp in list is airport
-                              // last waypoint point at which contact was established
-                              // second index: 0 = bearing to airport
-                              // second index: 1 = distance to aiport
-                              // second index: 2 = alt 
-                              // second index: 3 = ETA
-                              // second index: 4 = heading to next waypoint
-                              // second index: 5 = distance to next waypoint
-
-  double dnwp;           // distance to next waypoint
-  double dcc;            // closest distance to current assigned course
-  double dnc;            // closest distance to course from next to next to next wp
-  double aalt;           // assigned alt at next waypoint
-  double ahdg;           // assigned heading
-  bool   on_crs;         // is the plane on course?
-  double tlm;            // time when last message was sent
-
-  PlaneApp(void);
-};
-
-
-class FGApproach : public FGATC {
-
-  int      bucket;
-  string active_runway;         
-  double active_rw_hdg;
-
-  bool     display;            // Flag to indicate whether we should be outputting to the display.
-  bool     displaying;         // Flag to indicate whether we are outputting to the display.
-  int      num_planes;          // number of planes on the stack
-  PlaneApp planes[max_planes];  // Array of planes
-  string   transmission;
-  bool     first;
-
-  SGPropertyNode *comm1_node;
-  SGPropertyNode *comm2_node;
-
-  // for failure modeling
-  string trans_ident;  // transmitted ident
-  bool approach_failed;        // approach failed?
-
-public:
-
-  FGApproach(void);
-  ~FGApproach(void);
-
-  void Init();
-
-  void Update();
-
-  // Add new plane to stack if not already registered 
-  // Input:  pid - id of plane (name) 
-  // Output: "true" if added; "false" if already existend
-  void AddPlane(string pid);
-
-  // Remove plane from stack if out of range
-  int RemovePlane();
-  
-  //Indicate that this instance should be outputting to the ATC display
-  inline void SetDisplay(void) {display = true;}
-  
-  //Indicate that this instance should not be outputting to the ATC display
-  inline void SetNoDisplay(void) {display = false;}
-  
-  inline double get_bucket() const { return bucket; }
-  inline int get_pnum() const { return num_planes; }
-  inline string get_trans_ident() { return trans_ident; }
-  inline atc_type GetType() { return APPROACH; }
-  
-private:
-
-  void update_plane_dat();
-
-  void get_active_runway();
-
-// ========================================================================
-// get heading and distance between two points; point2 ---> point1
-// input: point1 = heading in degrees, distance
-// input: point2 = heading in degrees, distance
-// ouput: course in degrees, distance
-// ========================================================================
-  void calc_hd_course_dist(const double &h1, const double &d1,
-                          const double &h2, const double &d2,
-                          double *course, double *dist);
-
-// ========================================================================
-// closest distance between a point and a straigt line in 2 dim.
-// the input variables are given in (heading, distance) 
-// relative to a common point
-// input:  point        = heading in degrees, distance
-// input:  straigt line = anker vector (heading in degrees, distance), 
-//                        heading of direction vector
-// output: distance
-// ========================================================================
-  double calc_psl_dist(const double &h1, const double &d1,
-                      const double &h2, const double &d2,
-                      const double &h3);
-
-  // Pointers to current users position
-  SGPropertyNode *lon_node;
-  SGPropertyNode *lat_node;
-  SGPropertyNode *elev_node;
-  
-  //Update the transmission string
-  void UpdateTransmission(void);
-
-};
-
-#endif // _FG_APPROACH_HXX
-
+// approach.hxx -- Approach class\r
+//\r
+// Written by Alexander Kappes, started March 2002.\r
+//\r
+// Copyright (C) 2002  Alexander Kappes\r
+//\r
+// This program is free software; you can redistribute it and/or\r
+// modify it under the terms of the GNU General Public License as\r
+// published by the Free Software Foundation; either version 2 of the\r
+// License, or (at your option) any later version.\r
+//\r
+// This program is distributed in the hope that it will be useful, but\r
+// WITHOUT ANY WARRANTY; without even the implied warranty of\r
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU\r
+// General Public License for more details.\r
+//\r
+// You should have received a copy of the GNU General Public License\r
+// along with this program; if not, write to the Free Software\r
+// Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.\r
+\r
+\r
+#ifndef _FG_APPROACH_HXX\r
+#define _FG_APPROACH_HXX\r
+\r
+#include <stdio.h>\r
+\r
+#include <simgear/compiler.h>\r
+#include <simgear/math/sg_geodesy.hxx>\r
+#include <simgear/misc/sgstream.hxx>\r
+#include <simgear/magvar/magvar.hxx>\r
+#include <simgear/timing/sg_time.hxx>\r
+#include <simgear/bucket/newbucket.hxx>\r
+\r
+#include <Main/fg_props.hxx>\r
+\r
+#ifdef SG_HAVE_STD_INCLUDES\r
+#  include <istream>\r
+#include <iomanip>\r
+#elif defined( SG_HAVE_NATIVE_SGI_COMPILERS )\r
+#  include <iostream.h>\r
+#elif defined( __BORLANDC__ )\r
+#  include <iostream>\r
+#else\r
+#  include <istream.h>\r
+#include <iomanip.h>\r
+#endif\r
+\r
+#if ! defined( SG_HAVE_NATIVE_SGI_COMPILERS )\r
+SG_USING_STD(istream);\r
+#endif\r
+\r
+SG_USING_STD(string);\r
+\r
+#include "ATC.hxx"\r
+#include "transmission.hxx"\r
+\r
+//DCL - a complete guess for now.\r
+#define FG_APPROACH_DEFAULT_RANGE 100\r
+\r
+// Contains all the information about a plane that the approach control needs\r
+const int    max_planes = 20;  // max number of planes on the stack\r
+const int    max_wp = 10;      // max number of waypoints for approach phase\r
+const double max_ta = 130;     // max turning angle for plane during approach\r
+const double tbm    = 20000.0; // min time (in ms) between two messages\r
+const double lfl    = 10.0;    // length of final leg\r
+\r
+struct PlaneApp {\r
+\r
+  // variables for plane if it's on the radar\r
+  string ident;          // indentification of plane\r
+  double lon;            // longitude in degrees\r
+  double lat;            // latitude in degrees\r
+  double alt;            // Altitute above sea level in feet\r
+  double hdg;            // heading of plane in degrees\r
+  double dist;           // distance to airport in miles\r
+  double brg;            // bearing relative to airport in degrees\r
+  double spd;            // speed above ground\r
+  int    contact;        // contact with approach established?\r
+                         // 0 = no contact yet\r
+                         // 1 = in contact\r
+                         // 2 = handed off to tower\r
+  double turn_rate;      // standard turning rate of the plane in seconds per degree\r
+  double desc_rate;      // standard descent rate of the plane in feets per minute\r
+  double clmb_rate;      // standard climb rate of the plane in feets per minute\r
+\r
+  // additional variables if contact has been established\r
+  int    wpn;                 // number of waypoints\r
+  double wpts[max_wp][6];     // assigned waypoints for approach phase \r
+                              // first wp in list is airport\r
+                              // last waypoint point at which contact was established\r
+                              // second index: 0 = bearing to airport\r
+                              // second index: 1 = distance to airport\r
+                              // second index: 2 = alt \r
+                              // second index: 3 = ETA\r
+                              // second index: 4 = heading to next waypoint\r
+                              // second index: 5 = distance to next waypoint\r
+\r
+  double dnwp;           // distance to next waypoint\r
+  double dcc;            // closest distance to current assigned course\r
+  double dnc;            // closest distance to course from next to next to next wp\r
+  double aalt;           // assigned altitude\r
+  double ahdg;           // assigned heading\r
+  bool   on_crs;         // is the plane on course?\r
+  bool   wp_change;      // way point has changed\r
+  double tlm;            // time when last message was sent\r
+  TransCode lmc;         // code of last message\r
+};\r
+\r
+\r
+class FGApproach : public FGATC {\r
+\r
+  int      bucket;\r
+\r
+  string active_runway;         \r
+  double active_rw_hdg;\r
+  double active_rw_lon;\r
+  double active_rw_lat;\r
+  double active_rw_len;\r
+\r
+  bool     display;            // Flag to indicate whether we should be outputting to the display.\r
+  bool     displaying;         // Flag to indicate whether we are outputting to the display.\r
+  int      num_planes;          // number of planes on the stack\r
+  PlaneApp planes[max_planes];  // Array of planes\r
+  string   transmission;\r
+  bool     first;\r
+\r
+  SGPropertyNode *comm1_node;\r
+  SGPropertyNode *comm2_node;\r
+\r
+  SGPropertyNode *atcmenu_node;\r
+  SGPropertyNode *atcopt0_node;\r
+  SGPropertyNode *atcopt1_node;\r
+  SGPropertyNode *atcopt2_node;\r
+  SGPropertyNode *atcopt3_node;\r
+  SGPropertyNode *atcopt4_node;\r
+  SGPropertyNode *atcopt5_node;\r
+  SGPropertyNode *atcopt6_node;\r
+  SGPropertyNode *atcopt7_node;\r
+  SGPropertyNode *atcopt8_node;\r
+  SGPropertyNode *atcopt9_node;\r
+\r
+  // for failure modeling\r
+  string trans_ident;  // transmitted ident\r
+  bool approach_failed;        // approach failed?\r
+\r
+public:\r
+\r
+  FGApproach(void);\r
+  ~FGApproach(void);\r
+\r
+  void Init();\r
+\r
+  void Update();\r
+\r
+  // Add new plane to stack if not already registered \r
+  // Input:  pid - id of plane (name) \r
+  // Output: "true" if added; "false" if already existend\r
+  void AddPlane(string pid);\r
+\r
+  // Remove plane from stack if out of range\r
+  int RemovePlane();\r
+  \r
+  //Indicate that this instance should be outputting to the ATC display\r
+  inline void SetDisplay(void) {display = true;}\r
+  \r
+  //Indicate that this instance should not be outputting to the ATC display\r
+  inline void SetNoDisplay(void) {display = false;}\r
+  \r
+  inline double get_bucket() const { return bucket; }\r
+  inline int get_pnum() const { return num_planes; }\r
+  inline string get_trans_ident() { return trans_ident; }\r
+  inline atc_type GetType() { return APPROACH; }\r
+  \r
+private:\r
+\r
+  void calc_wp( const int &i);\r
+\r
+  void update_plane_dat();\r
+\r
+  void get_active_runway();\r
+\r
+  void update_param(const int &i);\r
+\r
+  double round_alt( bool hl, double alt );\r
+\r
+  double angle_diff_deg( const double &a1, const double &a2);\r
+\r
+// ========================================================================\r
+// get point2 given starting point1 and course and distance\r
+// input:  point1 = heading in degrees, distance\r
+// input:  course in degrees, distance\r
+// output: point2 = heading in degrees, distance\r
+// ========================================================================\r
+  void calc_cd_head_dist(const double &h1, const double &d1,\r
+                        const double &course, const double &dist,\r
+                        double *h2, double *d2);\r
+\r
+\r
+// ========================================================================\r
+// get heading and distance between two points; point2 ---> point1\r
+// input:  point1 = heading in degrees, distance\r
+// input:  point2 = heading in degrees, distance\r
+// output: course in degrees, distance\r
+// ========================================================================\r
+  void calc_hd_course_dist(const double &h1, const double &d1,\r
+                          const double &h2, const double &d2,\r
+                          double *course, double *dist);\r
+\r
+\r
+\r
+// ========================================================================\r
+// closest distance between a point and a straigt line in 2 dim.\r
+// the input variables are given in (heading, distance) \r
+// relative to a common point\r
+// input:  point        = heading in degrees, distance\r
+// input:  straigt line = anker vector (heading in degrees, distance), \r
+//                        heading of direction vector\r
+// output: distance\r
+// ========================================================================\r
+  double calc_psl_dist(const double &h1, const double &d1,\r
+                      const double &h2, const double &d2,\r
+                      const double &h3);\r
+\r
+  // Pointers to current users position\r
+  SGPropertyNode *lon_node;\r
+  SGPropertyNode *lat_node;\r
+  SGPropertyNode *elev_node;\r
+  SGPropertyNode *hdg_node;\r
+  SGPropertyNode *speed_node;\r
+  SGPropertyNode *etime_node;\r
+  \r
+  //Update the transmission string\r
+  void UpdateTransmission(void);\r
+  \r
+  friend istream& operator>> ( istream&, FGApproach& );\r
+};\r
+\r
+#endif // _FG_APPROACH_HXX\r