Auf joyce.de findet Ihr eins meiner Lieblingsprogramme, Kubus.
https://basicode.de/diesunddas/kubus.htm Es kann beim Lösen des ungarischen Zauberwürfels helfen. Leider brachte ich beim Bearbeiten einen Fehler in Zeile 5940 hinein (der jetzt Frank, einem KC85-Computerfreund, auffiel), weswegen viele selbst eingegebene Stellungen nicht aufgelöst werden konnten.
Code: Alles auswählen
...
5930 IF a(7,6)=a(6,7) THEN 5360
5940 IF a(6,6)=a(8,5) THEN a$="U-H-U-R-HR-V-RHRUH-UV"
5950 IF a(6,6)=a(8,5) THEN GOSUB 10540:GOTO 5890
...
Bis es dort korrigiert ist, ändert bitte selbst das erste Zeichen nach den "Gänsefüßchen" von "=" nach "U".
- kubus03.jpg (51.89 KiB) 4695 mal betrachtet
Wem BasiCode noch nicht vertraut ist – das Programm ist erst zusammen mit dem Bascoder
https://basicode.de/download/pcw.zip lauffähig, der davor (unter Mallard Basic in CP/M) gestartet werden muss.
Viel Spaß damit!