newpage "eps", "tutoriallabels2.eps", 40, 40
clearpath
move 20, 20
let r = 0
while r < 360
do
  color "hsb", r / 360, r / 360, 0.6
  rotate 20
  let r = r + 20
  font 'Times-Roman', 4 + r / 180
  label 'Spirally'
done
