mirror of
https://github.com/mbirth/gwbasic.git
synced 2024-11-13 00:36:46 +00:00
36 lines
1.1 KiB
QBasic
36 lines
1.1 KiB
QBasic
|
10 COLOR 15,0,0
|
|||
|
|
20 CLS
|
|||
|
|
30 COLOR 0:A$=INKEY$:PRINT A$;
|
|||
|
|
40 COLOR 1:A$=INKEY$:PRINT A$;
|
|||
|
|
50 COLOR 2:A$=INKEY$:PRINT A$;
|
|||
|
|
60 COLOR 3:A$=INKEY$:PRINT A$;
|
|||
|
|
70 COLOR 4:A$=INKEY$:PRINT A$;
|
|||
|
|
80 COLOR 5:A$=INKEY$:PRINT A$;
|
|||
|
|
90 COLOR 6:A$=INKEY$:PRINT A$;
|
|||
|
|
100 COLOR 7:A$=INKEY$:PRINT A$;
|
|||
|
|
110 COLOR 8:A$=INKEY$:PRINT A$;
|
|||
|
|
120 COLOR 9:A$=INKEY$:PRINT A$;
|
|||
|
|
130 COLOR 10:A$=INKEY$:PRINT A$;
|
|||
|
|
140 COLOR 11:A$=INKEY$:PRINT A$;
|
|||
|
|
150 COLOR 12:A$=INKEY$:PRINT A$;
|
|||
|
|
160 COLOR 13:A$=INKEY$:PRINT A$;
|
|||
|
|
170 COLOR 14:A$=INKEY$:PRINT A$;
|
|||
|
|
180 COLOR 15:A$=INKEY$:PRINT A$;
|
|||
|
|
190 COLOR 16:A$=INKEY$:PRINT A$;
|
|||
|
|
200 COLOR 17:A$=INKEY$:PRINT A$;
|
|||
|
|
210 COLOR 18:A$=INKEY$:PRINT A$;
|
|||
|
|
220 COLOR 19:A$=INKEY$:PRINT A$;
|
|||
|
|
230 COLOR 20:A$=INKEY$:PRINT A$;
|
|||
|
|
240 COLOR 21:A$=INKEY$:PRINT A$;
|
|||
|
|
250 COLOR 22:A$=INKEY$:PRINT A$;
|
|||
|
|
260 COLOR 23:A$=INKEY$:PRINT A$;
|
|||
|
|
270 COLOR 24:A$=INKEY$:PRINT A$;
|
|||
|
|
280 COLOR 25:A$=INKEY$:PRINT A$;
|
|||
|
|
290 COLOR 26:A$=INKEY$:PRINT A$;
|
|||
|
|
300 COLOR 27:A$=INKEY$:PRINT A$;
|
|||
|
|
310 COLOR 28:A$=INKEY$:PRINT A$;
|
|||
|
|
320 COLOR 29:A$=INKEY$:PRINT A$;
|
|||
|
|
330 COLOR 30:A$=INKEY$:PRINT A$;
|
|||
|
|
340 COLOR 31:A$=INKEY$:PRINT A$;
|
|||
|
|
360 GOTO 30
|
|||
|
|
|