8 /printareax paperx margin 2 mul sub def
9 /printareay papery margin 2 mul sub def
14 /szox printareax textx sub def
15 /szoy printareay texty sub def
17 % o = outer, i = inner, f = final
33 /stridox szox n div def
34 /stridoy szoy n div def
36 /szix stridox margox sub def
37 /sziy stridoy margoy sub def
39 /stridix szix knx div def
40 /stridiy sziy kny div def
42 /szfx stridix margix sub def
43 /szfy stridiy margiy sub def
45 margin margin translate
48 0 1 m { /magenta exch def
49 0 1 m { /cyan exch def
54 cyan neg m add stridoy mul translate
58 0 1 kmx { /blackx exch def
59 0 1 kmy { /blacky exch def
72 blacky neg kmy add stridiy mul
92 0 1 m { /yellow exch def
95 /Helvetica findfont 18 scalefont setfont