Thema: Delphi Zufallslabyrinth

Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Zufallslabyrinth

  Alt 22. Okt 2003, 17:37
Also, vielleicht versteht ihr es so besser. Mein Laby-Array programiere ich so:
Delphi-Quellcode:
Laby : array [1..Zeilen, 1..Spalten] of char =
  ((W,W,W,W,W,W,W,W,W,W,W,W,F,W,W),
   (W,W,F,F,F,F,F,F,F,F,F,F,F,F,W),
   (W,W,W,F,W,W,F,W,W,W,W,F,W,W,W),
   (W,W,W,F,F,F,F,W,W,W,W,W,W,W,W),
   (W,W,W,W,F,W,F,F,F,F,F,F,F,F,W),
   (W,W,W,F,F,W,W,W,W,F,W,W,W,F,W),
   (F,F,F,F,W,W,F,F,F,F,W,W,F,F,F),
   (W,W,W,F,W,W,F,W,W,F,F,W,W,W,W),
   (W,W,W,F,F,W,F,F,F,W,F,W,W,W,W),
   (W,W,W,W,W,W,F,W,W,W,W,W,W,W,W));
Nun ist F der Weg und W die Mauer. Dann sollte per Zuffalsgenerator ein sinnvolles Laby entstehen.
  Mit Zitat antworten Zitat