mirror of
https://github.com/mbirth/gwbasic.git
synced 2024-09-19 16:53:26 +01: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
|
||
|