Delphi-PRAXiS
Seite 4 von 4   « Erste     234   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Schiffe versenken, Platzierung (https://www.delphipraxis.net/151288-schiffe-versenken-platzierung.html)

freak4fun 3. Jun 2010 21:20

Re: Schiffe versenken, Platzierung
 
Alles klar! Ich wollte auch nur darauf hinweisen. Ich habe selbst mal Bomberman versucht zu programmieren und da bin ich auf ähnliche Probleme gestoßen, daher die ANregung. ;)

idefix2 3. Jun 2010 21:43

Re: Schiffe versenken, Platzierung
 
@ Freak4fun

Prinzipiell hast Du sicher Recht. Ich denke, ich würde auch eher alle möglichen Zustände der einzelnen Felder des Spielfeld in einem einzigen zweidimensionalen array abspeichern.

m2zer0 8. Jun 2010 19:18

AW: Schiffe versenken, Platzierung
 
Edit: Ich hatte grad nen Geistesblitz
Mit ner Repeat Until Schleife war das ganze schnell gelöst^^

Trotzdem vielen Dank


So, ich bin fast fertig. :)
Ich hab gehofft ich schaffe den Rest allein, aber ein Problem habe ich noch.
Die Platzierung der gegnerischen Schiffe. Diese soll unter den gleichen Konditionen wie die Spielerschiffe-Platzierung ablaufen.
Also:
-4 Schiffe (2er,3er,4er,5er)
-Um ein Schiff herum darf kein 2. sein.
Code:
1)          2)
  11###        1####
  ##222        1####
  #####        #####
  #####        #222#
 so nicht  das würde gehen
(Im Programm ist es ein 10*10 Feld)
-Schiffe sollen zufällig Vertikal oder Horizontal sein

Alles was ich bisher versucht habe klappte zum Teil. Die Schiffe wurden platziert, haben aber das Feld um das andere Schiff gekonnt ignoriert.(Siehe Code bsp. 1)

Meine Überlegung war ein Rect um das Schiff zu legen und Reihe und Spalte so oft zufällig zu bestimmen bis Spalte und Zeile ein freies Feld erwischen.

m2zer0 8. Jun 2010 19:46

AW: Schiffe versenken, Platzierung
 
"Lösch mich"


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:54 Uhr.
Seite 4 von 4   « Erste     234   

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