Ahhh *klick* Somit müsste ich also vor jeder Bewegung überprüfen lassen, ob in der aktuellen Richtung ein Block vorhanden ist -> falls nicht Leben abziehen/ Beenden. Habe hier ebenfalls auf nicht auf die Syntax geachtet, aber so in etwa würde es dann ausschauen:
Delphi-Quellcode:
möglich = True
case Richtung of
vorwärts: if Array[i+1] > High(Array) then moeglich = False;
unten : if Array[i-1] < Low(Array) then moeglich = False;
rechts : if Array[i,b+1] > High(Array[i]) then moeglich = False;
links : if Array[i,b-1] < Low(Array[i]) then moeglich = False;
end;
Jenachdem ob 'moeglich' True ist bewegt sich dann die Schlange - oder eben nicht. Hätte mir das jetzt eigentlich länger vorgestellt
aber wären nicht "schnellere" Versionen mit Try..Exept zu bevorzugen ?
Man muss ja nicht immer das
Rad neu erfinden