Eine Snake Variante

Vorstellungen von Programmen, welche mit Lazarus erstellt worden.

Eine Snake Variante

Beitragvon Michl » 20. Aug 2015, 01:06 Eine Snake Variante

Da habe ich doch Lust bekommen einmal Snake zu spielen, aufgrund http://www.lazarusforum.de/viewtopic.php?f=9&t=8957

Da habe ich mal eine Variante geschrieben und bin eben schon auf 9016 Punkte gekommen (bei normaler Spielfeldgröße) :D - Schafft das noch wer???

Bild

Projekt anbei

[Edit]
Neue Variante anbei (Bugfix für FPC 2.6.4) (Bugfix für 64bit)
Getested unter Win7 32bit und 64bit, Laz. 1.4.2 und 1.5
Dateianhänge
MySnake.zip
(129.39 KiB) 18-mal heruntergeladen
Code: Alles auswählen
type
  TLiveSelection = (lsMoney, lsChilds, lsTime);
  TLive = Array[0..1] of TLiveSelection; 
Michl
 
Beiträge: 2320
Registriert: 19. Jun 2012, 12:54
OS, Lazarus, FPC: Win7 Laz 1.7 Trunk FPC 3.1.1 Trunk | 
CPU-Target: 32Bit/64bit
Nach oben

Beitragvon Michl » 20. Aug 2015, 13:24 Re: Eine Snake Variante

Jetzt noch mit einer richtigen Schlange (obwohl mir klassisch fast besser gefällt) :mrgreen:

Alles mit LCL-Controls.

Bild
Dateianhänge
GibDerSchlangeFutter.zip
(455.96 KiB) 18-mal heruntergeladen
Code: Alles auswählen
type
  TLiveSelection = (lsMoney, lsChilds, lsTime);
  TLive = Array[0..1] of TLiveSelection; 
Michl
 
Beiträge: 2320
Registriert: 19. Jun 2012, 12:54
OS, Lazarus, FPC: Win7 Laz 1.7 Trunk FPC 3.1.1 Trunk | 
CPU-Target: 32Bit/64bit
Nach oben

Beitragvon Mathias » 20. Aug 2015, 17:00 Re: Eine Snake Variante

@Michel
Getested unter Win7 32bit und 64bit, Laz. 1.4.2 und 1.5

Läuft auch mit Linux. habe es gerade getestet.
Mit Lazarus sehe ich gün
Mit Java und C/C++ sehe ich rot
Mathias
 
Beiträge: 4347
Registriert: 2. Jan 2014, 18:21
Wohnort: Schweiz
OS, Lazarus, FPC: Linux (die neusten Trunc) | 
CPU-Target: 64Bit
Nach oben

Beitragvon Michl » 20. Aug 2015, 21:16 Re: Eine Snake Variante

Mathias hat geschrieben:Läuft auch mit Linux. habe es gerade getestet.
Das freut zu hören :)
Code: Alles auswählen
type
  TLiveSelection = (lsMoney, lsChilds, lsTime);
  TLive = Array[0..1] of TLiveSelection; 
Michl
 
Beiträge: 2320
Registriert: 19. Jun 2012, 12:54
OS, Lazarus, FPC: Win7 Laz 1.7 Trunk FPC 3.1.1 Trunk | 
CPU-Target: 32Bit/64bit
Nach oben

• Themenende •

Zurück zu Programme



Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste

porpoises-institution
accuracy-worried