Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Putting DRAFT across all pages of a LaTeX document?

145 views
Skip to first unread message

Leif J. Harcke

unread,
Jun 30, 1993, 1:28:04 PM6/30/93
to
I've seen LaTeX documents with the word DRAFT printed diagonally
across each page in very faint block letters. Is there a macro to do
this?

Thanks in advance,

--
Leif J. Harcke, N3EEN
Leif-...@cornell.edu

Fazal Majid

unread,
Jun 30, 1993, 4:07:22 PM6/30/93
to

In article <ljh1.74...@crux1.cit.cornell.edu>, lj...@crux4.cit.cornell.edu (Leif J. Harcke) writes:
|> I've seen LaTeX documents with the word DRAFT printed diagonally
|> across each page in very faint block letters. Is there a macro to do
|> this?
TeX/LaTeX does not allow you to change the gray value of a font. What you've seen
is probably a \special in a PostScript driver such as dvips.
The manual for dvips gives the following example to do this:


As an example of what can be done, the following special will write
a light DRAFT across each page in the document:
{\vskip0pt\parskip=0pt\leftskip=20pt\begverb{`\$}
\special{!userdict begin /bop-hook{gsave 200 30 translate
65 rotate /Times-Roman findfont 216 scalefont setfont
0 0 moveto 0.7 setgray (DRAFT) show grestore}def end}$endverb}

Hope this helps.

--
Fazal MAJID | /\ /\ /\ /\ 0- Sarff, the serpent
ma...@math.yale.edu | /\ / \ / \ / \ / \ / with the terrible
ma...@inf.enst.fr | \/ \/ \/ \/ \/ sting.

Fazal Majid

unread,
Jun 30, 1993, 4:11:22 PM6/30/93
to

Oops... I forgot to edit out the code. Here is the code to have a light DRAFT
in a page when using dvips, corrected.

\special{!userdict begin /bop-hook{gsave 200 30 translate
65 rotate /Times-Roman findfont 216 scalefont setfont
0 0 moveto 0.7 setgray (DRAFT) show grestore}def end}

This should be put at the beginning of a document in TeX or just after the
\begin{document} in LaTeX

Seetamraju UdayaBhaskar Sarma

unread,
Jun 30, 1993, 5:19:44 PM6/30/93
to

Name: prelim.sty
Description: LaTeX document-style option to mark manuscripts as drafts
by putting a line stating that it's a draft, along with the date and
time of formatting, on every page. (Note: the default marker text
is "ENTWURF", but can be changed by redefining a single macro.)
Keywords: LaTeX, draft
Author: Robert Tolksdorf
Supported: ???
Latest Version: 31 Jul 1990
Archives: stuttgart, aston
Note: Comes with a documentation file, prelim.tex, in German.
See also: draft.sty, drafthead.sty


Name: draft.sty
Description: LaTeX document-style option which implements an enhanced
draft mode, which marks \label, \cite, \ref, \index and \glossary
commands where they occur in the text.
Keywords: LaTeX, draft, xrefs
Author: Joe Baker <j...@risc.com>, <jba...@ee.ucla.edu>
Supported: yes
Latest Version:
Archives: ymir, stuttgart (under draft1.sty)
See also: drafthead.sty


Name: drafthead.sty
Description: LaTeX document-style option which puts "DRAFT" with date
and time at top of each page.
Keywords: LaTeX, draft
Author: Stephen Page <sdp...@andersen.co.uk>
Supported: no
Latest Version: 23 Jun 1986
Archives: ymir, shsu
See also: draft.sty

Name: index.tex
Description: plain TeX macros for use with the MakeIndex program to make
an index for a document. The macros work with MakeIndex in its
default mode, so no extra MakeIndex "style" file is needed (even
though that default mode is actually for LaTeX). For draft
documents a switch will turn on "galley marks" for indexed words or
phrases (a ruled box is drawn around the item). Includes macros for
both creating the raw index file and printing the processed index.
Instructions are provided for setting up more than one index.
Keywords: plain TeX, index, MakeIndex
Author: Eric Myers <my...@landau.ph.utexas.edu>
Supported: yes
Latest Version: v1.15, 19 Jun 1992
Archives: lifshitz.ph.utexas.edu* [128.83.131.57]
See also: TeXsis
Note: index.tex is also included in TeXsis (q.v.)

:-)
---
Seetamraju Udaya Bhaskar Sarma
(email : seetam @ ece7 . eng . wayne . edu)

Dr. Paul R Hafner

unread,
Jun 30, 1993, 7:09:00 PM6/30/93
to
lj...@crux4.cit.cornell.edu (Leif J. Harcke) writes:

>Thanks in advance,

Further to the various styles that have been suggested in a posting:

If you use dvips you can follow the instructions in section 13 "Other Bells
and Whistles" of the dvips documentation to actually overlay big light gray
letters DRAFT across a page. (I prefer 0.96 setgray for a LaserWriter,
about 0.94 setgray for an hpIV.) This solution does not actually mark
the stored document as still being a draft, but is a print-time addition.

Detailed procedure (following Rokicki):

Create a file .draft containing the following PostScript program:

!userdict begin /bop-hook{gsave 200 30 translate
65 rotate /Times-Roman findfont 216 scalefont setfont
0 0 moveto 0.7 setgray (DRAFT) show grestore}def end

Then create a file config.draft containing the line:

h .draft

Place both files together in a directory which is searched by dvips
(or put it into a directory mydirectory and set the environment variable
DVIPSHEADERS accordingly).

When you want to mark a printout in the desired way, use
dvips -Pdraft <filename> (including any other options you may need).

Best wishes, Paul

+-----------------------------------------------------------------+
| Paul Hafner 'phone +64 9 373-7599 x 5748 |
| Department of fax +64 9 373-7457 |
| Mathematics and Statistics |
| University of Auckland e-mail haf...@mat.auckland.ac.nz |
| Private Bag 92019 |
| Auckland, New Zealand. time gmt +12 (13) (summer time)|
| latitude S 36^ 51' 15.3'' longitude E 174^ 45' 46.6'' |
+-----------------------------------------------------------------+

Bernard Gaulle

unread,
Jul 2, 1993, 5:11:29 AM7/2/93
to
In article <ljh1.74...@crux1.cit.cornell.edu>,

lj...@crux4.cit.cornell.edu (Leif J. Harcke) writes:

The various "draft" styles I've obtained have often a lot of problems.
This one, comming from Steve Anderson, i have modified is designed
for dvips and have 2 major improvements :
- can be used in any language or in a multi-lingual document (\draftname
can be already defined in an option of style. \DRAFTNAME defined
before \documentstyle supersedes any further definition, allowing
you for example to set it temporary to "CONFIDENTIAL").
- is using ISO-Latin1 Encoding, allowing to print words with diacritics.
(apply only at the \begin{document})

I have called this style epreuve.sty because draft is already used and that
epreuve is the appropriate French translation.
--bg

% epreuve.sty coming from the News --Steve Anderson 2 mar 1993
% mods Bernard GAULLE 06/28/93
% when this file is input in a LaTeX document, it will print a large
% DRAFT message in light grey at an angle across each page.
%
% assumes DVI file will be converted to PostScript by the dvips driver.
%
% taken from example posted to the net.

% Include the LaTeX draft option of style by default (--bg)
\ifx\undefined\ds@draft\let\ds@draft\relax\fi
\ds@draft

% define the default language specific name (--bg)
\ifx\draftname\undefined%
\def\draftname{\noexpand\311PREUVE}% my definition in French
%\def\draftname{DRAFT}% the english def
\fi
%
\let\docEpreuve=\document%
\def\document{% attach the mods to \begin{document}
\csname docEpreuve\endcsname%
% let \DRAFTNAME apply if defined
\ifx\DRAFTNAME\undefined%
\else\let\draftname=\DRAFTNAME%
\fi
% \message{DRAFT=\draftname}%
\special{! userdict begin /bop-hook{
gsave
/encodefont { % coming from the red book (--bg)
findfont dup % get the old font dict
maxlength dict begin % make a new one just as big
{ 1 index /FID ne % Copy everything but FID
{ def }
{ pop pop }
ifelse }
forall
/Encoding exch def % Install the new encoding
dup /FontName exch def % new font dict is still current
currentdict definefont % Create the new font
end
} bind def
/Helvetica-Bold-ISOLatin1 ISOLatin1Encoding
/Helvetica-Bold encodefont pop
initmatrix 72 dup scale
/Helvetica-Bold-ISOLatin1 findfont 2 scalefont setfont
(\draftname) dup
stringwidth pop
4.5 5.5 translate
60 rotate 2 div neg 0 moveto
.95 setgray
show
grestore
% here was the original coding:
%200 30 translate
%65 rotate /Times-Roman findfont 220 scalefont setfont
%0 0 moveto 0.99 setgray (\draftname) show grestore
}def end}%
}%\document
\ifx\docEpreuve\relax\document\fi% outside any high language
\endinput
In article <ljh1.74...@crux1.cit.cornell.edu>,


lj...@crux4.cit.cornell.edu (Leif J. Harcke) writes:

0 new messages