Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Software-Projekte der Mitglieder (https://www.delphipraxis.net/26-software-projekte-der-mitglieder/)
-   -   Projekt: Räuber-Beute-Simulation (https://www.delphipraxis.net/21416-projekt-raeuber-beute-simulation.html)

Nonsense 2. Mai 2004 17:53


Projekt: Räuber-Beute-Simulation
 
Liste der Anhänge anzeigen (Anzahl: 2)
Hallo,

es ist endlich soweit. Mein Projekt, an dem ich jetzt schon seit 2 Monaten sitze, ich fertig. Es ist eine Räuber-Beute-Simulation als Klausurersatzleistung für den Bio-Unterricht (Abgabe ist am Donnerstag). Das ganze steht unter der GPL Lizenz, Source Code reiche ich nach (ich poste dann die URL, bin gerade am Hoster-Umzug, außerdem müssen noch ein paar Veränderungen am Code vorgenommen werden).
Ich möchte mich an dieser Stelle noch einmal bei allen bedanken die mir geholfen haben, besonders aber Chewie und Neolithos.

Zum Programm: Aufbau sollte klar sein. Die einzelnen Parameter sind überhaupt noch nicht optimiert, d.h. früher oder später geht immer alles zu Grunde. Ich würde mich freuen, wenn jemand mal nach einer optimalen Parameter-Einstellung sucht und die default.dat postet.
Wenn Fehler gefunden werden: Immer her damit.

Zu Installation: Einfach die ZIP-Datei entpacken und simulation.exe starten. Die Parameter werden in der default.dat gespeichert. Es bleiben keine Installations-Reste, keine Registry-Schlüssel o.ä.. Die entpackten Dateien einfach wieder löschen. Fertig.

Anbei noch ein Screenshot, für die Leute, die noch an einem Download zweifeln ;)

:dp:

Edit:
Wer sich für diese Thematik interessiert, kann sich ja die Umsetzungen bei StarLogo und NetLogo ansehen (bei beiden keine Installation nötig, da Java-Programme).
StarLogo:
http://education.mit.edu/starlogo/

NetLogo:
http://ccl.sesp.northwestern.edu/netlogo/
http://ccl.northwestern.edu/netlogo/...SheepPredation

Beispiel mit DynaSys (öfter mal down):
http://www.ikarus.uni-dortmund.de/Ar...e-Modell.shtml

Edit 2:
Aktualisierte Version hochgeladen.

Edit 3:
Aktualisierte Version hochgeladen.

toms 2. Mai 2004 18:13

Re: Projekt: Räuber-Beute-Simulation
 
Hi,

Gefällt mir, die Simulation.
Eine Sache: Wenn die ganze Welt mit Gras gefüllt ist, könnte die Simulation stoppen.

Nonsense 2. Mai 2004 18:15

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von toms
Gefällt mir, die Simulation.

Danke.

Zitat:

Zitat von toms
Eine Sache: Wenn die ganze Welt mit Gras gefüllt ist, könnte die Simulation stoppen.

Mhh, ich denke, dass lohnt nicht. Aber ich denke mal darüber nach.

CalganX 2. Mai 2004 18:15

Re: Projekt: Räuber-Beute-Simulation
 
Hi,
wirklich nett! Gefällt mir! :thumb:

Allerdings scheint "Katastrophe" nichts zu bewirken, oder?

Chris

Nonsense 2. Mai 2004 18:17

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von Chakotay1308
Hi,
wirklich nett! Gefällt mir! :thumb:

Allerdings scheint "Katastrophe" nichts zu bewirken, oder?

Chris

Das könnt ihr jetzt natürlich nicht wissen: die Funktionsweise habe ich in meiner Ausarbeitung beschrieben. Das Problem ist nämlich, dass man bei den Parametern eine Wachstums-Wahrscheinlichkeit einstellen kann. Wenn diese relativ hoch ist, wächst das Gras ja sehr schnell wieder nach.
Edit: mehrmaliges Betätigen schafft da Abhilfe...:wink:

Dagon 2. Mai 2004 18:23

Re: Projekt: Räuber-Beute-Simulation
 
Einen kleinen Schönheitsfehler habe ich entedckt: startet man das Programm, so ist oben das Eimer-Symbol (Sand) gewählt, klicke ich aber uf die Welt, so erscheinen Füchse.

Sonst finde ich es gut gelungen!

Nonsense 2. Mai 2004 18:24

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von the_master
Einen kleinen Schönheitsfehler habe ich entedckt: startet man das Programm, so ist oben das Eimer-Symbol (Sand) gewählt, klicke ich aber uf die Welt, so erscheinen Füchse.

Sonst finde ich es gut gelungen!

Oh, danke! Werde ich gleich beheben.

Nikolas 2. Mai 2004 18:36

Re: Projekt: Räuber-Beute-Simulation
 
sieht echt cool aus :!:

- Wie sehen die Regeln aus?
- Beim Start der Simulation könnte das Schaubild gelöscht werden oder der User müsste die Möglichkeit haben, sie zu löschen.
- Mir fehlt ein Button um die Parameter wieder auf Ausgangsposizion zu versetzten. Wenn man da rumspielt, kann es passieren, dass nicht mehr funtioniert und dann müsste man das Prog neustarten.

Sonst: Tolle Idee um eine GFS (so heisst das Ganze in Ba-Wü) in Bio zu machen und trotzdem mit Delphi spielen zu dürfen :mrgreen:

Nonsense 2. Mai 2004 18:45

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von Toxman
- Wie sehen die Regeln aus?

Es wird überprüft, um was für ein Objekt es sich handelt. Je nach Objekt wird wieder eine andere Prozedur aufgerufen. Diese läuft bei Hasen und Füchsen fast gleich ab.
Es wird erst auf die Möglichkeit der Paarung geprüft (Genug Energie? Partner? Hat der Partner genug Energie? Ist ein freies Feld vorhanden?). Wenn dies nicht der Fall ist, wird Futter gesucht. Dabei kann ein Tier nur auch die 8 Nachbarfelder schauen. Wenn auch kein Futter da ist, bewegt es sich in eine zufällige Richtung. Wenn es sich wegen Platzmangels nicht bewegen kann, passiert nichts, es verliert nur etwas Energie für das Warten.

Zitat:

Zitat von Toxman
- Beim Start der Simulation könnte das Schaubild gelöscht werden oder der User müsste die Möglichkeit haben, sie zu löschen.

Die Stop-Funktion ist bei mir gleich die Pause-Funktion. Ich kann aber mal gucken, ob sich da was machen lässt.

Zitat:

Zitat von Toxman
- Mir fehlt ein Button um die Parameter wieder auf Ausgangsposizion zu versetzten. Wenn man da rumspielt, kann es passieren, dass nicht mehr funtioniert und dann müsste man das Prog neustarten.

Die Daten werden direkt in die default.dat geschrieben. Wenn ich mal optimale Parameter haben sollte, werde ich eine backup.dat beilegen. Das wäre natürlich eine gute Idee, zwischen Übernahme der Parameter und einem Speichern zu unterscheiden. Ich werde es mir merken. Da aber Donnerstag schon Abgabe ist, wird es wohl auf die Schnelle nichts werden (sitze z.Z. an der Doku).

Robert_G 2. Mai 2004 18:45

Re: Projekt: Räuber-Beute-Simulation
 
Hi
Ersteinmal Super-Teil :thuimb:
Es macht tierisch Spass an den Parametern zu basteln.
Ich habe es gerade soweit, dass der Gau erst bei Runde 150-200 eintritt...

glkgereon 7. Mai 2004 17:18

Re: Projekt: Räuber-Beute-Simulation
 
ma ne frage, was ist die optimale einstellung beim verhältnis fuchs/hase?

Nonsense 7. Mai 2004 17:40

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von glkbkk
ma ne frage, was ist die optimale einstellung beim verhältnis fuchs/hase?

Ich habe noch keine richtig guten gefunden. Hat jemand welche?

glkgereon 7. Mai 2004 17:49

Re: Projekt: Räuber-Beute-Simulation
 
ja, mein problem ist, die suche nach dem optimalen ist scheisse schwierig, wenn man so viele einstellungen hat

hat wer für fuchs/hase ein ungefähres verhältnis?

bau doch dein prog so aus, das es sich an den optimalwert annährt, also von selbst immer wieder mit veränderten einstellungen simuliert, und schliesslich die werte, die die meissten runden erreicht haben ausgibt.
ich hoffe du verstehst, was ich meine
:-)

Nonsense 7. Mai 2004 18:02

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von glkbkk
ja, mein problem ist, die suche nach dem optimalen ist scheisse schwierig, wenn man so viele einstellungen hat

hat wer für fuchs/hase ein ungefähres verhältnis?

bau doch dein prog so aus, das es sich an den optimalwert annährt, also von selbst immer wieder mit veränderten einstellungen simuliert, und schliesslich die werte, die die meissten runden erreicht haben ausgibt.
ich hoffe du verstehst, was ich meine
:-)

Mhh, ist schwierig.
Versuchs mal so:
Erst ein stabiles System mit Gras und Hasen herstellen. Dabei darf es seitens der Hasen zu keiner Überpopulation kommen, d.h. dass gar kein Gras mehr da ist. Besonders auf die Paramter für Bewegung und die Fortplanzung achten.
Es müsste sich mit der Zeit ein stabiler Mittelwert herausbilden.

Wenn es wirklich stabil ist, ein paar Füchse einsetzen. Wenn sie zu schnell aussterben, zu erst die Parameter für's Bewegen ändern.

Du musst bedenken, dass ein Füchs genau die Energie beim fressen erhält, die der Hase z.Z. hat. Wenn der Hase z.B. 13 Energie hat, bekommt der Fuchs genau diese 13.

Wenn du ein stabiles System über 300 Runden hinbekommst, wirst du ungefähr das Optimum haben. Besser wird es wohl nicht werden.
Ist aber auf jeden Fall schaffbar.

glkgereon 7. Mai 2004 18:05

Re: Projekt: Räuber-Beute-Simulation
 
au, gagge
das mit gras/hasen hab ich gar nicht bedacht
ich hab einfachn paar hasen undn paar füchse in die landschaft gesetzt

ergebnis: ca. 50 runden :-)

Nicolai1234 7. Mai 2004 18:41

Re: Projekt: Räuber-Beute-Simulation
 
Ich denke es gibt in der Simulation keine optimalen Parameter, weil das ganze noch nicht nah genung an der Realität ist!
Man müsste Geschlecht, Geschlechtsreife, Jahreszeiten, andere Faktoren wie Wetter, Mensch, andere Tiere und vieles mehr noch einbauen, um eine Simulation zu erhalten, bei der es zu keiner Katastrophe kommt!

Nonsense 7. Mai 2004 18:53

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von Nicolai1605
Ich denke es gibt in der Simulation keine optimalen Parameter, weil das ganze noch nicht nah genung an der Realität ist!
Man müsste Geschlecht, Geschlechtsreife, Jahreszeiten, andere Faktoren wie Wetter, Mensch, andere Tiere und vieles mehr noch einbauen, um eine Simulation zu erhalten, bei der es zu keiner Katastrophe kommt!

Gegenteil, dadurch wird es noch schwieriger.

Nicolai1234 7. Mai 2004 18:57

Re: Projekt: Räuber-Beute-Simulation
 
Denke ich nicht, denn in der Natur funktionert es auch und würde man da einen Faktor weglassen, würde das ganze Gleichgewicht kaputt gehen!
Warum sollte es denn dann klappen, wenn man gleich über 15 weglässt!

glkgereon 7. Mai 2004 19:45

Re: Projekt: Räuber-Beute-Simulation
 
das problem in der natur ist:
alle faktoren, die zu schwach sind, sind ausgestorben, es sind nur noch die übrichgeblieben, die ein halbwegs gutes gleichgewicht ergeben!
das heisst wiederum, dass sich die erde solange von den populationen verändert, bis sie ein gleichgewicht erreicht

dann is der raum in wirklichkeit viel grösser, eine population kann sich viel weiter "zurückziehen". damit wird sie nicht ausgerottet, aber die population, die sie frisst, wird trotzdem kleiner

und dann, du willst sagen, das momentan ein gleichgewicht herrscht?
keine beschuldigungen, aber so wie's im moment aussieht gibts in tausend jahren nur noch den mensch +ein paar genmanipulierte pflanzen und tiere...
sieh dir nur die geschichte an:
früher musste der mensch ums überleben kämpfen (gut, ganz früher)
heute muss er ums überleben anderer populationen kämpfen
dazu gäbs noch einiges zu sagen, ....

XeRo 13. Mai 2004 14:11

Re: Projekt: Räuber-Beute-Simulation
 
Hasen in der natur können sich verstecken. Das macht ihnen das Überleben leichter. Nachdem sich die Hasen in dem prog nicht in ihren höhlen verkriechen und kinder krigen können, ist es schwerer zu überleben, da sie sofort gefressen werden.

das gras ist ja in diesem prog auch "versteckt", da selbst wenn kein gras zu beginn da ist, immer eines wächst. Daher kommen hasen & gras auch immer in ein gleichgewicht.

Nonsense 13. Mai 2004 14:19

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von XeRo
Hasen in der natur können sich verstecken. Das macht ihnen das Überleben leichter. Nachdem sich die Hasen in dem prog nicht in ihren höhlen verkriechen und kinder krigen können, ist es schwerer zu überleben, da sie sofort gefressen werden.

das gras ist ja in diesem prog auch "versteckt", da selbst wenn kein gras zu beginn da ist, immer eines wächst. Daher kommen hasen & gras auch immer in ein gleichgewicht.

Das Problem ist, dass ich nur 8 Wochen für die komplette Realisierung Zeit hatte, d.h. Erarbeiten der theoretischen Grundlagen, das Programmieren sowie das Verfassen der Dokumentation. Da kann man natürlich nicht zu sehr ins Detail gehen. Zu dem wird es nach und nach immer schwieriger, da man ja auch Anpassungen an die Konsequenzen durchführen muss. Deshalb sollte man das ganze nicht zu ernst nehmen, es ist lediglich eine "kleine" Simulation der Realität.

glkgereon 13. Mai 2004 14:27

Re: Projekt: Räuber-Beute-Simulation
 
es geht nur darum, was noch gemacht werden müsste, damit es "perfekt" ist

Nonsense 13. Mai 2004 16:15

Re: Projekt: Räuber-Beute-Simulation
 
Zitat:

Zitat von glkbkk
es geht nur darum, was noch gemacht werden müsste, damit es "perfekt" ist

Perfekt wird es wohl nie werden. Dafür gibt es noch genug Eigenschaften und Verhaltensweisen, die implentiert werden müssten.
Hauptsache ist jedenfalls, dass ich viel über OOP gelernt habe.

Alibi 13. Mai 2004 16:50

Re: Projekt: Räuber-Beute-Simulation
 
Sehr nett. :)
Was mir fehlt, ist eine Option, eine komplette Simulation zu speichern und zu öffnen. :)

glkgereon 13. Mai 2004 17:16

Re: Projekt: Räuber-Beute-Simulation
 
naja, du müsstest dann aucxh die optionen, wie oft sich vermehrt und so mitspeichern


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:03 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz