[alt.sources] Utility to print DoD headings at top and bottom of paper??

kelly@ipla01.hac.com (Keith Kelly) (05/04/91)

Would anyone know if there is a commerical or PD utility or print filter which
will allow DoD markings to be automatically printed at the top and bottom of
printed output, including header pages?  Thanks in advance.

--
Keith Kelly                    Internet   : kelly@ipla01.hac.com         
"Of all the things I've lost   UUCP       : ...!usc!!hacgate!ipla01!kelly
 I miss my mind the most"      Phone      : (818) 702-2328

grover@big-joe.cs.unlv.edu (Kevin Grover) (05/04/91)

In article <14684@hacgate.UUCP>, kelly@ipla01.hac.com (Keith Kelly) writes:
) Would anyone know if there is a commerical or PD utility or print filter which
) will allow DoD markings to be automatically printed at the top and bottom of
) printed output, including header pages?  Thanks in advance.
) 

This is a little PostScript program I wrote that redefines the showpage operator
to put a header for the Information Science Research Institute on the
first the first page:

/oldshowpage /showpage load def
/showpage
  {
    save
      initgraphics
      0 setgray
      /Times-Roman findfont [25 0 0 45 0 0 ] makefont setfont

      36 750 moveto (Information Science Research Institute) show

      /Helvetica findfont 10 scalefont setfont

      425 780 moveto  (University of Nevada, Las Vegas) show
      425 771 moveto  (School of Engineering) show
      425 762 moveto  (Information Science Research Institute) show
      425 753 moveto  (4505 Maryland Parkway) show
      425 744 moveto  (Las Vegas, Nevada 89154) show

       37 740 moveto 576 740 lineto 2 setlinewidth stroke
    restore
    oldshowpage
% - The next line undefines the new showpage so that following
%   pages are printed normally
   /showpage /oldshowpage load def
  } bind def


Commenting the Last Line, should allow the header to be shown an all pages.
You could also modify this program to draw pictures, or print a logo.

-- 
  +-------------------------------------------------+----------------------+
  | Kevin Grover             UNLV Computer Science  |     Home of the      |
  | grover@cs.unlv.edu       Las Vegas, Nevada      |    Running REBELS    |
  +-------------------------------------------------+----------------------+