Rotate off origin for CG.SE

%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: 0 0 400 400
%%Title: Rotate off origin
%%Creator: joojaa
%%CreationDate:  2016-02-17
%%EndComments

/drawGrid {
    newpath
    0.2 setlinewidth
    -80 20 80 {
       dup  90 moveto
       dup -90 lineto
       dup  90 exch moveto
           -90 exch lineto
       } for
    stroke
    newpath
    0.99 setlinewidth
    0  90 moveto 0 -90 lineto
    0  90 0 moveto -90 0 lineto
    stroke
} def

/line {
    gsave newpath
    0 1 0 0 setcmykcolor
    3 0.99 mul setlinewidth
    -20.25 20 moveto 60.5 20 lineto
    20 20 translate 0 0 2 0 360 arc
    stroke grestore
} def

100 300 translate
drawGrid

line

200 0 translate
drawGrid
gsave
-20 -20 translate
line
grestore


-200 -200 translate
drawGrid
gsave
45 rotate
-20 -20 translate
line
grestore

200 0 translate
drawGrid
gsave
20 20 translate
45 rotate
-20 -20 translate
line
grestore


%%EOF