%!PS-Adobe-1.0~r~n
%%Title: NET/30 Break Page~r~n
%%Creator: NET/30~r~n
%%Pages: (atend)~r~n
%%BoundingBox: 0 0 612 792~r~n
%%EndComments~r~n

save /savobj exch def       % Save the initial PostScript state~r~n

/inputstring                % size inputstring string~r~n
{~r~n
  string currentfile exch readstring pop~r~n
} bind def~r~n

/stripblanks                % string stripblanks substring~r~n
{~r~n
  ( ) search~r~n
  {exch pop exch pop} if~r~n
} bind def~r~n

/drawline                   % width x1 y1 x2 y2 drawline -~r~n
{~r~n
  newpath moveto lineto setlinewidth stroke~r~n
} bind def~r~n

/centertext                 % y string centertext -~r~n
{~r~n
  dup stringwidth pop~r~n
  792 exch sub 2 div~r~n
  3 -1 roll moveto show~r~n
} bind def~r~n

15 inputstring ~u~r~n
stripblanks /user exch def~r~n

31 inputstring ~j~r~n
stripblanks /title exch def~r~n

/date (~o/~d/~y) def~r~n

/time (~h:~m:~s) def~r~n

612 792 div 1 scale~r~n

/Helvetica findfont 18 scalefont setfont~r~n

%%EndProlog~r~n

4 0 72 792 72 drawline~r~n
4 0 720 792 720 drawline~r~n
4 72 0 72 792 drawline~r~n
4 720 0 720 792 drawline~r~n

3 0 91 792 91 drawline~r~n
3 0 701 792 701 drawline~r~n
3 91 0 91 792 drawline~r~n
3 701 0 701 792 drawline~r~n

2 0 109 792 109 drawline~r~n
2 0 683 792 683 drawline~r~n
2 109 0 109 792 drawline~r~n
2 683 0 683 792 drawline~r~n

1 0 126 792 126 drawline~r~n
1 0 666 792 666 drawline~r~n
1 126 0 126 792 drawline~r~n
1 666 0 666 792 drawline~r~n

504 user centertext~r~n
450 title centertext~r~n
396 date centertext~r~n
342 time centertext~r~n

showpage~r~n

savobj restore              % restore the initial PostScript state~r~n

%%Trailer~r~n
%%Pages: 1~r~n
%%EOF~r~n
~x04
