Wolf-Schaf-Gras-Lebens-Spiel

[Arno-Wien]

Lustige Sache, die man sich anschaut, falls es läuft die "Hilfe" liest,
dann allenfalls Fragen stellt. Entzippen, um die verschiedenen Lebensdaten laden zu können.
Entstanden noch in der TurboPascal-Zeit.
Mit Mühe übersetzt in Delphi 6 ( mit der neuen Windows-Technik, ich bin 65, ächz, mein erster Computer hatte 16kB freien Speicher ), seit gestern lauffähig in Delphi 2005 ( dank eurer Download-möglichkeit ).

Compiler:
Optimization on
Record field alignment on ( Zufall, ich weiss nicht ob das ok ist )
Extended syntax on

sonst alles off

Im Anhang die zip-Version in Delphi 2005

Arno

[Daniel G]

Respekt :thumb:

[Matze]

Moin

Sehr gewöhnungsbedürftiges Design, aber schön gemacht. :) Ich habe es lieber, wenn Programme den von mir eingestellten Windows-Style als GUI nutzen würden.


Nachtrag: Wenn ein Fenster über das Spiel geschoben wird, wird das Canvas gelöscht. Evtl. intern auf ein Bitmap zeichnen und per Draw ausgeben auf dem Canvas.

Grad kam das hier:

Zitat:

---------------------------
leben
---------------------------
Ungültige Zeigeroperation.
---------------------------
OK
---------------------------

Ich habe während der laufenden Simulation auf Zurück geklickt. Doch reproduzieren kann ich's nicht.

[Arno-Wien]

Ich habe bis vor kurzem nicht einmal gewusst was GUI ist.
Beim Fensterschieben und Minimieren bin ich dran. War bis jetzt kein Problem, da ich nie
mehr als ein Programm laufen hatte.
Danke für die Reaktion

Arno

[gsh]

ganz nett :wink:

aber gehört das ganze nicht zu Open-Source? Weil der QuellCode ist ja wohl dabei

[DP-Maintenance]

Dieses Thema wurde von "Matze" von "Freeware" nach "Open-Source" verschoben.
\\"aber gehört das ganze nicht zu Open-Source? Weil der QuellCode ist ja wohl dabei\\" :zwinker:

[Nicolai1234]

ICh verstehe teilweise nicht, was die Farben der einzelnen Punkte bedeuten. Gibt es dazu eine Erklärung?

[turboPASCAL]

@Nicolai1605, da gibt es auf dem Startbildschirm 'ne Hilfe. ;)


Also ich finde es Klasse. Das Programm kenne ich auch noch aus den Turbo Pascal Zeiten. (Irgendwo habe ich das auch noch auf irgendeiner Festplatte, finde es bloss nicht...)
Wenn ich ein wenig Kritik anbringen darf, der Style ist ja ganz gut aber es würde mir besser gefallen wenn ich das Fenster auch verschieben könnte.
Interessant währe es wenn man den Datensatz auch auswählen könnte.

Schöne Arbeit.

[Daniel G]

Zitat:

Zitat von turboPASCAL

Interessant währe es wenn man den Datensatz auch auswählen könnte.

Hmm... Kannst du doch. Einfach die Nummer eintippen.

//Edit: Oder denkst du an so etwas wie 'ne ComboBox?

[turboPASCAL]

Hm, ja oder an zwei Buttons wie "vor" und "zurück". Es gibt ja keine Bestätigung ob es auch in Ordnung ist dort den Datensatz auszuwählen. So rein intuitiv ...

[s.h.a.r.k]

Guten Morgen.

Also ich hab jetzt grad nur auf die schnelle mal reingeschnuppert und muss sagen: Echt klasse gemacht! Stekct sicherlich einiges an Arbeit drin (hab mir leider bisher den Source nich nicht anschauen können).

mfg shark

[Der Jan]

Gefällt mir sehr gut! :thumb: Könnt stundenlang zuschauen, hab nur leider nicht so viel Zeit :coder: :)

[konda]

:thumb: Echt ein klasse Programm. :thumb: Werde mir gleich mal den Code angucken. :cyclops:

[Grishnak]

Lustig!
Wie wärs denn, das ganze als Bildschirmschoner umzusetzen?

[ichbins]

:thumb:

Wirklich gut! ich hab auch mal sowas angefangen...

wie meinen Vorednern würde es auch mir besser gefallen wenn du normalen Windows-Style (am besten mit XP-Style) benutzt.

nur mal als weitere "Funktionen":

• Der Nachwuchs muss erst aufwachsen
• Geschwindigkeit der Tiere einstellbar
• Einige Werte (wie Spielgeschwindigkeit) laufen rückwärts (je kleiner um so schneller). Das kannst du ja noch umrechnen.

[faux]

Zitat:

Zitat von gsh

aber gehört das ganze nicht zu Open-Source? Weil der QuellCode ist ja wohl dabei

Zitat:

Zitat von Delphi-PRAXiS

Freeware
Freeware-Programme (mit oder ohne Sourcecode) zum Testen und Diskutieren

Zitat:

Zitat von Delphi-PRAXiS

Open-Source
Open-Source-Projekte (mit Sourcecode) zum Testen und Diskutieren

Würde mal sagen, das hätte schon in Freeware besser gepasst, denn hier darf ja laut Beschreibung auch ein Quelltext dabei sein, und Projekt ist es ja nicht direkt, so wie Open-Source beschrieben wird.

Grüße
Faux

[Arno-Wien]

Soweit ich es kann werde ich eure Anregungen umsetzen.

Jeder der Zeit hat kann aber auch selber Änderungen probieren.
Bei Unklarheiten im Code bitte melden.

Jedenfalls danke für die vielen Reaktionen.

Arno

[TeronG]

"Game Over" :shock: ahhh .. misst ... ich wollte doch wissen ob irgendwann mal die Schafe oder gar die Wölfe aussterben ...

[Arno-Wien]

Endlich wieder Zeit:

Der Nachwuchs läuft sowieso einige Zeit der Mutter nach.

Die Geschwindigkeit hängt vom Hunger ab

Spielgeschwindigkeit: gemeint ist der Verzögerungswert

Arno

[inherited]

be mir gabs noch 2 weibliche wölfe da kam dieses öde Game Over weil er irgendwie die maximale anzahl an schritten erreicht hatte.
Das könnte man doch rausnehmen, oder?

[Arno-Wien]

Bei zwei gleichen Tieren tut sich ja sowieso nichts mehr,
ich finde aber im Code keine maximale Schrittzahl, das Spiel hört bei
weniger als 2 Tieren einer Sorte auf, es zeigt aber zwei an,
ich weiss nicht warum.

Arno

[SnuffMaster23]

Wirklich nicht schlecht, kann ich auch ewig angucken!

Du solltest echt einen Bildschirmschoner draus machen!!
Vielleicht mit besserer Grafik (keine Kringel) oder - ich wags ja kaum zu sagen :): in 3D

MfG Snuffi

[Mr. Pink]

ich finds einfach nur genial, echt respekt!!! :thumb:

leider stürzt mein delphi6 immer ab, wenn ich das projekt öffnen will :wall:

hat das noch wer???????

[Arno-Wien]

Wieso steigst du nicht um auf Delphi 2005, es gibt sicher noch den Gratis-Download.

Arno

[Mr. Pink]

ich würde lieber bei delphi7 (sry, hatte aus versehen ne falsche version angegeben :drunken:), weil wir das auch in der schule haben und ich das schon allein deshalb brauche...
btw, was fürn gratis-download???

[ichbins]

@Mr. Pink:
den

[Mr. Pink]

ah, danke!

wo liegt eigentlich der unterschied zwischen den delphiversionen mit normalen versionsnummern und denen mit dem jahreszahlenanhängsel???

[inherited]

Die mit Jahreszahlen sind die neuen

[mtin]

delphi 9 = delphi 2005
delphi 10 = delphi 2006 ;)

[TeronG]

Bitte nicht über Versionsnamen Philosophieren sondern ne neue version Posten ^^

[inherited]

Stimmt es geht nahezu unendlich weit. wie wäre es wenn man das ganze noch einmal grafiklos erschafft um eine schnellere geschwindigkeit zu bekommen

[ademus]

sehr schön. macht spass zuzusehen.
vielleicht ist der vergleich mit einer simulation zum gleichen thema mit netLogo interessant:
http://ccl.northwestern.edu/netlogo/...SheepPredation

beste grüße ademus

[Arno-Wien]

zu inherited:
man muss nur die Grafik ausschalten, ich probiere es und gebe es dann ins attachement.
Allerdings sieht man dann nur die Entwicklungskurven.


zu ademus:
danke für den Tip

Arno

[inherited]

würde mich nich unbedingt stören, thx

[Arno-Wien]

an inherited:
leider
ich habe ausser dem Zaun ( der nur 1x gezeichnet wird ) alles ausgeschaltet.
Keine merkbare Beschleunigung, auch für mich überraschend.

Arno

[inherited]

strange, leichte beschleunigung schon aber nicht wirklich...naja mit grafik isses auch viel schöner

[Arno-Wien]

Bin ich auch der Meinung

Arno

[Arno-Wien]

zu inherited:

ich habe mir das noch einmal angeschaut, weil nicht sein kann, was nicht sein darf.
Natürlich zischt das ohne Grafik nur so durch. War mein Fehler

Arno

[inherited]

thx^^

[Arno-Wien]

inherited hat mich dazu gebracht, die Ablaufverzögerung neu zu schreiben,
die alte Version war Mist, natürlich kann ein moderner Computer die paar
Farbkreise schnell zeichnen.

Man kann jetzt auch die Grafik ausschalten und nur die Entwicklungskurven zeichnen

Arno