#endif
#include <simgear/math/point3d.hxx>
+#include <simgear/route/waypoint.hxx>
#include <Main/fg_props.hxx>
#include <Main/globals.hxx>
+#include <Main/viewer.hxx>
#include <Scenery/scenery.hxx>
+#include <Scenery/tilemgr.hxx>
+
#include <string>
#include <math.h>
+#include <time.h>
+#ifdef _MSC_VER
+# include <float.h>
+# define finite _finite
+#elif defined(__sun) || defined(sgi)
+# include <ieeefp.h>
+#endif
SG_USING_STD(string);
#include "AIAircraft.hxx"
-
+ static string tempReg;
//
// accel, decel, climb_rate, descent_rate, takeoff_speed, climb_speed,
// cruise_speed, descent_speed, land_speed
// jet_transport
{5.0, 2.0, 3000.0, 1500.0, 140.0, 300.0, 430.0, 300.0, 130.0},
// jet_fighter
- {7.0, 3.0, 4000.0, 2000.0, 150.0, 350.0, 500.0, 350.0, 150.0}
+ {7.0, 3.0, 4000.0, 2000.0, 150.0, 350.0, 500.0, 350.0, 150.0},
+ // tanker
+ {5.0, 2.0, 3000.0, 1500.0, 140.0, 300.0, 430.0, 300.0, 130.0}
};
-FGAIAircraft *FGAIAircraft::_self = NULL;
-
-FGAIAircraft::FGAIAircraft(FGAIManager* mgr) {
- _self = this; // This needs to be the first entry.
+FGAIAircraft::FGAIAircraft(FGAIManager* mgr, FGAISchedule *ref) {
+ trafficRef = ref;
+ if (trafficRef)
+ groundOffset = trafficRef->getGroundOffset();
+ else
+ groundOffset = 0;
manager = mgr;
_type_str = "aircraft";
_otype = otAircraft;
fp = 0;
dt_count = 0;
+ dt_elev_count = 0;
use_perf_vs = true;
+ isTanker = false;
// set heading and altitude locks
hdg_lock = false;
alt_lock = false;
+ roll = 0;
+ headingChangeRate = 0.0;
}
FGAIAircraft::~FGAIAircraft() {
- if (fp) delete fp;
- _self = NULL;
}
bool FGAIAircraft::init() {
+ refuel_node = fgGetNode("systems/refuel/contact", true);
return FGAIBase::init();
}
FGAIBase::bind();
props->tie("controls/gear/gear-down",
- SGRawValueFunctions<bool>(FGAIAircraft::_getGearDown));
-
-/*
+ SGRawValueMethods<FGAIAircraft,bool>(*this,
+ &FGAIAircraft::_getGearDown));
+#if 0
props->getNode("controls/lighting/landing-lights", true)
->alias("controls/gear/gear-down");
-*/
+#endif
}
void FGAIAircraft::unbind() {
FGAIBase::unbind();
props->untie("controls/gear/gear-down");
-// props->getNode("controls/lighting/landing-lights")->unalias();
+#if 0
+ props->getNode("controls/lighting/landing-lights")->unalias();
+#endif
}
void FGAIAircraft::update(double dt) {
+ FGAIBase::update(dt);
Run(dt);
Transform();
- FGAIBase::update(dt);
}
void FGAIAircraft::SetPerformance(const PERF_STRUCT *ps) {
FGAIAircraft::dt = dt;
- if (fp) ProcessFlightPlan(dt);
-
+ if (fp)
+ {
+ time_t now = time(NULL) + fgGetLong("/sim/time/warp");
+ ProcessFlightPlan(dt, now);
+ if (now < fp->getStartTime())
+ {
+ // Do execute Ground elev for inactive aircraft, so they
+ // Are repositioned to the correct ground altitude when the user flies within visibility range.
+ if (no_roll)
+ {
+ Transform(); // make sure aip is initialized.
+ getGroundElev(dt); // make sure it's exectuted first time around, so force a large dt value
+ //getGroundElev(dt); // Need to do this twice.
+ //cerr << trafficRef->getRegistration() << " Setting altitude to " << tgt_altitude << endl;
+ setAltitude(tgt_altitude);
+ }
+ return;
+ }
+ }
+
double turn_radius_ft;
double turn_circum_ft;
double speed_north_deg_sec;
double speed_east_deg_sec;
- double ft_per_deg_lon;
- double ft_per_deg_lat;
double dist_covered_ft;
double alpha;
- // get size of a degree at this latitude
- ft_per_deg_lat = 366468.96 - 3717.12 * cos(pos.lat()/SG_RADIANS_TO_DEGREES);
- ft_per_deg_lon = 365228.16 * cos(pos.lat() / SG_RADIANS_TO_DEGREES);
-
// adjust speed
- double speed_diff = tgt_speed - speed;
+ double speed_diff; //= tgt_speed - speed;
+ if (!no_roll)
+ {
+ speed_diff = tgt_speed - speed;
+ }
+ else
+ {
+ speed_diff = groundTargetSpeed - speed;
+ }
if (fabs(speed_diff) > 0.2) {
if (speed_diff > 0.0) speed += performance->accel * dt;
if (speed_diff < 0.0) {
- if (!no_roll) {
+ if (no_roll) { // was (!no_roll) but seems more logical this way (ground brakes).
speed -= performance->decel * dt * 3;
} else {
speed -= performance->decel * dt;
// set new position
pos.setlat( pos.lat() + speed_north_deg_sec * dt);
pos.setlon( pos.lon() + speed_east_deg_sec * dt);
+ //if (!(finite(pos.lat()) && finite(pos.lon())))
+ // {
+ // cerr << "Position is not finite" << endl;
+ // cerr << "speed = " << speed << endl;
+ // cerr << "dt" << dt << endl;
+ // cerr << "heading " << hdg << endl;
+ // cerr << "speed east " << speed_east_deg_sec << endl;
+ // cerr << "speed nrth " << speed_north_deg_sec << endl;
+ // cerr << "deg_lat " << ft_per_deg_lat << endl;
+ // cerr << "deg_lon " << ft_per_deg_lon << endl;
+ // }
// adjust heading based on current bank angle
+ if (roll == 0.0)
+ roll = 0.01;
if (roll != 0.0) {
- turn_radius_ft = 0.088362 * speed * speed
- / tan( fabs(roll) / SG_RADIANS_TO_DEGREES );
- turn_circum_ft = SGD_2PI * turn_radius_ft;
- dist_covered_ft = speed * 1.686 * dt;
- alpha = dist_covered_ft / turn_circum_ft * 360.0;
- hdg += alpha * sign( roll );
- if ( hdg > 360.0 ) hdg -= 360.0;
- if ( hdg < 0.0) hdg += 360.0;
+ // double turnConstant;
+ //if (no_roll)
+ // turnConstant = 0.0088362;
+ //else
+ // turnConstant = 0.088362;
+ // If on ground, calculate heading change directly
+ if (no_roll) {
+ double headingDiff = fabs(hdg-tgt_heading);
+
+ if (headingDiff > 180)
+ headingDiff = fabs(headingDiff - 360);
+ groundTargetSpeed = tgt_speed - (tgt_speed * (headingDiff/45));
+ if (sign(groundTargetSpeed) != sign(tgt_speed))
+ groundTargetSpeed = 0.21 * sign(tgt_speed); // to prevent speed getting stuck in 'negative' mode
+ if (headingDiff > 30.0)
+ {
+
+ headingChangeRate += dt * sign(roll); // invert if pushed backward
+ // Print some debug statements to find out why aircraft may get stuck
+ // forever turning
+ //if (trafficRef->getDepartureAirport()->getId() == string("EHAM"))
+ // {
+ //cerr << "Turning : " << trafficRef->getRegistration()
+ //cerr << " Speed = " << speed << " Heading " << hdg
+ //<< " Target Heading " << tgt_heading
+ // << " Lead Distance " << fp->getLeadDistance()
+ // << " Distance to go "
+ // << fp->getDistanceToGo(pos.lat(), pos.lon(), fp->getCurrentWaypoint())
+ // << "waypoint name " << fp->getCurrentWaypoint()->name
+ // << endl;
+ //}
+ if (headingChangeRate > 30)
+ {
+ headingChangeRate = 30;
+ }
+ else if (headingChangeRate < -30)
+ {
+ headingChangeRate = -30;
+ }
+ }
+ else
+ {
+ if (fabs(headingChangeRate) > headingDiff)
+ headingChangeRate = headingDiff*sign(roll);
+ else
+ headingChangeRate += dt * sign(roll);
+ }
+ hdg += headingChangeRate * dt;
+ //cerr << "On ground. Heading: " << hdg << ". Target Heading: " << tgt_heading << ". Target speed: " << groundTargetSpeed << ". heading change rate" << headingChangeRate << endl;
+ }
+ else {
+ if (fabs(speed) > 1.0) {
+ turn_radius_ft = 0.088362 * speed * speed
+ / tan( fabs(roll) / SG_RADIANS_TO_DEGREES );
+ }
+ else
+ {
+ turn_radius_ft = 1.0; // Check if turn_radius_ft == 0; this might lead to a division by 0.
+ }
+ turn_circum_ft = SGD_2PI * turn_radius_ft;
+ dist_covered_ft = speed * 1.686 * dt;
+ alpha = dist_covered_ft / turn_circum_ft * 360.0;
+ hdg += alpha * sign(roll);
+ }
+ while ( hdg > 360.0 ) {
+ hdg -= 360.0;
+ spinCounter++;
+ }
+ while ( hdg < 0.0)
+ {
+ hdg += 360.0;
+ spinCounter--;
+ }
}
-
+
+
// adjust target bank angle if heading lock engaged
if (hdg_lock) {
double bank_sense = 0.0;
if (diff > 180) diff = fabs(diff - 360);
double sum = hdg + diff;
if (sum > 360.0) sum -= 360.0;
- if (fabs(sum - tgt_heading) < 1.0) {
+ if (fabs(sum - tgt_heading) < 1.0) {
bank_sense = 1.0; // right turn
} else {
bank_sense = -1.0; // left turn
} else {
tgt_roll = 30.0 * bank_sense;
}
+ if ((fabs((double) spinCounter) > 1) && (diff > 30))
+ {
+ tgt_speed *= 0.999; // Ugly hack: If aircraft get stuck, they will continually spin around.
+ // The only way to resolve this is to make them slow down.
+ //if (tempReg.empty())
+ // tempReg = trafficRef->getRegistration();
+ //if (trafficRef->getRegistration() == tempReg)
+ // {
+ // cerr << trafficRef->getRegistration()
+ // << " appears to be spinning: " << spinCounter << endl
+ // << " speed " << speed << endl
+ // << " heading " << hdg << endl
+ // << " lead distance " << fp->getLeadDistance() << endl
+ // << " waypoint " << fp->getCurrentWaypoint()->name
+ // << " target heading " << tgt_heading << endl
+ // << " lead in angle " << fp->getLeadInAngle()<< endl
+ // << " roll " << roll << endl
+ // << " target_roll " << tgt_roll << endl;
+
+ // }
+ }
}
// adjust bank angle, use 9 degrees per second
if (fabs(bank_diff) > 0.2) {
if (bank_diff > 0.0) roll += 9.0 * dt;
if (bank_diff < 0.0) roll -= 9.0 * dt;
+ //while (roll > 180) roll -= 360;
+ //while (roll < 180) roll += 360;
}
// adjust altitude (meters) based on current vertical speed (fpm)
pos.setelev(altitude * SG_FEET_TO_METER);
double altitude_ft = altitude;
+ // adjust target Altitude, based on ground elevation when on ground
+ if (no_roll)
+ {
+ getGroundElev(dt);
+ }
// find target vertical speed if altitude lock engaged
if (alt_lock && use_perf_vs) {
if (altitude_ft < tgt_altitude) {
//###########################//
// do calculations for radar //
//###########################//
+ double range_ft2 = UpdateRadar(manager);
- // copy values from the AIManager
- double user_latitude = manager->get_user_latitude();
- double user_longitude = manager->get_user_longitude();
- double user_altitude = manager->get_user_altitude();
- double user_heading = manager->get_user_heading();
- double user_pitch = manager->get_user_pitch();
- double user_yaw = manager->get_user_yaw();
- double user_speed = manager->get_user_speed();
-
- // calculate range to target in feet and nautical miles
- double lat_range = fabs(pos.lat() - user_latitude) * ft_per_deg_lat;
- double lon_range = fabs(pos.lon() - user_longitude) * ft_per_deg_lon;
- double range_ft = sqrt( lat_range*lat_range + lon_range*lon_range );
- range = range_ft / 6076.11549;
-
- // calculate bearing to target
- if (pos.lat() >= user_latitude) {
- bearing = atan2(lat_range, lon_range) * SG_RADIANS_TO_DEGREES;
- if (pos.lon() >= user_longitude) {
- bearing = 90.0 - bearing;
- } else {
- bearing = 270.0 + bearing;
- }
- } else {
- bearing = atan2(lon_range, lat_range) * SG_RADIANS_TO_DEGREES;
- if (pos.lon() >= user_longitude) {
- bearing = 180.0 - bearing;
- } else {
- bearing = 180.0 + bearing;
- }
- }
-
- // calculate look left/right to target, without yaw correction
- horiz_offset = bearing - user_heading;
- if (horiz_offset > 180.0) horiz_offset -= 360.0;
- if (horiz_offset < -180.0) horiz_offset += 360.0;
-
- // calculate elevation to target
- elevation = atan2( altitude_ft - user_altitude, range_ft )
- * SG_RADIANS_TO_DEGREES;
-
- // calculate look up/down to target
- vert_offset = elevation + user_pitch;
-
-/* this calculation needs to be fixed, but it isn't important anyway
- // calculate range rate
- double recip_bearing = bearing + 180.0;
- if (recip_bearing > 360.0) recip_bearing -= 360.0;
- double my_horiz_offset = recip_bearing - hdg;
- if (my_horiz_offset > 180.0) my_horiz_offset -= 360.0;
- if (my_horiz_offset < -180.0) my_horiz_offset += 360.0;
- rdot = (-user_speed * cos( horiz_offset * SG_DEGREES_TO_RADIANS ))
- + (-speed * 1.686 * cos( my_horiz_offset * SG_DEGREES_TO_RADIANS ));
-*/
-
- // now correct look left/right for yaw
- horiz_offset += user_yaw;
-
- // calculate values for radar display
- y_shift = range * cos( horiz_offset * SG_DEGREES_TO_RADIANS);
- x_shift = range * sin( horiz_offset * SG_DEGREES_TO_RADIANS);
- rotation = hdg - user_heading;
- if (rotation < 0.0) rotation += 360.0;
+ //************************************//
+ // Tanker code //
+ //************************************//
+ if ( isTanker) {
+ if ( (range_ft2 < 250.0 * 250.0) &&
+ (y_shift > 0.0) &&
+ (elevation > 0.0) ) {
+ refuel_node->setBoolValue(true);
+ } else {
+ refuel_node->setBoolValue(false);
+ }
+ }
}
fp = f;
}
-void FGAIAircraft::ProcessFlightPlan( double dt ) {
+void FGAIAircraft::ProcessFlightPlan( double dt, time_t now )
+{
+ bool eraseWaypoints;
+ if (trafficRef)
+ {
+// FGAirport *arr;
+// FGAirport *dep;
+ eraseWaypoints = true;
+// cerr << trafficRef->getRegistration();
+// cerr << "Departure airport " << endl;
+// dep = trafficRef->getDepartureAirport();
+// if (dep)
+// cerr << dep->getId() << endl;
+// cerr << "Arrival airport " << endl;
+// arr = trafficRef->getArrivalAirport();
+// if (arr)
+// cerr << arr->getId() <<endl << endl;;
+ }
+ else
+ eraseWaypoints = false;
+
+ //cerr << "Processing Flightplan" << endl;
FGAIFlightPlan::waypoint* prev = 0; // the one behind you
FGAIFlightPlan::waypoint* curr = 0; // the one ahead
FGAIFlightPlan::waypoint* next = 0; // the next plus 1
curr = fp->getCurrentWaypoint();
next = fp->getNextWaypoint();
dt_count += dt;
-
+
if (!prev) { //beginning of flightplan, do this initialization once
- fp->IncrementWaypoint();
+ //setBank(0.0);
+ spinCounter = 0;
+ tempReg = "";
+ //prev_dist_to_go = HUGE;
+ //cerr << "Before increment " << curr-> name << endl;
+ fp->IncrementWaypoint(eraseWaypoints);
+ //prev = fp->getPreviousWaypoint(); //first waypoint
+ //curr = fp->getCurrentWaypoint(); //second waypoint
+ //next = fp->getNextWaypoint(); //third waypoint (might not exist!)
+ //cerr << "After increment " << prev-> name << endl;
+ if (!(fp->getNextWaypoint()) && trafficRef)
+ {
+ loadNextLeg();
+ }
+ //cerr << "After load " << prev-> name << endl;
prev = fp->getPreviousWaypoint(); //first waypoint
curr = fp->getCurrentWaypoint(); //second waypoint
next = fp->getNextWaypoint(); //third waypoint (might not exist!)
+ //cerr << "After load " << prev-> name << endl;
setLatitude(prev->latitude);
setLongitude(prev->longitude);
setSpeed(prev->speed);
setAltitude(prev->altitude);
- setHeading(fp->getBearing(prev->latitude, prev->longitude, curr));
- if (next) fp->setLeadDistance(speed, hdg, curr, next);
+ if (prev->speed > 0.0)
+ setHeading(fp->getBearing(prev->latitude, prev->longitude, curr));
+ else
+ {
+ setHeading(fp->getBearing(curr->latitude, curr->longitude, prev));
+ }
+ // If next doesn't exist, as in incrementally created flightplans for
+ // AI/Trafficmanager created plans,
+ // Make sure lead distance is initialized otherwise
+ if (next)
+ fp->setLeadDistance(speed, hdg, curr, next);
if (curr->crossat > -1000.0) { //use a calculated descent/climb rate
- use_perf_vs = false;
- tgt_vs = (curr->crossat - prev->altitude)/
- (fp->getDistanceToGo(pos.lat(), pos.lon(), curr)/
- 6076.0/prev->speed*60.0);
+ use_perf_vs = false;
+ tgt_vs = (curr->crossat - prev->altitude)/
+ (fp->getDistanceToGo(pos.lat(), pos.lon(), curr)/
+ 6076.0/prev->speed*60.0);
tgt_altitude = curr->crossat;
} else {
- use_perf_vs = true;
- tgt_altitude = prev->altitude;
+ use_perf_vs = true;
+ tgt_altitude = prev->altitude;
}
alt_lock = hdg_lock = true;
no_roll = prev->on_ground;
+ if (no_roll)
+ {
+ Transform(); // make sure aip is initialized.
+ getGroundElev(60.1); // make sure it's exectuted first time around, so force a large dt value
+ //getGroundElev(60.1); // Need to do this twice.
+ //cerr << trafficRef->getRegistration() << " Setting altitude to " << tgt_altitude << endl;
+ setAltitude(tgt_altitude);
+ }
+ prevSpeed = 0;
//cout << "First waypoint: " << prev->name << endl;
//cout << " Target speed: " << tgt_speed << endl;
//cout << " Target altitude: " << tgt_altitude << endl;
//cout << " Target heading: " << tgt_heading << endl << endl;
+ //cerr << "Done Flightplan init" << endl;
return;
} // end of initialization
-
+
// let's only process the flight plan every 100 ms.
- if (dt_count < 0.1) {
- return;
- } else {
- dt_count = 0;
-
- // check to see if we've reached the lead point for our next turn
- double dist_to_go = fp->getDistanceToGo(pos.lat(), pos.lon(), curr);
- double lead_dist = fp->getLeadDistance();
- if (lead_dist < (2*speed)) lead_dist = 2*speed; //don't skip over the waypoint
- //cout << "dist_to_go: " << dist_to_go << ", lead_dist: " << lead_dist << endl;
-
- if ( dist_to_go < lead_dist ) {
- if (curr->finished) { //end of the flight plan, so terminate
- setDie(true);
- return;
+ if ((dt_count < 0.1) || (now < fp->getStartTime()))
+ {
+ //cerr << "done fp dt" << endl;
+ return;
+ } else {
+ dt_count = 0;
+ }
+ // check to see if we've reached the lead point for our next turn
+ double dist_to_go = fp->getDistanceToGo(pos.lat(), pos.lon(), curr);
+
+ //cerr << "2" << endl;
+ double lead_dist = fp->getLeadDistance();
+ //cerr << " Distance : " << dist_to_go << ": Lead distance " << lead_dist << endl;
+ // experimental: Use fabs, because speed can be negative (I hope) during push_back.
+ if (lead_dist < fabs(2*speed))
+ {
+ lead_dist = fabs(2*speed); //don't skip over the waypoint
+ //cerr << "Extending lead distance to " << lead_dist << endl;
+ }
+// FGAirport * apt = trafficRef->getDepartureAirport();
+// if ((dist_to_go > prev_dist_to_go) && trafficRef && apt)
+// {
+// if (apt->getId() == string("EHAM"))
+// cerr << "Alert: " << trafficRef->getRegistration() << " is moving away from waypoint " << curr->name << endl
+// << "Target heading : " << tgt_heading << "act heading " << hdg << " Tgt speed : " << tgt_speed << endl
+// << "Lead distance : " << lead_dist << endl
+// << "Distance to go: " << dist_to_go << endl;
+
+// }
+ prev_dist_to_go = dist_to_go;
+ //cerr << "2" << endl;
+ //if (no_roll)
+ // lead_dist = 10.0;
+ //cout << "Leg : " << (fp->getLeg()-1) << ". dist_to_go: " << dist_to_go << ", lead_dist: " << lead_dist << ", tgt_speed " << tgt_speed << ", tgt_heading " << tgt_heading << " speed " << speed << " hdg " << hdg << ". Altitude " << altitude << " TAget alt :" << tgt_altitude << endl;
+
+ if ( dist_to_go < lead_dist ) {
+ //prev_dist_to_go = HUGE;
+ // For traffic manager generated aircraft:
+ // check if the aircraft flies of of user range. And adjust the
+ // Current waypoint's elevation according to Terrain Elevation
+ if (curr->finished) { //end of the flight plan
+ {
+ if (fp->getRepeat()) {
+ fp->restart();
+ } else {
+ setDie(true);
+ }
+
+ //cerr << "Done die end of fp" << endl;
}
- // we've reached the lead-point for the waypoint ahead
- if (next) tgt_heading = fp->getBearing(curr, next);
- fp->IncrementWaypoint();
- prev = fp->getPreviousWaypoint();
- curr = fp->getCurrentWaypoint();
- next = fp->getNextWaypoint();
- if (next) fp->setLeadDistance(speed, tgt_heading, curr, next);
- if (curr->crossat > -1000.0) {
- use_perf_vs = false;
- tgt_vs = (curr->crossat - altitude)/
- (fp->getDistanceToGo(pos.lat(), pos.lon(), curr)/6076.0/speed*60.0);
- tgt_altitude = curr->crossat;
- } else {
- use_perf_vs = true;
- tgt_altitude = prev->altitude;
+ return;
+ }
+
+ // we've reached the lead-point for the waypoint ahead
+ //cerr << "4" << endl;
+ //cerr << "Situation after lead point" << endl;
+ //cerr << "Prviious: " << prev->name << endl;
+ //cerr << "Current : " << curr->name << endl;
+ //cerr << "Next : " << next->name << endl;
+ if (next)
+ {
+ tgt_heading = fp->getBearing(curr, next);
+ spinCounter = 0;
+ }
+ fp->IncrementWaypoint(eraseWaypoints);
+ if (!(fp->getNextWaypoint()) && trafficRef)
+ {
+ loadNextLeg();
+ }
+ prev = fp->getPreviousWaypoint();
+ curr = fp->getCurrentWaypoint();
+ next = fp->getNextWaypoint();
+ // Now that we have incremented the waypoints, excute some traffic manager specific code
+ // based on the name of the waypoint we just passed.
+ if (trafficRef)
+ {
+ double userLatitude = fgGetDouble("/position/latitude-deg");
+ double userLongitude = fgGetDouble("/position/longitude-deg");
+ double course, distance;
+ SGWayPoint current (pos.lon(),
+ pos.lat(),
+ 0);
+ SGWayPoint user ( userLongitude,
+ userLatitude,
+ 0);
+ user.CourseAndDistance(current, &course, &distance);
+ if ((distance * SG_METER_TO_NM) > TRAFFICTOAIDIST)
+ {
+ setDie(true);
+ //cerr << "done fp die out of range" << endl;
+ return;
+ }
+
+ FGAirport * dep = trafficRef->getDepartureAirport();
+ FGAirport * arr = trafficRef->getArrivalAirport();
+ // At parking the beginning of the airport
+ if (!( dep && arr))
+ {
+ setDie(true);
+ return;
+ }
+ //if ((dep->getId() == string("EHAM") || (arr->getId() == string("EHAM"))))
+ // {
+ // cerr << trafficRef->getRegistration()
+ // << " Enroute from " << dep->getId()
+ // << " to " << arr->getId()
+ // << " just crossed " << prev->name
+ // << " Assigned rwy " << fp->getRunwayId()
+ // << " " << fp->getRunway() << endl;
+ // }
+ //if ((dep->getId() == string("EHAM")) && (prev->name == "park2"))
+ // {
+ // cerr << "Schiphol ground "
+ // << trafficRef->getCallSign();
+ // if (trafficRef->getHeavy())
+ // cerr << "Heavy";
+ // cerr << ", is type "
+ // << trafficRef->getAircraft()
+ // << " ready to go. IFR to "
+ // << arr->getId() <<endl;
+ // }
+ if (prev->name == "park2")
+ dep->releaseParking(fp->getGate());
+
+ //if ((arr->getId() == string("EHAM")) && (prev->name == "Center"))
+ // {
+ //
+ // cerr << "Schiphol ground "
+ // << trafficRef->getCallSign();
+ // if (trafficRef->getHeavy())
+ // cerr << "Heavy";
+ // cerr << " landed runway "
+ // << fp->getRunway()
+ // << " request taxi to gate "
+ // << arr->getParkingName(fp->getGate())
+ // << endl;
+ // }
+ if (prev->name == "END")
+ fp->setTime(trafficRef->getDepartureTime());
+ //cerr << "5" << endl;
+ }
+ if (next)
+ {
+ //cerr << "Current waypoint" << curr->name << endl;
+ //cerr << "Next waypoint" << next->name << endl;
+ fp->setLeadDistance(speed, tgt_heading, curr, next);
}
- tgt_speed = prev->speed;
- hdg_lock = alt_lock = true;
- no_roll = prev->on_ground;
- //cout << "Crossing waypoint: " << prev->name << endl;
- //cout << " Target speed: " << tgt_speed << endl;
- //cout << " Target altitude: " << tgt_altitude << endl;
- //cout << " Target heading: " << tgt_heading << endl << endl;
+ //cerr << "5.1" << endl;
+ if (curr->crossat > -1000.0) {
+ //cerr << "5.1a" << endl;
+ use_perf_vs = false;
+ tgt_vs = (curr->crossat - altitude)/
+ (fp->getDistanceToGo(pos.lat(), pos.lon(), curr)/6076.0/speed*60.0);
+ //cerr << "5.1b" << endl;
+ tgt_altitude = curr->crossat;
} else {
- double calc_bearing = fp->getBearing(pos.lat(), pos.lon(), curr);
- double hdg_error = calc_bearing - tgt_heading;
- if (fabs(hdg_error) > 1.0) {
- TurnTo( calc_bearing );
- }
+ //cerr << "5.1c" << endl;
+ use_perf_vs = true;
+ //cerr << "5.1d" << endl;
+ tgt_altitude = prev->altitude;
+ //cerr << "Setting target altitude : " <<tgt_altitude << endl;
}
-
- }
+ //cerr << "6" << endl;
+ tgt_speed = prev->speed;
+ hdg_lock = alt_lock = true;
+ no_roll = prev->on_ground;
+ //cout << "Crossing waypoint: " << prev->name << endl;
+ //cout << " Target speed: " << tgt_speed << endl;
+ //cout << " Target altitude: " << tgt_altitude << endl;
+ //cout << " Target heading: " << tgt_heading << endl << endl;
+ } else {
+
+ double calc_bearing = fp->getBearing(pos.lat(), pos.lon(), curr);
+ //cerr << "Bearing = " << calc_bearing << endl;
+ if (speed < 0)
+ {
+ calc_bearing +=180;
+ if (calc_bearing > 360)
+ calc_bearing -= 360;
+ }
+ if (finite(calc_bearing))
+ {
+ double hdg_error = calc_bearing - tgt_heading;
+ if (fabs(hdg_error) > 1.0) {
+ TurnTo( calc_bearing );
+ }
+ }
+ else
+ {
+ cerr << "calc_bearing is not a finite number : "
+ << "Speed " << speed
+ << "pos : " << pos.lat() << ", " << pos.lon()
+ << "waypoint " << curr->latitude << ", " << curr->longitude << endl;
+ cerr << "waypoint name " << curr->name;
+ exit(1);
+ }
+ double speed_diff = speed - prevSpeed;
+ // Update the lead distance calculation if speed has changed sufficiently
+ // to prevent spinning (hopefully);
+ if (fabs(speed_diff) > 10)
+ {
+ prevSpeed = speed;
+ fp->setLeadDistance(speed, tgt_heading, curr, next);
+ }
+
+ //cerr << "Done Processing FlightPlan"<< endl;
+ } // if (dt count) else
+}
+ bool FGAIAircraft::_getGearDown() const {
+ return ((props->getFloatValue("position/altitude-agl-ft") < 900.0)
+ && (props->getFloatValue("velocities/airspeed-kt")
+ < performance->land_speed*1.25));
+}
+
+
+void FGAIAircraft::loadNextLeg()
+{
+ //delete fp;
+ //time_t now = time(NULL) + fgGetLong("/sim/time/warp");
+
+
+ //FGAIModelEntity entity;
+ //entity.m_class = "jet_transport";
+ //entity.path = modelPath.c_str();
+ //entity.flightplan = "none";
+ //entity.latitude = _getLatitude();
+ //entity.longitude = _getLongitude();
+ //entity.altitude = trafficRef->getCruiseAlt() * 100; // convert from FL to feet
+ //entity.speed = 450; // HACK ALERT
+ //entity.fp = new FGAIFlightPlan(&entity, courseToDest, i->getDepartureTime(), dep, arr);
+ int leg;
+ if ((leg = fp->getLeg()) == 10)
+ {
+ trafficRef->next();
+ leg = 1;
+ fp->setLeg(leg);
+
+ //cerr << "Resetting leg : " << leg << endl;
+ }
+ //{
+ //leg++;
+ //fp->setLeg(leg);
+ //cerr << "Creating leg number : " << leg << endl;
+ FGAirport *dep = trafficRef->getDepartureAirport();
+ FGAirport *arr = trafficRef->getArrivalAirport();
+ if (!(dep && arr))
+ {
+ setDie(true);
+ //cerr << "Failed to get airport in AIAircraft::ProcessFlightplan()" << endl;
+ //if (dep)
+ // cerr << "Departure " << dep->getId() << endl;
+ //if (arr)
+ // cerr << "Arrival " << arr->getId() << endl;
+ }
+ else
+ {
+ double cruiseAlt = trafficRef->getCruiseAlt() * 100;
+ //cerr << "Creating new leg using " << cruiseAlt << " as cruise altitude."<< endl;
+
+ fp->create (dep,
+ arr,
+ leg,
+ cruiseAlt, //(trafficRef->getCruiseAlt() * 100), // convert from FL to feet
+ trafficRef->getSpeed(),
+ _getLatitude(),
+ _getLongitude(),
+ false,
+ trafficRef->getRadius(),
+ trafficRef->getFlightType(),
+ acType,
+ company);
+ //prev = fp->getPreviousWaypoint();
+ //curr = fp->getCurrentWaypoint();
+ //next = fp->getNextWaypoint();
+ //cerr << "25" << endl;
+ //if (next)
+ // {
+ // //cerr << "Next waypoint" << next->name << endl;
+ // fp->setLeadDistance(speed, tgt_heading, curr, next);
+ // }
+ //cerr << "25.1" << endl;
+ //if (curr->crossat > -1000.0) {
+ // //cerr << "25.1a" << endl;
+ // use_perf_vs = false;
+ //
+ // tgt_vs = (curr->crossat - altitude)/
+ // (fp->getDistanceToGo(pos.lat(), pos.lon(), curr)/6076.0/speed*60.0);
+ // //cerr << "25.1b" << endl;
+ // tgt_altitude = curr->crossat;
+ //} else {
+ // //cerr << "25.1c" << endl;
+ // use_perf_vs = true;
+ // //cerr << "25.1d" << endl;
+ // tgt_altitude = prev->altitude;
+ // //cerr << "Setting target altitude : " <<tgt_altitude << endl;
+ // }
+ //cerr << "26" << endl;
+ //tgt_speed = prev->speed;
+ //hdg_lock = alt_lock = true;
+ //no_roll = prev->on_ground;
+
+ }
+ //}
+ //else
+ //{
+ //delete entity.fp;
+ //entity.fp = new FGAIFlightPlan(&entity,
+ // 999, // A hack
+ // trafficRef->getDepartureTime(),
+ // trafficRef->getDepartureAirport(),
+ // trafficRef->getArrivalAirport(),
+ // false,
+ // acType,
+ // company);
+ //SetFlightPlan(entity.fp);
}
+
+// Note: This code is copied from David Luff's AILocalTraffic
+// Warning - ground elev determination is CPU intensive
+// Either this function or the logic of how often it is called
+// will almost certainly change.
+
+void FGAIAircraft::getGroundElev(double dt) {
+ dt_elev_count += dt;
+ //return;
+ if (dt_elev_count < (10.0 + (rand() % 100))) // Update minimally every 10 secs, but add some randomness to prevent them all IA objects doing this synced
+ {
+ return;
+ }
+ else
+ {
+ dt_elev_count = 0;
+ }
+ // It would be nice if we could set the correct tile center here in order to get a correct
+ // answer with one call to the function, but what I tried in the two commented-out lines
+ // below only intermittently worked, and I haven't quite groked why yet.
+ //SGBucket buck(pos.lon(), pos.lat());
+ //aip.getSGLocation()->set_tile_center(Point3D(buck.get_center_lon(), buck.get_center_lat(), 0.0));
+
+ // Only do the proper hitlist stuff if we are within visible range of the viewer.
+ double visibility_meters = fgGetDouble("/environment/visibility-m");
+
+
+ FGViewer* vw = globals->get_current_view();
+ double
+ course,
+ distance;
+
+ //Point3D currView(vw->getLongitude_deg(),
+ // vw->getLatitude_deg(), 0.0);
+ SGWayPoint current (pos.lon(),
+ pos.lat(),
+ 0);
+ SGWayPoint view ( vw->getLongitude_deg(),
+ vw->getLatitude_deg(),
+ 0);
+ view.CourseAndDistance(current, &course, &distance);
+ if(distance > visibility_meters) {
+ //aip.getSGLocation()->set_cur_elev_m(aptElev);
+ return;
+ }
+
+ // FIXME: make shure the pos.lat/pos.lon values are in degrees ...
+ double range = 500.0;
+ if (!globals->get_tile_mgr()->scenery_available(pos.lat(), pos.lon(), range))
+ {
+ // Try to shedule tiles for that position.
+ globals->get_tile_mgr()->update( aip.getSGLocation(), range );
+ }
+
+ // FIXME: make shure the pos.lat/pos.lon values are in degrees ...
+ double alt;
+ if (globals->get_scenery()->get_elevation_m(pos.lat(), pos.lon(),
+ 20000.0, alt))
+ tgt_altitude = alt;
+}