nelson@PEAR.ECS.CLARKSON.EDU (10/19/89)
This may be a reinvented wheel, but here's a Points ruler (I got tired of measuring inches and multiplying by 72(.27). %! /Helvetica findfont 8 scalefont setfont 20 20 translate 0 setlinewidth 0 5 720 { newpath dup 0 exch moveto dup 10 mod 0 eq { 10 0 rlineto stroke dup 3 sub 12 exch moveto dup 4 string cvs show } { 5 0 rlineto stroke } ifelse pop } for showpage