AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Dame Spiel programmieren

Ein Thema von Rank · begonnen am 14. Feb 2007 · letzter Beitrag vom 26. Mär 2007
 
Benutzerbild von Nikolas
Nikolas

Registriert seit: 28. Jul 2003
1.528 Beiträge
 
Delphi 2005 Personal
 
#10

Re: Dame Spiel programmieren

  Alt 26. Feb 2007, 11:29
Du könntest dir ein Record für jedes Feld bauen:
Delphi-Quellcode:
MeinFeld= Record
 FeldFarbe: Boolean; // Schwarz oder weiss
 FigurFarbe: Byte; //1: schwarze Figue, 2: weisse Figur, 3: unbesetzt
 Dame: Boolean; // falls die Figur auf dem Feld eine Dame ist.
end;
Das kannst du dann in einem Array benutzen:
Spielfeld=array[1..8] of array of [1..8] of Meinfeld; Am Anfang kannst du dann die Felder besetzen: Spielfeld[1,1].feldFarbe:=1, und eine schwarze Figus steht drauf: Spielfeld[1,1].Figurfarbe:=1; Zum zeichnen nimmst du dann einfach ein Canvas. Klickt der Spieler dann in dein Canvas, berechnest du das betreffende Feld und merkst es dir. Mit if Meinfeld[x,y].Figurfarbe=0 kannst du gleich rausfinden, ob da überhaupt eine Figur steht. Wenn da eine Figut steht, wird der Spieler dann auf ein weiteres Feld klicken, wo dann die Figur hin soll. Wenn er einfach nur schräg laufen will (ich glaube, dass darf man) kannst du einfach überprüfen, ob er dass dann darf:
(er will von a,b nach x,y ziehen)
Delphi-Quellcode:
for i:=min(a,x) to max(a,x) do
 for j:=min(b,y) to max(b,y) do
 if Feld[i,j] ist unbesetzt then weitermachen, else abrechen und Problem ausgeben.
end;
Erwarte das Beste und bereite dich auf das Schlimmste vor.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:56 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