10 FOR K = 0 TO (160*140)
20 POKE(-1048576-K, INT(RND(1)*16))
30 NEXT
40 GOTO 10