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