Hallo,

hier mal mein Snake Clone. Komplett OOP mit Win32 API (nonVCL).
Ich muss noch ein paar kleine Bugs beseitigen, vielleicht kommen noch ein paar Features mit rein.

Dazu will ich noch ein Tutorial zum Thema Spieleprogrammierung unter Delphi schreiben. Deshalb gibt es vorerst noch keinen Source (kommt aber noch, versprochen. Fehlen eh noch die Kommentare).

Ihr könnt ja mal Euren Senf dazu geben.

Btw: Das Spiel startet man mit [ENTER], Steuerung erfolgt über die Pfeiltasten.

So long.

Edit 1: Neue Version hochgeladen.
Edit 2: Neue Version hochgeladen.

Edit 3: Neue Version hochgeladen.

Hi,
sehr nett und einfach. Es flackert nicht, dass gefällt mir. *g*
Aber mal eine Frage: hast du irgendwelche nonVCL-Units noch drin? Ich denke mal, dass man das noch ein wenig kleiner kriegt (schlagt mich, wenn ich falsch liege).

Chris

Zitat von Chakotay1308:

Hi,
sehr nett und einfach. Es flackert nicht, dass gefällt mir. *g*
Aber mal eine Frage: hast du irgendwelche nonVCL-Units noch drin? Ich denke mal, dass man das noch ein wenig kleiner kriegt (schlagt mich, wenn ich falsch liege).

Chris

Hab die Units Windows, Messages (dürfte eigentlich klar sein) und Graphics drin. Problem ist, dass die Graphics.pas das Ganze ziehmlich aufbläht. Hab ansonsten darauf geachtet, keine unnötigen Units zu nehmen und manche Sachen selber zu machen.

Falls Du eine Idee haben solltest: Immer her damit.

Hi,
hm... ich vermute mal, dass es jetzt wirklich an der Graphics.pas liegt (ist die nicht VCL? - Bin mir nicht sicher). Man müsste mal schauen, was du davon brauchst und was nicht.

Chris

Zitat von Chakotay1308:

Hi,
hm... ich vermute mal, dass es jetzt wirklich an der Graphics.pas liegt (ist die nicht VCL? - Bin mir nicht sicher). Man müsste mal schauen, was du davon brauchst und was nicht.

Was meinst Du mit VCL? Gibt es denn noch eine nonVCL Graphics.pas? Kann Dir da nicht folgen.

Wenn du Funktionen der Graphics benötigst, dann hast du die VCL mit drin. Sprich kein reines nonVCL Programm.

Deshalb wird die EXE so groß.

Hi,
was ich glaube - aber wie gesagt nicht weiß - ist, dass die Graphics.pas ein Bestandteil der VCL ist. Dem Header nach zu urteilen ist das auch wohl so:

markieren

Code:

{*******************************************************}
{                                                       }
{       Borland Delphi Visual Component Library        }
{                                                       }
{  Copyright (c) 1995-2001 Borland Software Corporation }
{                                                       }
{*******************************************************}

Das heißt du greifst auf VCL-Funktionen zu, die eigentlich in einem nonVCL-Programm nichts zu suchen haben. Man müsste also gucken, was du daraus verwendest und dann dafür Alternativen in der WinAPI suchen.

Chris

Zitat von neolithos:

Wenn du Funktionen der Graphics benötigst, dann hast du die VCL mit drin. Sprich kein reines nonVCL Programm.

Deshalb wird die EXE so groß.

Achso. D.h. ich müsste die Windows Funktionen zum Zeichnen nutzen? Da werde ich wohl Teile noch einmal umschreiben müssen.

Hi Philipp,

sieht gar nicht schlecht aus
Ein paar Kleinigkeiten sind da aber noch:

• Du solltest vielleicht einen Text ausgeben, damit man weiß, Return zum Start notwendig ist.
• Die Schlange könnte beim Start etwas länger sein.
• Der Kopf der Schlange könnte eine andere Farbe haben.
• Die Schlangenelemente könnten 1px niedriger und schmaler sein als das Raster. Grund: wenn ich die Schlange um eine enge Kurve führe (siehe Anhang), dann ist kein Zwischenraum.

Und natürlich dürfen auch die Bugs nicht fehlen:

• Du vergisst anscheinend, die Größe eines Futterelements beim Random abzuziehen. Eines war jedenfalls teilweise abgeschnitten, und ich hab den Screenshot überschrieben
• Die Schlange kann umdrehn (wenn ich runterfahre und die nach-oben-Taste drücke, fährt die Schlange einfach wieder nach oben)

Greetz
alcaeus

Zitat von alcaeus:

• Du solltest vielleicht einen Text ausgeben, damit man weiß, Return zum Start notwendig ist.

Ups, hatte ich glatt vergessen.

Zitat von alcaeus:

• Die Schlange könnte beim Start etwas länger sein.

Jo, versuchs mir zu merken.

Zitat von alcaeus:

• Der Kopf der Schlange könnte eine andere Farbe haben.

Muss ich mal gucken, ob mir das was einfällt.

Zitat von alcaeus:

• Die Schlangenelemente könnten 1px niedriger und schmaler sein als das Raster. Grund: wenn ich die Schlange um eine enge Kurve führe (siehe Anhang), dann ist kein Zwischenraum.

Jo, werds mit einbauen.

Zitat von alcaeus:

• Du vergisst anscheinend, die Größe eines Futterelements beim Random abzuziehen. Eines war jedenfalls teilweise abgeschnitten, und ich hab den Screenshot überschrieben

Eigentlich nicht. Strange.

Zitat von alcaeus:

• Die Schlange kann umdrehn (wenn ich runterfahre und die nach-oben-Taste drücke, fährt die Schlange einfach wieder nach oben)

Jo, weiß ich bereits. Wird noch gefixed. Ist aber nur bei 2-Block-Snakes der Fall.

Danke!