diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/cjw/cjw-ltr.cls')
-rw-r--r-- | Master/texmf-dist/tex/latex/cjw/cjw-ltr.cls | 273 |
1 files changed, 273 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/cjw/cjw-ltr.cls b/Master/texmf-dist/tex/latex/cjw/cjw-ltr.cls new file mode 100644 index 00000000000..ea89cae934e --- /dev/null +++ b/Master/texmf-dist/tex/latex/cjw/cjw-ltr.cls @@ -0,0 +1,273 @@ +%% +%% This is file `cjw-ltr.cls', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% cjw-ltr.dtx (with options: `class') +%% +%% Copyright (C) 1995 by Colin J. Wynne +%% +%% This file is part of cjw-ltr, a class for creating modified standard +%% letters as well as German style letters under LaTeX2e. +%% +\def\fileversion{0.9} +\def\filedate{1997/01/01} +%% \CharacterTable +%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z +%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z +%% Digits \0\1\2\3\4\5\6\7\8\9 +%% Exclamation \! Double quote \" Hash (number) \# +%% Dollar \$ Percent \% Ampersand \& +%% Acute accent \' Left paren \( Right paren \) +%% Asterisk \* Plus \+ Comma \, +%% Minus \- Point \. Solidus \/ +%% Colon \: Semicolon \; Less than \< +%% Equals \= Greater than \> Question mark \? +%% Commercial at \@ Left bracket \[ Backslash \\ +%% Right bracket \] Circumflex \^ Underscore \_ +%% Grave accent \` Left brace \{ Vertical bar \| +%% Right brace \} Tilde \~} +%% + +\NeedsTeXFormat{LaTeX2e} +\ProvidesClass{cjw-ltr} + [\filedate\space v\fileversion\space + Modified Letter Class for LaTeX2e---CJW] + +\DeclareOption*{\PassOptionsToClass{\CurrentOption}{letter}} +\ProcessOptions + +\LoadClass{letter} +\setlength\headsep {25\p@} +\newlength{\letterskip} + \setlength{\letterskip}{0.7em} +\let\addresswidth\indentedwidth +\newlength\lblwd +{\setbox0=\hbox{Fax:\enskip}\global\setlength{\lblwd}{\wd0}} +\newcommand*{\faxlabel}{\hbox to\lblwd{Fax:\enskip\hfil}} +\newcommand*{\tellabel}{\hbox to\lblwd{Tel:\enskip\hfil}} + +\newcommand*{\fax}[1]{\def\faxnum{#1}} + \fax{} +\def\check@iffax{% + \ifx\@empty\faxnum\else + \edef\faxnum{\protect\faxlabel\faxnum} + \ifx\@empty\telephonenum\else + \edef\telephonenum{\protect\tellabel\telephonenum} + \fi\fi} +\def\opening#1{% + \check@iffax + \def\from@address{% + \ifx\@empty\fromaddress% + \@date% + \else% home address + \fromaddress% + \ifx\@empty\telephonenum\else% + \\ \telephonenum% + \fi% + \ifx\@empty\faxnum\else% + \\ \faxnum% + \fi% + \\*[\letterskip]\@date% + \fi} + \setbox0=\hbox{% + \begin{tabular}{l}\from@address\end{tabular}} + \global\setlength{\addresswidth}{\wd0} + \ifx\@empty\fromaddress + \thispagestyle{firstpage}% + \else + \thispagestyle{empty} + \fi + \noindent\hfill\box0 + \par + \vspace{2\letterskip}% + {\raggedright\toname\\ \toaddress\par}% + \vspace{2\letterskip}% + \noindent#1% + \setlength{\parindent}{20\p@} + \setlength{\parskip}{0\p@ \@plus\@ne\p@\relax} + \par\nobreak} +\long\def\closing#1{\par\nobreak\vspace{2\letterskip}% + \stopbreaks + \noindent\hfill + \parbox{\addresswidth}{\raggedright% + #1\\[6\letterskip]% + \ifx\@empty\fromsig + \fromname + \else + \fromsig + \fi\strut} + \par} +\let\unterschrift \signature +\let\absender \address +\let\ort \location +\let\telefon \telephone +\let\datum \date +\newcommand{\theday}{\number\day\relax} +\newcommand{\themonth}{% + \ifcase\month\or January\or February\or% + March\or April\or May\or June\or July\or August\or% + September\or October\or November\or December\fi} +\newcommand{\themonat}{% + \ifcase\month\or Januar\or Februar\or% + M\"arz\or April\or Mai\or Juni\or Juli\or August\or% + September\or Oktober\or November\or Dezember\fi} +\newcommand{\theyear}{\number\year\relax} +\newcommand{\heute}{den~\theday.\ \themonat\ \theyear} +\newcommand{\betreff}[2][Betreff]{% + \def\betreffname{#1}\long\def\@betreff{#2}} +\newcommand{\bezug}[2][Bezug]{% + \def\bezugname{#1}\long\def\@bezug{#2}} +\betreff[]{} +\bezug[]{} +\long\def\brief#1{% + \newpage + \setlength{\parindent}{0pt} + \setlength{\parskip}{0.7em} + \if@twoside \ifodd\c@page + \else\thispagestyle{empty} \hbox{}\newpage\fi + \fi + \c@page\@ne + \interlinepenalty=200 % Smaller than the TeXbook value + \@prozessan{\leavevmode\ignorespaces #1} + \date{\heute}} +\long\def\@prozessan#1{% + \@xproz #1!!@@@% + \ifx\@empty\toPLZ\else\@xproz #1@@@\fi% + \expandafter\@yproz \@tempa\\@@@% + \ifx\@empty\@tempc + \let\@tempd\@empty + \else + \expandafter\@zproz \@tempa\\@@@% + \ifx\@empty\@tempd + \else + \expandafter\@zproz \@tempa{}@@@% + \fi + \fi + \ifx\@empty\@tempb + \let\totitle\@empty \let\toname\@empty \let\toaddress\@empty + \else + \ifx\@empty\@tempc + \let\totitle\@empty + \ifx\@empty\toPLZ + \let\toname\@tempb \let\toaddress\@empty + \else + \let\toname\@empty \let\toaddress\@tempb + \fi + \else + \ifx\@empty\@tempd + \let\totitle\@empty \let\toname\@tempb \let\toaddress\@tempc + \else + \let\totitle\@tempb \let\toname\@tempc \let\toaddress\@tempd + \fi + \fi + \fi} +\long\def\@xproz #1!!#2@@@{\def\@tempa{#1}\def\toPLZ{#2}} +\long\def\@yproz #1\\#2@@@{\def\@tempb{#1}\def\@tempc{#2}\def\@tempd{}} +\long\def\@zproz #1\\#2\\#3@@@{\def\@tempc{#2}\def\@tempd{#3}} +\let\endbrief\endletter +\def\anrede#1{% + \check@iffax + \ifx\@empty\fromlocation + \def\@dateline{\@date} + \else + \def\@dateline{\fromlocation,\space\@date} + \fi + \null\vspace{1.2\letterskip} + \noindent\ignorespaces + \ifx\@empty\fromaddress% + \pagestyle{firstpage}% + {\raggedleft \@dateline}% + \else % Home address + \pagestyle{empty}% + {\raggedright% + \fromname \hfill \@dateline\\ + \fromaddress} + \ifx\@empty\telephonenum + \else + \\ \telephonenum + \fi + \ifx\@empty\faxnum + \else + \\ \faxnum + \fi + \fi + \par + \vspace{2.2\letterskip} + {\raggedright + \ifx\@empty\totitle + \else + \totitle \\ + \fi + \toname + \ifx\@empty\toaddress + \else + \\ \toaddress + \fi + \ifx\@empty\toPLZ + \else + \\*[0.6\letterskip]\toPLZ + \fi + \par} + \@checkbetreffbezug + \ifx\@empty\@betreff + \else + \vspace{\letterskip} + \ifx\@empty\betreffname + \else + \betreffname:\quad + \fi + \@betreff\par + \fi + \ifx\@empty\@bezug + \else + \vspace{1\letterskip} + \ifx\@empty\bezugname + \else + \bezugname:\quad + \fi + \@bezug\par + \fi + \vspace{1.4\letterskip}% + #1\par\nobreak} +\def\@checkbetreffbezug{% + \ifx\@empty\@betreff + \ifx\@empty\@bezug + \else + \ClassWarningNoLine{cjw-ltr}{% + Die \protect\betreff und \protect\bezug Befehlen sollen nur + \MessageBreak + zusammen verwendet werden. Ihnen fehlt die \MessageBreak + Betreff-Zeile.} + \fi + \else + \ifx\@empty\@bezug + \ClassWarningNoLine{cjw-ltr}{% + Die \protect\betreff und \protect\bezug Befehlen sollen nur + \MessageBreak + zusammen verwendet werden. Ihnen fehlt die \MessageBreak + Bezug-Zeile.} + \fi + \fi} +\long\def\gruss#1{\par\nobreak\vspace{2\letterskip}% + \stopbreaks + \noindent% + {\raggedright #1 \\[5\letterskip] + \ifx\@empty\fromsig + \fromname + \else + \fromsig + \fi} + \par + \vspace{\letterskip}} +\newcommand{\anlage}[1][Anlage]{% + \def\@tempa{n} \def\@tempb{#1} + \ifx\@tempa\@tempb + \renewcommand{\enclname}{Anlagen} + \else + \renewcommand{\enclname}{\@tempb} + \fi\encl} +\endinput +%% +%% End of file `cjw-ltr.cls'. |