diff options
Diffstat (limited to 'obsolete/macros/text1/models/letter.texinput')
-rw-r--r-- | obsolete/macros/text1/models/letter.texinput | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/obsolete/macros/text1/models/letter.texinput b/obsolete/macros/text1/models/letter.texinput new file mode 100644 index 0000000000..4cac048afa --- /dev/null +++ b/obsolete/macros/text1/models/letter.texinput @@ -0,0 +1,51 @@ +% LETTER FORMAT FILE bth 4/1/87 +\catcode`*=11 +\raggedbottom % text height may vary from page to page +\if*msp\defaultmono + \let\titlefont=\defaultmono + \let\twelvept=\defaultmono + \let\tenpt=\defaultmono + \let\rm=\defaultmono + \fi % monospace check +\newtoks\departmentname % department name for letterhead +\newtoks\campuszip % zip code for letterhead +\newtoks\campusphone % phone number for letterhead +\newtoks\date % date token list +\newif\if*postscript +\*postscriptfalse +% +\def\STOP{\endgroup\par}% ends obeylines grouping +% +\def\BEGINADDRESS{\begingroup\parskip=0pt\parindent=0pt\obeylines}% +\let\SALUTATION=\null +\let\BODY=\STOP +\def\CLOSING{\par\vs{\bl}\begingroup\parskip=0pt\parindent=0pt + \obeylines}% +\def\COPIES{\par\vs{\bl} + \setbox0=\hbox{Copies:\quad}\parindent=\wd0 \nin Copies:\quad}% +\def\ENCLOSURES#1{\par Enclosures:\quad #1}% sets enclosures text line +\def\ENDLETTER{\par\endgroup}% stop any obeylines grouping +% Default for the title (first) page +\titlepageformat{\titleleadskip{0in} + \titlefootline{} +}% end title page format +\def\letterhead{{\parskip=0pt + \if*msp + \cl{\titlefont Washington State University} + \vs{\bl}\hrule\vs{\bl} + \cl{\the\departmentname} + \cl{Pullman, Washington\ \the\campuszip} + \cl{\the\campusphone} + \vs{1\bl} % number of blank lines inserted + \nin\the\date % + \else + \cl{\titlefont Washington State University} + \vs{4pt}\hrule\vs{6pt} + \cl{\twelvept \the\departmentname} + \cl{\tenpt Pullman, Washington\ \the\campuszip} + \cl{\tenpt \the\campusphone} + \vs{1\bl} % number of blank lines inserted + \nin\the\date % + \fi +}}% end letterhead markup +\catcode`*=12 |