10 COLOR 1,15,8:SCREEN2:Q=3
20 Q=Q-.05:I=I+Q
30 CIRCLE(128,95),I
40 IF I>88 THEN 50 ELSE 20
50 GOTO 50