2014 wurden in der JUAG-Klubzeitung Programme einer BasiCode-2-Diskette von 1982 vorgestellt. Die Tic Tac Toe - Version arbeitete nicht korrekt.
.
Als ich es mir dieser Tage mal wieder anschaute, fand ich endlich die Ursache: zwei Variablen wurden falsche Werte zugewiesen.
Code: Alles auswählen
falsch:
3800 F=5:E=1:I=3
3810 GOSUB 3900:IF R=V THEN RETURN
korrigiert:
3800 F=2:E=8:I=3
3810 GOSUB 3900:IF R=V THEN RETURNHier ist nun die korrigierte Version (wie gewohnt zum Bascoder hinzuzuladen).
. . Mit "0" kann dem Computer der erste Zug überlassen werden.
.
EDIT 17.IX.'26: Durch Einfügen bzw. Ändern folgender zwei Zeilen wird das Programm etwas weniger vorhersehbar: beginnt der Spieler mit der 5, wählt der Computer nicht mehr zwingend die 1, sondern nach Zufall irgendeine der vier Ecken.
.