RosettaCodeData/Task/Terminal-control-Coloured-text/GW-BASIC/terminal-control-coloured-text.basic
2023-07-01 13:44:08 -04:00

5 lines
109 B
Text

10 FOR I = 0 TO 31
20 COLOR I, 7 - (I MOD 8)
30 PRINT I;
40 IF I MOD 4 = 3 THEN COLOR 7, 0 : PRINT
50 NEXT I