1 // FGAIBallistic - FGAIBase-derived class creates a ballistic object
3 // Written by David Culp, started November 2003.
4 // - davidculp2@comcast.net
6 // This program is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU General Public License as
8 // published by the Free Software Foundation; either version 2 of the
9 // License, or (at your option) any later version.
11 // This program is distributed in the hope that it will be useful, but
12 // WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // General Public License for more details.
16 // You should have received a copy of the GNU General Public License
17 // along with this program; if not, write to the Free Software
18 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 #include <simgear/math/point3d.hxx>
27 #include "AIBallistic.hxx"
30 FGAIBallistic::FGAIBallistic(FGAIManager* mgr) {
32 _type_str = "ballistic";
40 FGAIBallistic::~FGAIBallistic() {
44 bool FGAIBallistic::init() {
46 aero_stabilized = true;
52 void FGAIBallistic::bind() {
54 props->tie("sim/time/elapsed-sec", SGRawValuePointer<double>(&(this->life_timer)));
57 void FGAIBallistic::unbind() {
58 // FGAIBase::unbind();
59 props->untie("sim/time/elapsed-sec");
62 void FGAIBallistic::update(double dt) {
69 void FGAIBallistic::setAzimuth(double az) {
74 void FGAIBallistic::setElevation(double el) {
75 pitch = elevation = el;
79 void FGAIBallistic::setStabilization(bool val) {
80 aero_stabilized = val;
83 void FGAIBallistic::setDragArea(double a) {
87 void FGAIBallistic::setLife(double seconds) {
91 void FGAIBallistic::setBuoyancy(double fpss) {
95 void FGAIBallistic::setWind_from_east(double fps) {
99 void FGAIBallistic::setWind_from_north(double fps) {
100 wind_from_north = fps;
103 void FGAIBallistic::setWind(bool val) {
106 void FGAIBallistic::Run(double dt) {
109 if (life_timer > life) setDie(true);
111 double speed_north_deg_sec;
112 double speed_east_deg_sec;
113 double wind_speed_from_north_deg_sec;
114 double wind_speed_from_east_deg_sec;
116 // the two drag calculations below assume sea-level density,
117 // mass of 0.03 slugs, drag coeff of 0.295
118 // adjust speed due to drag
119 speed -= 0.0116918 * drag_area * speed * speed * dt;
120 if ( speed < 0.0 ) speed = 0.0;
121 vs = sin( pitch * SG_DEGREES_TO_RADIANS ) * speed;
122 hs = cos( pitch * SG_DEGREES_TO_RADIANS ) * speed;
124 // convert horizontal speed (fps) to degrees per second
125 speed_north_deg_sec = cos(hdg / SG_RADIANS_TO_DEGREES) * hs / ft_per_deg_lat;
126 speed_east_deg_sec = sin(hdg / SG_RADIANS_TO_DEGREES) * hs / ft_per_deg_lon;
128 // convert wind speed (fps) to degrees per second
135 wind_speed_from_north_deg_sec = wind_from_north / ft_per_deg_lat;
136 wind_speed_from_east_deg_sec = wind_from_east / ft_per_deg_lon;
140 // pos.setlat( pos.lat() + (speed_north_deg_sec * dt) );
141 // pos.setlon( pos.lon() + (speed_east_deg_sec * dt) );
146 pos.setlat( pos.lat() + (speed_north_deg_sec - wind_speed_from_north_deg_sec) * dt );
147 pos.setlon( pos.lon() + (speed_east_deg_sec - wind_speed_from_east_deg_sec) * dt );
149 // adjust vertical speed for acceleration of gravity
150 vs -= (gravity - buoyancy) * dt;
152 // adjust altitude (feet)
154 pos.setelev(altitude * SG_FEET_TO_METER);
156 // recalculate pitch (velocity vector) if aerostabilized
157 if (aero_stabilized) pitch = atan2( vs, hs ) * SG_RADIANS_TO_DEGREES;
159 // recalculate total speed
160 speed = sqrt( vs * vs + hs * hs);
162 // set destruction flag if altitude less than sea level -1000
163 if (altitude < -1000.0) setDie(true);