RANDOMIZE TIMER
CLS
SCREEN 12
FOR i% = 1 TO 200 STEP .51
WINDOW (-160 / i%, -100 / i%)-(160 / i%, 100 / i%)
CIRCLE (0, 0), 1.5, (INT(RND * 15))
NEXT i%