DelphiX: Kollision mit Wand wie bei neue Spielen?

Pyr0cracker · Verfasst: So 08.06.03 01:36

Hallo.
Ich hab n Problem, ich in meinem Spiel eine solche Kollision mit Wänden und anderen Objekten haben, wie die auch in allen neuen Spielen sind.
Ich mach die Kollision mit TPlayer.DoCollision.

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure TPLayer.DoCollision(Sprite: TSprite; var Done: Boolean);
begin
  if sprite is TWand then
  begin
    X := X - Cos256(Angle)*Speed;
    Y := Y - Sin256(Angle)*Speed;
  end;
end;

<- wackelt an der Wand lang und kann bei steilem Winkel in die Wand reinlaufen.

Ich wills aber so:
Kollision mit Wand -> Anhalten (wenn schräg zu Wand dann dran lang rutschen)

Habt ihr ne Idee wie ich das machen könnte?

Bis dahin,[/code]

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme