SCREEN 12RANDOMIZE TIMERFOR I = 1 TO 500 x = INT(RND * 639) + 1 y = INT(RND * 479) + 1 c = INT(RND * 15) + 1 PSET (x, y), cNEXT IEND