diff options
Diffstat (limited to 'macros/text1/models/memo.texinput')
-rw-r--r-- | macros/text1/models/memo.texinput | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/macros/text1/models/memo.texinput b/macros/text1/models/memo.texinput new file mode 100644 index 0000000000..bbf6aa632e --- /dev/null +++ b/macros/text1/models/memo.texinput @@ -0,0 +1,48 @@ +% MEMO TEXINPUT FORMAT FILE +% dlw 8/15/86 +\catcode`*=11 +\if*msp \let\titlefont=\defaultmono + \let\twelvept=\defaultmono + \let\tenpt=\defaultmono + \let\rm=\defaultmono + \fi % change all fonts to defaultmono for the monospace option +\rightragged +\newif\if*copies +\*copiesfalse +\newtoks\*lfthead \*lfthead = { } +\newtoks\*ctrhead \*ctrhead = { } +\newtoks\*rthead \*rthead = { } +\rightragged +% Default for the title (first) page +\titlepageformat{\titleleadskip{0in} + \titlefootline{} +} +\def\memopageheadingformat#1{% setup for memo running head + \def\*left##1{\global\*lfthead={##1}}% + \def\*center##1{\global\*ctrhead={##1}}% + \def\*right##1{\global\*rthead={##1}}% +#1}% end memoheading format +\let\mhf=\memopageheadingformat +\memopageheadingformat{\*left{}\*center{\pagenumber}\*right{}} +\runningheadformat{\bothpages{\twelvept + \line{\hbox to.33333\hsize{\the\*lfthead\hss}\hfil + \hbox to.33333\hsize{\hss\the\*ctrhead\hss}\hfil + \hbox to.33333\hsize{\hss\the\*rthead}} + \vs{28pt}} % 28pt = .4in +}% end runningheadformat +\def\MEMO{\begingroup\obeylines\parskip=0pt\parindent=60pt}% +\def\TEXT{\endgroup\if*msp\defaultmono\ssp\else\twelvept\fi % + \vs{\bl}\hrule\vs{2\bl}}% +% +\cl{{\titlefont M E M O R A N D U M}} +\if*msp\par\vs{\bl}\ssp + \else\par\vs{.4in}\isk{18pt}\fi +\def\TO{\nin To:\par\vs{-\bl}}% +\def\FROM{\if*msp\vs{\bl}\fi\nin From:\par\vs{-\bl}}% +\def\DATE#1{\if*msp\vs{\bl}\fi\nin Date:\par\vs{-\bl}#1}% +\def\SUBJECT{\if*msp\vs{\bl}\fi\nin Subject:\par\vs{-\bl}}% +\def\COPIES{\global\*copiestrue\vs{\bl}\nin Copies:\par\vs{-\bl} % + \begingroup\obeylines\singlespace % + \parskip=0pt\parindent=60pt}% +\def\ENDMEMO{\if*copies\par\endgroup\global\*copiesfalse\else\par\fi}% +\catcode`*=12 |