summaryrefslogtreecommitdiff
path: root/macros/latex209/contrib/misc/marnote.sty
blob: 3246beca440e6d7cfd41ad7ffb79af936da33a49 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
% marnote.sty - MarNote 0.1 <03 Jan 92>
% macros to print a short note vertically in left or right margin on all pages.
% literal text is rotated appropriately.
%
% requires psfig and dvips
%
% James Darrell McCauley <jdm5548@diamond.tamu.edu>
% Department of Agricultural Engineering
% Texas A&M University
% College Station, Texas 77843-2117, USA
%
% useful for:
%  o  printing full citation on pre-prints of papers (so if
%     you give copies to friends, they know where to find
%     it published later).
%  o  easily identifying documents in folders or notebooks
\ifx\undefined\leftnote\else\endinput\fi
\typeout{MarNote 0.1 <03 Jan 92>}	% identity
\input{psfig}	% latest psfig.tex makes sure that this is read only once
%
\def\leftnote#1{
   \special{!userdict begin /bop-hook{gsave 20 50 translate 90 rotate
         /Times-Roman findfont 11 scalefont setfont
         0 0 moveto (#1)
         show grestore}def end
   }
}
%
\def\rightnote#1{
   \special{!userdict begin /bop-hook{gsave 590 50 translate 90 rotate
         /Times-Roman findfont 11 scalefont setfont
         0 0 moveto (#1)
         show grestore}def end
   }
}
%
% Special bonus!! a macro to lightly write the word "draft"
% across a page. Use only one of \leftnote, \rightnote, & \draftcp
\def\draftcp{
   \special{!userdict begin /bop-hook{gsave 200 30 translate
            65 rotate /Times-Roman findfont 216 scalefont setfont
            0 0 moveto 0.99 setgray (DRAFT) show grestore}def end
   } 
}
\endinput
\documentstyle[marnote]{article}
\title{Example of ``marnote.sty''}
\author{James Darrell McCauley}
\date{03 January 1992}
\begin{document}
%\draftcp      % specifies a draft copy
\rightnote{``Example of MarNote Style File.'' 1992. McCauley, J.D. 
            To appear in: Style Archives Everywhere.}
\maketitle
\end{document}


-- 
James Darrell McCauley, Grad Res Asst, Spatial Analysis Lab 
Dept of Ag Engr, Texas A&M Univ, College Station, TX 77843-2117, USA
(Darrell.McCauley@tamu.edu, jdm5548@tamagen.bitnet)