10 DECLARE EXTERNAL PICTURE polygon
20 OPTION ANGLE DEGREES
30 SET WINDOW -4,4,-4,4
40 DRAW polygon(6)
50 DRAW polygon(7) WITH ROTATE(-90/7)*SCALE(1.5)*SHIFT(2,2) 
60 END
100 EXTERNAL PICTURE polygon(n)
110 OPTION ANGLE DEGREES
120 FOR i=0 TO n
130    PLOT LINES:COS(i*360/n),SIN(i*360/n);
140 NEXT i
150 END PICTURE
