[SIN-COS] SAMPLE
100 CLS 3:C=1
110 AX=3
120 AY=5
130 FOR R=0 TO 6.3 STEP 0.02
140 X=130+120*COS(AX*R)
150 Y=130+120*SIN(AY*R)
160 CIRCLE (X,Y),2,7,,,,F,C
170 NEXT R
1130 FOR R=0 TO 6.3 STEP 0.02
1140 X=430+100*COS(AX*R)
1150 Y=130+100*SIN(AY*R)
1160 CIRCLE (X,Y),2,7,,,,F,C
1170 NEXT R
1200 C=C+1:IF C>7 THEN C=1
1230 FOR R=0 TO 6.3 STEP 0.02
1240 X=130+120*COS(AX*R)
1250 Y=130+120*SIN(AY*R)
1260 CIRCLE (X,Y),2,0,,,,F,0
1270 NEXT R
1330 FOR R=0 TO 6.3 STEP 0.02
1340 X=430+100*COS(AX*R)
1350 Y=130+100*SIN(AY*R)
1360 CIRCLE (X,Y),2,0,,,,F,0
1370 NEXT R
1410 GOTO 130
XはCOS、YはSINで与え、点(X、Y)に小円を描いています。
リサージュ曲線と呼ばれています。