DECLARE EXTERNAL PICTURE circle
SET WINDOW -4,4,-4,4
FOR k=1 TO 4
   DRAW circle WITH SCALE(k,1+k/2)*ROTATE(PI/6)
NEXT k
END
! 外部絵定義
EXTERNAL PICTURE circle
OPTION ANGLE DEGREES
FOR t=0 TO 360
   PLOT LINES: COS(t),SIN(t);
NEXT t
END PICTURE
 
