2 #include "Propeller.hpp"
4 #include "PropEngine.hpp"
7 PropEngine::PropEngine(Propeller* prop, Engine* eng, float moment)
9 // Start off at 500rpm, because the start code doesn't exist yet
11 _dir[0] = 1; _dir[1] = 0; _dir[2] = 0;
23 PropEngine::~PropEngine()
29 void PropEngine::setMagnetos(int pos)
34 void PropEngine::setAdvance(float advance)
36 _advance = Math::clamp(advance, 0, 1);
39 void PropEngine::setPropPitch(float proppitch)
41 // update Propeller property
42 _prop->setPropPitch(proppitch);
45 void PropEngine::setPropFeather(int state)
47 // toggle prop feathering on/off
48 _prop->setPropFeather(state);
51 void PropEngine::setVariableProp(float min, float max)
58 bool PropEngine::isRunning()
60 return _eng->isRunning();
63 bool PropEngine::isCranking()
65 return _eng->isCranking();
68 float PropEngine::getOmega()
73 void PropEngine::setOmega (float omega)
78 void PropEngine::getThrust(float* out)
81 for(i=0; i<3; i++) out[i] = _thrust[i];
84 void PropEngine::getTorque(float* out)
87 for(i=0; i<3; i++) out[i] = _torque[i];
90 void PropEngine::getGyro(float* out)
93 for(i=0; i<3; i++) out[i] = _gyro[i];
96 float PropEngine::getFuelFlow()
101 void PropEngine::stabilize()
103 float speed = -Math::dot3(_wind, _dir);
104 _eng->setThrottle(_throttle);
105 _eng->setMixture(_mixture);
107 _eng->setStarter(false);
108 _eng->setMagnetos(3);
110 bool running_state = _eng->isRunning();
111 _eng->setRunning(true);
114 _omega = _minOmega + _advance * (_maxOmega - _minOmega);
115 _prop->modPitch(1e6); // Start at maximum pitch and move down
120 bool goingUp = false;
124 _prop->calc(_rho, speed, _omega * _gearRatio, &thrust, &ptau);
125 _eng->calc(_pressure, _temp, _omega);
128 // Compute torque as seen by the engine's end of the gearbox.
129 // The propeller will be moving more slowly (for gear ratios
130 // less than one), so it's torque will be higher than the
131 // engine's, so multiply by _gearRatio to get the engine-side
134 float etau = _eng->getTorque();
135 float tdiff = etau - ptau;
137 Math::mul3(thrust, _dir, _thrust);
139 if(Math::abs(tdiff/(_moment * _gearRatio)) < 0.1)
143 if(!goingUp) step *= 0.5f;
145 if(!_variable) _omega += step;
146 else _prop->modPitch(1+(step*0.005f));
148 if(goingUp) step *= 0.5f;
150 if(!_variable) _omega -= step;
151 else _prop->modPitch(1-(step*0.005f));
156 _eng->setRunning(running_state);
159 void PropEngine::init()
162 _eng->setStarter(false);
163 _eng->setMagnetos(0);
166 void PropEngine::integrate(float dt)
168 float speed = -Math::dot3(_wind, _dir);
170 float propTorque, engTorque, thrust;
172 _eng->setThrottle(_throttle);
173 _eng->setStarter(_starter);
174 _eng->setMagnetos(_magnetos);
175 _eng->setMixture(_mixture);
176 _eng->setFuelState(_fuel);
178 _prop->calc(_rho, speed, _omega * _gearRatio, &thrust, &propTorque);
180 _omega = 0.001; // hack to get around reports of NaNs somewhere...
181 propTorque *= _gearRatio;
182 _eng->calc(_pressure, _temp, _omega);
184 engTorque = _eng->getTorque();
185 _fuelFlow = _eng->getFuelFlow();
187 // Turn the thrust into a vector and save it
188 Math::mul3(thrust, _dir, _thrust);
190 // We do our "RPM" computations on the engine's side of the
191 // world, so modify the moment value accordingly.
192 float momt = _moment * _gearRatio;
194 // Euler-integrate the RPM. This doesn't need the full-on
195 // Runge-Kutta stuff.
196 float rotacc = (engTorque-propTorque)/Math::abs(momt);
197 _omega += dt * rotacc;
199 _omega = 0 - _omega; // don't allow negative RPM
200 // FIXME: introduce proper windmilling
202 // Store the total angular momentum into _gyro, unless the
203 // propeller is a counter-rotating pair (which has zero net
204 // angular momentum, even though it *does* have an MoI for
205 // acceleration purposes).
206 Math::mul3(_contra ? 0 : _omega*momt, _dir, _gyro);
208 // Accumulate the engine torque, it acts on the body as a whole.
209 // (Note: engine torque, not propeller torque. They can be
210 // different, but the difference goes to accelerating the
211 // rotation. It is the engine torque that is felt at the shaft
212 // and works on the body.) (Note 2: contra-rotating propellers do
213 // not exert net torque on the aircraft).
214 float tau = _moment < 0 ? engTorque : -engTorque;
215 Math::mul3(_contra ? 0 : tau, _dir, _torque);
217 // Iterate the propeller governor, if we have one. Since engine
218 // torque is basically constant with RPM, we want to make the
219 // propeller torque at the target RPM equal to the engine by
220 // varying the pitch. Assume the the torque goes as the square of
221 // the RPM (roughly correct) and compute a "target" torque for the
222 // _current_ RPM. Seek to that. This is sort of a continuous
223 // Newton-Raphson, basically.
225 float targetPropSpd = _minOmega + _advance*(_maxOmega-_minOmega);
226 float targetOmega = targetPropSpd / _gearRatio; // -> "engine omega"
227 float ratio2 = (_omega*_omega)/(targetOmega*targetOmega);
228 float targetTorque = engTorque * ratio2;
230 float mod = propTorque < targetTorque ? 1.04f : (1.0f/1.04f);
232 // Convert to an acceleration here, so that big propellers
233 // don't seek faster than small ones.
234 float diff = Math::abs((propTorque - targetTorque) / momt);
235 if(diff < 10) mod = 1 + (mod-1)*(0.1f*diff);
237 _prop->modPitch(mod);
241 }; // namespace yasim