Rotating Circles

10 SCREEN 9
20 PLM=0
30 CLS
40 PI=3.1415926#
50 FOR DM=4 TO 64 STEP .25
60 FOR G=4 TO 4.013 STEP .023657
70 D=ATN(COS(G)*ATN(SIN(G)))
80 FOR K=0 TO 2*PI STEP PI/12
90 IF PLM=0 THEN X=320+100*COS(K-D*DM):Y=160+100*SIN(K+D*DW)
120 CIRCLE(X,Y),50
130 NEXT K
140 NEXT G
150 FOR G=4 TO 4.013 STEP .23657
160 D=ATN(COS(G)*ATN(SIN(G)))
170 FOR K=0 TO 2*PI STEP PI/12
180 IF PLM=0 THEN X=320+100*COS(K-D*DM):Y=160+100*SIN(K+D*DW)
210 CIRCLE(X,Y),50,0
220 NEXT K
230 NEXT G
260 PLM=0
270 NEXT
280 GOTO 30