mirror of
https://github.com/curioustorvald/tsvm.git
synced 2026-03-07 19:51:51 +09:00
4 lines
80 B
QBasic
4 lines
80 B
QBasic
10 FOR K = 0 TO (160*140)
|
|
20 POKE(-1048576-K, INT(RND(1)*16))
|
|
30 NEXT
|
|
40 GOTO 10 |