Snake Spiel

[Cueppi]

man ich weiß nicht wie ich die machen soll man!
weswegen frage ich denn um hilfe.

ich sitze jetzt 3 tage hintereinander da dran meint ihr mir fliegt als nueling alles aus den fingern :(

[DeddyH]

Was ist daran so schwer? Zuerst die Position des Kopfes zufällig setzen und dann die Richtung. Anschließend kontrollieren, ob die Richtung überhaupt sinnvoll ist (If-Abfrage auf die jeweilige Koordinate), ggf. eine andere Richtung wählen und erneut prüfen.

[Cueppi]

also

Delphi-Quellcode:

begin
     BtnStart.Enabled := False;
     PunkteZaehler:= 0;
     for X:=0 to BSB do
     for Y:=0 to HSB do
     map[X, Y] := 0;
     Kopf:= Point(Random(BSB), Random(HSB));
     laengesnake := 4;
     richtung := Point(Random(BsB), Random(HSB));
     map[kopf.X, kopf.Y] := laengesnake;
     neuesfressen;
     bewegungSchlange;
     AktiviereButtons(True);

dann noch ne If abfrage, die so aussieht ?

if x:= +1 = true then richtung :=(Random(BSB);
if y:= +1 = true then richtung _=(Random(HSB);

tut mir leid, sonst lass ich das programm einfach liegen und probiers morgen nochmal, sitze heute seit 8 Uhr daran !

[DeddyH]

Zitat:

Zitat von Cueppi (Beitrag 1031915)

tut mir leid, sonst lass ich das programm einfach liegen und probiers morgen nochmal, sitze heute seit 8 Uhr daran !

Das scheint mir im Moment das Beste zu sein, schau Dir das morgen noch einmal in Ruhe an.

[Matze]

Zitat:

Zitat von Cueppi (Beitrag 1031915)

dann noch ne If abfrage, die so aussieht ?

if x:= +1 = true then richtung :=(Random(BSB);
if y:= +1 = true then richtung _=(Random(HSB);

tut mir leid, sonst lass ich das programm einfach liegen und probiers morgen nochmal, sitze heute seit 8 Uhr daran !

Ist dir die Delphi-Syntax geläufig?

Eine einzige if-Abfrage reicht nicht, da die neu ermittelte Richtung wieder ungültig sein kann.
Daher musst du das mit einer Schleife lösen. In dem Fall bietet sich eine Repeat-Schleife an, da du die Richtung mind. 1 mal ermitteln musst.

Sinngemäß so:

Delphi-Quellcode:

repeat
  // zufällige Richtung bestimmen
until
  // richtung gültig

[Cueppi]

das mach ich auch, ich guck morgen mal, hab mir den vorschlag grade gespeichert.
Ja von der Syntax hab ich schonmal was gehört, Syntaxabfrage :D

danke trotzdem für die hilfe, bin halt neuling!

[Muellermilchtrinker]

ich hät noch einen vorschlag:
mach doch eine option, damit man entscheiden kann, ob die schlange aus dem spielfeld darf oder nicht.