Autor Beitrag
Fiete
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 601
Erhaltene Danke: 339

W7
Delphi 6 pro
BeitragVerfasst: Di 02.02.16 18:46 
Das Programm ist eine Simulation für den Löscheinsatz wegen eines Waldbrandes.
Gesteuert wird ein Hubschrauber, so dass möglichst wenig Waldstücke in Brand geraten.
Der Hubschrauber kann genug Wasser aufnehmen, um genau ein brennendes Waldstück vollständig zu löschen.
Ein gelöschtes Waldstück kann nicht mehr brennen.
Der Ablauf spielt sich auf einem 10x10 Raster ab.
Glücklicherweise existieren Brandschneisen im Wald, so dass sich das Feuer nicht beliebig ausbreiten kann. Das gesamte Gebiet kann durch ein Raster modelliert werden, in dem jedes Feld einem Waldstück oder einem Stück einer Brandschneise entspricht. Das Feuer kann sich von einem Feld in einer Stunde auf die vier benachbarten Felder ausbreiten. Für die Aufnahme und den Transport des Wassers benötigt der Hubschrauber ebenfalls eine Stunde.
Weiße Felder stellen Brandschneisen dar, rote Felder in Brand geratene Waldstücke.
Gelöschte Waldstücke sind blau dargestellt.
Buschfeuer

Die Originalaufgabe entstammt dem 32. BWInf Runde 2 Aufgabe 1.
Viel Spaß beim testen.
Gruß Fiete

Rev. 1 Jetzt ist die zip-Datei vollständig
Rev. 2 Das Feuer kann beim Start festgelegt werden, Feuerlohe anklicken
die Flugzeit wird angezeigt
Einloggen, um Attachments anzusehen!
_________________
Fietes Gesetz: use your brain (THINK)


Zuletzt bearbeitet von Fiete am Mi 03.02.16 14:31, insgesamt 2-mal bearbeitet

Für diesen Beitrag haben gedankt: Horst_H, Narses
Horst_H
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1652
Erhaltene Danke: 243

WIN10,PuppyLinux
FreePascal,Lazarus
BeitragVerfasst: Di 02.02.16 20:07 
Hallo,

Zitat:
Gesteuert wird ein Hubschrauber, so dass möglichst wenig Waldstücke in Brand geraten.

Wie steuere ich den, oder schaue ich bei Simulation zu?
Von wo startet der Hubschrauber? Ich meine, wegen der Flugzeit.Es wäre doch interessant, die Flugzeit und den Startpunkt zu variieren.
Die Datei BuschFeuer.pas fehlt in der Zip, sonst wäre es kein opensource ;-)

Gruß Horst
Fiete Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 601
Erhaltene Danke: 339

W7
Delphi 6 pro
BeitragVerfasst: Di 02.02.16 20:14 
Moin Horst_H,
menschliches Versagen :oops:
Startpunkt und Flugzeit werde ich die nächsten Tage noch einbauen.
Gruß Fiete

_________________
Fietes Gesetz: use your brain (THINK)
Fiete Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 601
Erhaltene Danke: 339

W7
Delphi 6 pro
BeitragVerfasst: Do 04.02.16 12:12 
Moin,
es ist vollbracht und hochgeladen!
Gruß Fiete

_________________
Fietes Gesetz: use your brain (THINK)