2D+Animations

repeat 20[square rt 18] end
 * = ==Rotating a Square about a point.== ||  ||
 * = [[image:myfile.gif]] || to spinsquare

to square repeat 4[fd 100 rt 90] end || repeat :nsides[fd 50 rt 360/:nsides] end
 * = ==Constructing increasingly sided polygons== ||  ||   ||
 * = [[image:polys3.gif width="295" height="249"]] || to polygon :nsides
 * = [[image:polys3.gif width="295" height="249"]] || to polygon :nsides

to multigon polygon 3 polygon 4 polygon 5 polygon 6 end ||