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
SCREEN 12
RANDOMIZE TIMER
FOR I = 1 TO 500
x = INT(RND * 639) + 1
y = INT(RND * 479) + 1
c = INT(RND * 15) + 1
PSET (x, y), c
NEXT I
END