Also wenns wirklich nur ein bisschen Gravitation sein soll, geht das so:
Delphi-Quellcode:
// Speed = 0 ; Gas geben erhöht, Bremsen erniedrigt dessen Wert, erhöht sich bis max. 150 ; min. 0
FXSpeed := round(cos(PI/180*Angle)*Speed);
FYSpeed := round(sin(PI/180*Angle)*Speed + 0.5 * TimeGap);
X := X + FXSpeed * TimeGap;
Y := Y + FYSpeed * TimeGap;
Was da aber noch nicht mit drin ist, ist die Sache mit dem schneller fliegen <=> mehr Auftrieb