Schiffe versenken programmieren

[Sir Rufo]

Zitat von leodinho:

Zitat von Sir Rufo:

Zitat von leodinho:

Danke schonmal ür eure zahlreichen ideen.. Habe sie weitgehend umgesetzt..
Nun habe ich auch schon zähler fertig und will jetzt erstmal weitere, leichte parts programmieren..
Wie könnte ich ein highscore einbauen?
Oder soll ich jetzt erstmal anfangen die schiffe auf dem vorhanden welt anzeigen zu lassen?

Wenn man geplant vorgeht, dann arbeitet man sich von der groben Planung immer tiefer bis zur Implementierung durch..

Nach der groben Planung definiert man die Funktionen/Klassen/Datentypen.

• Datentyp TSpielfeld : array[0..11,0..11] of integer;
• Funktion procedure ZeigeSpielfeld( ASpielfeld : TSpielfeld );
• Funktion function SchussAuf( ASpielfeld : TSpielfeld; x,y : Integer ) : Integer;

Wichtig ist, dass man hier das erwartete Verhalten festlegt und dokumentiert.
(Beispiel: Welche Werte gibt SchussAuf zurück und welche Bedeutung haben diese)

Dann kann man diese bei der Implementierung auch benutzen, ohne dass diese schon implementiert sein müssen. Es passiert halt einfach noch nichts, gibt aber auch keinen Fehler.

Dann geht man an die Implementierung der einzelnen Teile.

Ich haben den datentyp ja schon ( aber warum (T)Spielfeld? )
Wie zeige ich nun die Schiffe auf dem 12 x 12 Spielfeld an?
Lass ich jetzt per zufallsfunktion 3x 1er , 2x 2er, 1x 3er , 1x 4er zufällig auf das 12x12 anzeigen..?
Wie bekomm ich das am besten hin ?

Du hast eine Variable var Spielfeld : array[0..11,0..11] of integer; und keinen Datentyp type TSpielfeld = array[0..11,0..11] of integer; . Darum steht da einmal var und type .

Das T ist nur Konvention und soll zeigen, dass es sich um einen Type handelt.
(z.B. kennst du TForm )

Gerade wenn man das Spielfeld als Parameter übergeben will/muss, dann einen eigenen Type deklarieren

Delphi-Quellcode:

type
  TSpielfeld = array[0..11,0..11] of integer;

var
  Spielfeld : TSpielfeld;

procedure ZeigeSpielfeld( ASpielfeld : TSpielfeld );

Das mit dem wie anzeigen und platzieren der Schiffe haben wir hier doch schon durchgekaut.