Files
tsvm/assets/downkeys2.bas

7 lines
95 B
QBasic

10 POKE -40,255
20 FOR K=-41 TO -48 STEP -1
30 PRINT(PEEK(K);" ";)
40 NEXT
50 PRINT
60 GOTO 10