10 CLS
20 FOR I = 1 TO 9000
30 LOCATE RND*22+1,RND*39+1
35 COLOR RND*15,0
40 PRINT CHR$(RND*255)
50 NEXT I