%! /page-begin { gsave 100 100 translate 100 100 scale 1 100 div setlinewidth newpath 0 0 moveto 1 0 lineto 0 0 moveto 0 1 lineto stroke 5 100 div setlinewidth } def /page-end { grestore showpage } def /draw-frame { gsave 1 0 0 setrgbcolor newpath 0 0 moveto 1 0 lineto stroke grestore gsave 0 0 1 setrgbcolor newpath 0 0 moveto 0 1 lineto stroke grestore } def % ============================================ page-begin 2 2 translate draw-frame page-end % ============================================ page-begin 2 1 scale draw-frame page-end % ============================================ page-begin 30 rotate draw-frame page-end % ============================================