Tennis

[SirThornberry]

bei mir kommt beim start des programmes das irgend eine datei nicht gefunden wurde und im spiel kommt dann "mci device konnte nicht geöffnet werden oder so" und davon mindestens 20 Fenster und dann hilft nur noch der Taskmanager..

[MrKnogge]

Zitat:

Zitat von SirThornberry

bei mir kommt beim start des programmes das irgend eine datei nicht gefunden wurde und im spiel kommt dann "mci device konnte nicht geöffnet werden oder so" und davon mindestens 20 Fenster und dann hilft nur noch der Taskmanager..

lies mal den post vor deinem :wink:

[idontwantaname]

Zitat:

Zitat von stefan2005

Hi,
bei mir auch die Fehler !
Aber nach kurzem Anblick des Code:
bei den 2 MediaPlayer-Komponenten ist bei der einen z.B. der Dateiname "I:\Dokumente und Einstellungen\hanappi\Eigene Dateien\Programmieren\tennis\Peow!.wav" eingestellt !
DAS GIBT ES NATÜRLICH AUF KEINEM ANDEREN PC !

ich würde den Dateinamen beim Programmstart zuweisen mit z.B.:
MediaPlayer.FileName := ExtractFilePath(Application.ExeName)+'boing.wav';
MediaPlayer.Open;

dann müsste es gehen ;)

P.S.: bei mir geht es dann ;)
die KI ist immer noch ziehmlich stark, aber man kann immerhin schon Punkte machen, wenn der Ball an die Wand prallt und in hohem Winkel zurückprallt :)

sorry, ich hab gedacht, die dateien würden in die exe integriert, wie beim image-objekt
:oops:
das ändere ich gleich mal

hier der download

[Nicodius]

:thumb: hey nett gemacht


DAUMEN HOCH :thumb:

[Nicodius]

aha...


edit aha die 2




aber sonst gut :thumb:

[SirThornberry]

Ich fänds nicht schlecht wenn das Spiel Bildschirmzentriert starten würde und nicht desktopzentriert. Desweiteren wäre auch noch eine kleine Besserung wenn der spieler auch auf das netz zu gehen kann und wenn wie beim richtigen Tennis auch auf die Auslinien geachtet wird.

[Nicodius]

da gibtsd dann ja bald ein tennis 3d :lol:



ne es soll ja ein simples spiel für zwischendurch bleiben ;)


im war ja fad ... er ist ja kein workaholic (denk ich mal ;) )


:mrgreen:



was nettes neben bei



wenn man ein Spiel ganz gewinnt sollte vl ein applaus kommen :mrgreen: .... aber nicht das windows geklatsche von Power[j]point

[-homer-]

nettes game ;) KI wurde ja schon angesprochen! aber ansonsten :thumb:


hom0r

[DP-Maintenance]

Dieses Thema wurde von "sakura" von "Freeware" nach "Open-Source" verschoben.
Ist ja Soße mit dabei :zwinker:

[Nonsense]

Ich hab eine Frage, bzgl. meines Pong-Spiels. Es gibt da ein Problem mit der Kollision. Wenn der Ball nicht frontal auf den Schläger trifft, sondern an der unteren oder oberen Seite, fliegt er durch den Schläger durch (Siehe Anhang).

Die Kollisionsabfrage funktioniert folgendermaßen: Ich habe eine Funktion, der die X- u. Y- Koordinaten sowie Höhe und Breite von Ball und Schlägern übergeben wird. Diese überprüft dann einfach per Rechtsecks-Kollisionsabfrage, ob sich die Rechtecke schneiden.

Delphi-Quellcode:

  if IsCollision(Self.X, Self.Y, Self.Height, Self.Width,
    Player1.X, Player1.Y, Player1.Height, Player1.Width) or
    IsCollision(Self.X, Self.Y, Self.Height, Self.Width,
    Player2.X, Player2.Y, Player2.Height, Player2.Width) then DX := DX * (-1);

Wo liegt der Fehler? Strange. :gruebel:

Edit: Hab den Fehler gefunden. Ich muss vorher die Steuerung "abschalten", so dass der Schläger nicht weiter "in den Ball" bewegt werden kann. Danke trotzdem.