+void FGAIAircraft::checkTcas(void)
+{
+ if (props->getIntValue("tcas/threat-level",0)==3)
+ {
+ int RASense = props->getIntValue("tcas/ra-sense",0);
+ if ((RASense>0)&&(tgt_vs<4000))
+ // upward RA: climb!
+ tgt_vs = 4000;
+ else
+ if (RASense<0)
+ {
+ // downward RA: descend!
+ if (altitude_ft < 1000)
+ {
+ // too low: level off
+ if (tgt_vs>0)
+ tgt_vs = 0;
+ }
+ else
+ {
+ if (tgt_vs >- 4000)
+ tgt_vs = -4000;
+ }
+ }
+ }
+}