summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls')
-rw-r--r--Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls131
1 files changed, 131 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls b/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls
new file mode 100644
index 00000000000..b9bb9e0bc49
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/guide-to-latex/mpletter.cls
@@ -0,0 +1,131 @@
+% MPLETTER.CLS as taken out of gtl-letters.tex 4th edition
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesClass{mpletter}
+\RequirePackage{ifthen}
+\newboolean{@german}
+\setboolean{@german}{false}
+\DeclareOption{german}{\setboolean{@german}{true}}
+\DeclareOption*{\PassOptionsToClass{\CurrentOption}{letter}}
+\ProcessOptions
+\LoadClass[a4paper]{letter}
+\newcommand{\englishnames}{%
+ \newcommand{\yrefname}{\textsl{Your Ref.}}
+ \newcommand{\ymailname}{\textsl{Your letter from}}
+ \newcommand{\myrefname}{\textsl{Our Ref.}}
+ \newcommand{\subjectname}{\textsl{Subject}}
+ \newcommand{\telephonename}{Telephone}
+ \newcommand{\stationname}{Train Station}
+ \newcommand{\germanname}{GERMANY}
+ \newcommand{\telcode}{[49]-5556-401}
+ \newcommand{\postcode}{D--37191}
+}
+
+\newcommand{\germannames}{%
+%. . . . . . . . . . . . . . . . . . . . .
+ \newcommand{\telcode}{(05556) 401}
+ \newcommand{\postcode}{37191}
+}
+
+\ifthenelse{\boolean{@german}}
+ {\RequirePackage{german}\germannames}{\englishnames}
+\newcommand{\@yref}{} \newcommand{\@ymail}{}
+\newcommand{\@myref}{} \newcommand{\@subject}{}
+\newcommand{\@internet}{}
+
+\newcommand{\yref}[1]{\renewcommand{\@yref}{\yrefname: #1}}
+\newcommand{\ymail}[1]{\renewcommand{\@ymail}{\ymailname: #1}}
+\newcommand{\myref}[1]{\renewcommand{\@myref}{\myrefname: #1}}
+\newcommand{\subject}[1]{\renewcommand{\@subject}
+ {\subjectname: #1}}
+\newcommand{\internet}[1]{\renewcommand{\@internet}{#1}}
+\newcommand{\INTERNET}{@linmpi.mpg.de}
+\setlength{\textheight}{215mm} \setlength{\textwidth}{160mm}
+\setlength{\oddsidemargin}{0pt} \setlength{\evensidemargin}{0pt}
+\setlength{\topmargin}{-20pt} \setlength{\headheight}{12pt}
+\setlength{\headsep}{35pt}
+\DeclareFixedFont{\xviisf}{OT1}{cmss}{m}{n}{17}
+\DeclareFixedFont{\xsf}{OT1}{cmss}{m}{n}{10}
+\DeclareFixedFont{\viiisf}{OT1}{cmss}{m}{n}{8}
+\newlength{\leftfield} \setlength{\leftfield}{117mm}
+\newlength{\rightfield} \setlength{\rightfield}{43mm}
+\newsavebox{\FIRM} \newsavebox{\firmaddress}
+\newsavebox{\firm} \newsavebox{\firmreturn}
+
+\sbox{\FIRM}
+ {\parbox[t]{\leftfield}
+ {\xviisf MAX--PLANCK--INSTITUT F\"UR AERONOMIE}}
+
+\sbox{\firm}
+ {\xsf MAX--PLANCK--INSTITUT F\"UR AERONOMIE}
+
+\sbox{\firmreturn}
+ {\viiisf\underline{MPI f\"ur Aeronomie,
+ \postcode{} Katlenburg--Lindau}}
+
+\sbox{\firmaddress}
+ {\parbox[t]{\rightfield}{\viiisf\baselineskip10pt
+ Max--Planck--Stra{\ss}e 2\\
+ \postcode{} Katlenburg--Lindau\\\germanname}}
+\newsavebox{\firmhead} \newsavebox{\firmfoot}
+
+\sbox{\firmhead}
+ {\parbox{\textwidth}{\usebox{\FIRM}\raisebox{6pt}
+ {\usebox{\firmaddress}}\\[3pt] \rule{\textwidth}{1pt}}}
+
+\sbox{\firmfoot}
+ {\parbox{\textwidth}{\rule{\textwidth}{0.6pt}\\[5pt]
+ \viiisf\setlength{\baselineskip}{12pt}%
+ \begin{tabular}[t]{@{}ll}
+ \underline{\telephonename} & \telcode-1\\
+ \underline{Telefax} & \telcode-240\\
+ \underline{Telex} & 9\,65\,527 aerli
+ \end{tabular}\hfill
+ \begin{tabular}[t]{l}
+ \underline{Bank}\\
+ Kreis--Sparkasse Northeim\\
+ 41\,104\,449 (BLZ 262\,500\,01)
+ \end{tabular}\hfill
+ \begin{tabular}[t]{l@{}}
+ \underline{\stationname}\\
+ Northeim\\
+ (Han.)
+ \end{tabular} }}
+\renewcommand{\ps@firstpage}
+ {\setlength{\headheight}{41pt}\setlength{\headsep}{25pt}%
+ \renewcommand{\@oddhead}{\usebox{\firmhead}}%
+ \renewcommand{\@oddfoot}{\raisebox{-20pt}[0pt]
+ {\usebox{\firmfoot}}}%
+ \renewcommand{\@evenhead}{}\renewcommand{\@evenfoot}{}}
+\renewcommand{\ps@headings}
+ {\setlength{\headheight}{41pt}%
+ \renewcommand{\@oddhead}
+ {\parbox{\textwidth}{\usebox{\firm}\\[5pt]
+ \slshape \headtoname{} \toname\hfill\@date\hfill
+ \pagename{} \thepage\\
+ \rule[3pt]{\textwidth}{1pt}}}
+ \renewcommand{\@oddfoot}{}
+ \renewcommand{\@evenhead}{\@oddhead}
+ \renewcommand{\@evenfoot}{\@oddfoot}}
+\providecommand{\@evenhead}{}\providecommand{\@oddhead}{}
+\providecommand{\@evenfoot}{}\providecommand{\@oddfoot}{}
+\pagestyle{headings}
+\renewcommand{\opening}[1]{\thispagestyle{firstpage}%
+ \parbox[t]{\leftfield}
+ {\usebox{\firmreturn}\\
+ \parbox[b][3.5cm][c]{\leftfield}{\toname\\\toaddress}}%
+ \parbox[t]{\rightfield}
+ {\fromname
+ \ifthenelse{\equal{\telephonenum}{}}
+ {}{\\ Tel.: \telcode-\telephonenum}
+ \ifthenelse{\equal{\@internet}{}}
+ {}{\\{\viiisf Email: \@internet\INTERNET}}
+ \\[5mm] \@date}
+ \par
+ \rule{\textwidth}{0.6pt}
+ \makebox[\leftfield][l]
+ {\ifthenelse{\equal{\@yref}{}}
+ {\@ymail}{\@yref\hfill\@ymail\hfill}}
+ \@myref\par
+ \ifthenelse{\equal{\@subject}{}}
+ {}{\@subject\par}
+ \vspace{2\parskip} #1 \par\nobreak}