line from the origin goes upper right.
line.ps
%! newpath 0 0 moveto % left bottom 100 100 lineto % goto upper right 2 setlinewidth stroke showpage