begin hatch45
  clip "inside"
  stripepath 4, 45
  stroke
end
begin hatchMinus45
  clip "inside"
  stripepath 4, -45
  stroke
end
begin crosshatch
  linestyle 0.2
  color "red"
  stroke
  hatch45
  hatchMinus45
end

newpage "eps", "tutorialpolygons2.eps", 60, 30
clearpath
roundedbox 5, 3, 30, 25
crosshatch

clearpath
roundedbox 31, 5, 55, 27
crosshatch
