5 KEY ON
10 SCREEN 1
20 CLS
22 LINE (1,180)-(319,199),2,BF
25 LET F=INT(RND*300)+1
30 CIRCLE (F,Y),4,1
40 CIRCLE (F,Y),4,0
50 Y=Y+1
60 IF Y>182 THEN GOTO 80
70 GOTO 30
80 NOISE 4,14,4
90 Y=1:GOTO 25