Programme
DO
a$ = INPUT$(1)
IF a$ = "8" THEN
OUT &H378,1
END IF
IF a$ = "2" THEN
OUT &H378,7
END IF
IF a$ = "4" THEN
OUT &H378,3
END IF
IF a$ = "6" THEN
OUT &H378,5
END IF
IF a$ = "5" THEN
OUT &H378,0
END IF
LOOP
EXPLICATIONS :
001 = 1 Avancer correspond à la touche 8 du pavé numérique
011 = 3 Tourner à gauche correspond à la touche 4 du pavé numérique
101 = 5 Tourner à droite à la touche 6 du pavé numérique
111 = 7 Reculer correspond à la touche 2 du pavé numérique
000= 0 Arrêt correspond à la touche 5 du pavé numérique.