10 GRAPHICS 7+16
20 W=159:H=95:W2=79
30 X=INT(W*RND(0))
40 Y=INT(H*RND(0))
50 FOR I=1 TO 5000
60 V=INT(3*RND(0))+1
70 GOTO 100*V
100 X=X/2:Y=Y/2
110 GOTO 500
200 X=W2+(W2-X)/2
210 Y=H-(H-Y)/2
220 GOTO 500
300 X=W-(W-X)/2
310 Y=Y/2
500 COLOR V
510 PLOT X,Y
520 NEXT I
530 GOTO 530