100 ' G42 T.WAKAMATSU
110 CLS:C(2)=1:C(3)=2:C(4)=0
120 PI=3.14159!
130 CD PLAY 11
140 FOR L=2 TO 4
150   F=L
160   PSET(320,240)
170   FOR T=0 TO 2*PI STEP PI/1960
180     IF L=3 THEN F=3-F
190     X=180*SIN(84*T)
200     Y=150*SIN(85*T)
210     Z=150*SIN(86*T)
220     V=X-Z/2+320:W=Y-Z/2+240
230     LINE -(V,W),PSET,C(F)
240   NEXT T
250   FOR D=1 TO 5000:NEXT D
260 NEXT L