10 MODE1 20 GCOL 0,2 30 FOR S=1 TO80 40 LET X=RND(1280) 50 LET Y=512+RND(512) 60 MOVE 640,512 70 DRAW X,Y 80 NEXT S 90 GCOL0,1 100 FOR L=0 TO 1280 STEP 40 110 MOVEL,512 120 DRAW(L-512)*4,0 130 NEXT L