Thanks in advance,
--
Leif J. Harcke, N3EEN
Leif-...@cornell.edu
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.
\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
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)
>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'' |
+-----------------------------------------------------------------+
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: