Einzelnen Beitrag anzeigen

GeMo

Registriert seit: 25. Jan 2006
80 Beiträge
 
Delphi 7 Professional
 
#1

Steuerung eines Raumschiffes mit Trägheit

  Alt 5. Okt 2007, 11:28
hallo leute!
es geht um folgendes:
ich programmier ein spiel, wo man mit einem raumschiff rumfliegen soll..
das mit dem rumfliegen klappt auch alles wunderbar! das problem ist nur, das das raumschiff quasi ohne trägheit rumfliegt! wenn ich z.b. in eine richtung fliege und dann genau entgegengesetzt gas gebe, dann fliegt das schiff sofort mit voller geschwindigkeit in die andere richtung ohne vorher quasi die trägheit zu überwinden :/

hier mal meine momentane steuerungsprozedur:
Delphi-Quellcode:
if(isUp in Main.DXInput.States)then
begin
  if(speed < max_speed) then
  begin
    speed := speed + 0.5;
  end;
  drive_angle := angle;
  dx := cos256(drive_angle)*speed;
  dy := sin256(drive_angle)*speed;
end;

x := x + dx;
y := y + dy;
also wie gesagt.. es funktioniert zwar schon "in etwa" so wie es sollte, dennoch fehlt die trägheit momentan und ich habe keine ahnung wie ich das realisieren soll :/

ich hab hier nochmal 2 videos aufgenommen, eins richtig - eins falsch, bei dem man genau sehen kann was ich meine...

Videos.zip (5,62 mb)

ich hoffe jemand kann mir hier helfen..
greetz GeMo
  Mit Zitat antworten Zitat