fribrief

git-svn-id: svn://tug.org/texlive/trunk@941 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 259 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/fribrief/fribrief.cls b/Master/texmf-dist/tex/latex/fribrief/fribrief.cls
new file mode 100644
index 00000000000..8cda40efcbb
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/fribrief/fribrief.cls
@@ -0,0 +1,159 @@
+%% FriBrief.CLS  -- Version vom 2. Jul. 1997
+%% fuer LaTeX2e
+%% von Alex Fries
+%%
+%% Kontaktadressen:
+%%   Alex Fries:  Alex.Fries@Lauer-EDV.com
+%%                bp016@smail.fh-koeln.de
+%%
+%% Optionen, abweichend von letter-class:
+%%    Calli                 Name in Calligraphie (genoetigt Font callig15)
+%%    SmallC                Name in Smallcapital, ueber- und unterstrichen
+%%    Referenz              fuegt Referenzzeile ein
+%%    a4paper               Anpassung fuer DIN A4-Papier (Anwendung empfohlen)
+%%    nomark                keine Faltmarkierungen
+%%    english               Anpassung fuer englischsprachige Laender
+%%
+%% Befehle, abweichend von letter-class:
+%%    \retouraddress        ...
+%%    \Anlagen              \Anlagen{2 Grafiken}
+%%    \Verteiler            \Verteiler{Hr. Mueller\\Fr. Maier}
+%%    \Betreff              \Betreff{Kuendigung}
+%%    \Behandlungsvermerk   \Behandlungsvermerk{EILT}
+%%    \Datum                \Datum{Rostingen, den \today}
+%%    \IhrZeichen           ...   \
+%%    \MeinZeichen          ...    > nur in Verbindung mit Option <Referenz>
+%%    \IhrSchreiben         ...   /
+%%
+\NeedsTeXFormat{LaTeX2e}[1994/12/01]
+\ProvidesClass{fribrief}
+              [1997/07/02 ... der mit der persoenliche Note]
+
+% **************
+%   neue Fonts
+% **************
+\newfont{\Retschrift}{cmss6}
+\newfont{\alex}{cmcsc10 scaled 2988}
+\newfont{\calligraphie}{callig15 scaled 2988}
+
+% *********************
+%   spezielle Befehle
+% *********************
+\newcommand{\BKopf}[1]{\put(0,23){\parbox[t]{\textwidth}{\@PlainName\hfill #1\\
+   \fromaddress}}} % wenn nichts anderes gesagt: DIN-Kopf
+\newcommand{\Ref}{}
+\newcommand{\Betreff}[1]{\def\betreff{\ignorespaces #1}}
+\newcommand{\Anlagen}[1]{\def\anlagen{\ignorespaces #1}}
+\newcommand{\Verteiler}[1]{\def\verteiler{\ignorespaces #1}}
+\newcommand{\NLine}[1]{\vbox{\rule{\wd16}{#1}}}
+\newcommand{\retouraddress}[1]{\def\retaddress{\ignorespaces #1}}
+\newcommand{\Behandlungsvermerk}[1]{\def\Behver{#1}}
+\newcommand{\Datum}[1]{\def\date{#1}}
+\newcommand{\IhrZeichen}[1]{\def\yref{#1}}
+\newcommand{\MeinZeichen}[1]{\def\myref{#1}}
+\newcommand{\IhrSchreiben}[1]{\def\ymail{#1}}
+\newcommand{\Faltmarken}{\put(-19,-65){\line(1,0){3}}
+                         \put(-19,-164){\line(1,0){3}}
+                         \put(-19,-114){\line(1,0){3}}}
+\def\yrefname{{\tiny\sl Ihr Zeichen:\quad}}
+\def\myrefname{{\tiny\sl Mein Zeichen:\quad}}
+\def\ymailname{{\tiny\sl Ihr Schreiben vom:\quad}}
+\def\date{\today}
+\def\yref{}
+\def\myref{}
+\def\ymail{}
+\def\anlagen{}
+\def\betreff{}
+\def\verteiler{}
+\def\retaddress{}
+\def\@SmallCName{}
+\def\@CalliName{}
+\def\Behver{}
+\def\PageLayout{}
+
+% *****************
+%   DeclareOption
+% *****************
+\DeclareOption{Calli}{%
+   \renewcommand{\BKopf}[1]{%
+   \put(0,21){%
+   \parbox{\textwidth}{{\@CalliName}\hfill\raisebox{8mm}[15.7mm]{%
+   \parbox[t]{4.5cm}{\baselineskip2.5ex\raggedleft\fromaddress}}}}
+   \put(0,6){\parbox{\textwidth}{\hfill #1}}}}
+\DeclareOption{SmallC}{%
+   \renewcommand{\BKopf}[1]{%
+   \put(0,25){%
+   \parbox[t]{\textwidth}{{\setbox16=\hbox{\@SmallCName}\parbox[t]{\wd16}{%
+   \offinterlineskip\NLine{0.5mm}\vglue1.5mm\hbox to \wd16{\@SmallCName}%
+   \vglue1.5mm\NLine{0.5mm}}}\hfill\raisebox{-2.25mm}[15.7mm]{%
+   \parbox[t]{4.5cm}{\baselineskip2.5ex\raggedleft\fromaddress\\[2.5ex]}}}}
+   \put(0,6){\parbox{\textwidth}{\hfill #1}}}}
+\DeclareOption{a4paper}{%
+   \PassOptionsToClass{11pt,\CurrentOption}{letter}
+   \def\PageLayout{%
+      \oddsidemargin 0mm
+      \evensidemargin 0mm
+      \marginparwidth 90pt
+      \marginparsep 11pt
+      \marginparpush 5pt
+      \topmargin -8.5mm
+      \headheight 4.25mm
+      \headsep 8.5mm
+      \topskip 4.25mm
+      \footskip 5mm
+      \footnotesep 12pt
+      \skip\footins 10pt plus 2pt minus 4pt
+      \textheight 23cm
+      \textwidth 160mm}}
+\DeclareOption{Referenz}{%
+   \renewcommand{\Ref}{%
+   \put(0,-55.15){\parbox[t]{\textwidth}{\rule{\textwidth}{0.1mm}\\
+   \yrefname \yref\hfill\ymailname \ymail\hfill\myrefname \myref\par}}}}
+\DeclareOption{nomark}{\renewcommand{\Faltmarken}{}}
+\DeclareOption{english}{\def\yrefname{{\tiny\sl your reference:\quad}}
+                        \def\myrefname{{\tiny\sl my reference:\quad}}
+                        \def\ymailname{{\tiny\sl your letter:\quad}}}
+\DeclareOption{a5paper}{%
+   \ClassError{fribrief}{Sorry, A5-Papier wird nicht unterstuetzt.}}
+\DeclareOption{b5paper}{%
+   \ClassError{fribrief}{Sorry, B5-Papier wird nicht unterstuetzt.}}
+\DeclareOption*{%
+   \PassOptionsToClass{\CurrentOption}{letter}}
+\ProcessOptions
+\LoadClass{letter}
+\PageLayout  % siehe \DeclareOption{a4paper}
+
+% *******************************
+%   letter-Befehle undefinieren
+% *******************************
+\def\@texttop{}
+\renewcommand{\name}[1]{%
+   \def\@SmallCName{\alex#1\normalsize}%
+   \def\@CalliName{\calligraphie#1\normalsize}
+   \def\@PlainName{\normalsize #1}}
+
+\renewcommand*{\opening}[1]{\thispagestyle{empty}%
+   \pagestyle{headings}
+   \unitlength 1mm%
+   \begin{picture}(0,0)
+   \BKopf{\date}
+   \Faltmarken
+   \put(0,-22){\makebox(85,4)[l]{\underline{\Retschrift\retaddress}}}
+   \put(0,-27){\parbox[t]{\textwidth}{%
+      \parbox[t]{7cm}{\toname\\\toaddress}\hfill\Behver}}
+   \Ref
+   \end{picture}%
+   \strut\par\vspace*{64mm}
+   \ifx\@empty\betreff\relax \else\betreff\strut\par\vspace{6mm}\fi%
+   \def\Anrede{#1}%
+   \ifx\Anrede\@empty\relax \else #1\par\fi\nobreak}
+
+\renewcommand{\closing}[1]{\par\nobreak%
+ \stopbreaks%
+ \noindent%
+ \ignorespaces#1
+ \vspace{6cm minus 3cm}
+ \ifx\@empty\fromsig\relax \else\vspace{3cm}\fromsig\fi
+ \ifx\@empty\anlagen\relax \else\encl{\anlagen}\fi
+ \ifx\@empty\verteiler\relax \else\cc{\verteiler}\fi}
+
diff --git a/Master/texmf-dist/tex/latex/fribrief/k_fribri.cls b/Master/texmf-dist/tex/latex/fribrief/k_fribri.cls
new file mode 100644
index 00000000000..f3cc542bc20
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/fribrief/k_fribri.cls
@@ -0,0 +1,100 @@
+%% K_FriBri.CLS  -- Version vom 2. Jul. 1997
+%% fuer LaTeX2e und KOMA-Script
+%% von Alex Fries
+%%
+%% Kontaktadressen:
+%%   Alex Fries:  Alex.Fries@Lauer-EDV.com
+%%                bp016@smail.fh-koeln.de
+%%
+%% Optionen, abweichend von scrlettr-class:
+%%    Calli                 Name in Calligraphie (genoetigt Font callig15)
+%%    SmallC                Name in Smallcapital, ueber- und unterstrichen
+%%    DIN                   Briefkopf nach DIN 5008 (Regeln f�r
+%%                          Maschinenschreiben)
+%%
+\NeedsTeXFormat{LaTeX2e}[1995/12/01]
+\ProvidesClass{k_fribri}
+              [1997/07/02 ... der mit der persoenliche Note]
+
+% **************
+%   neue Fonts
+% **************
+\newfont{\alex}{cmcsc10 scaled 2988}
+\newfont{\smallalex}{cmcsc10 scaled 800}
+\newfont{\calligraphie}{callig15 scaled 2988}
+\newfont{\smallcalli}{callig15 scaled 1000}
+
+% **************************************
+%   spezielle Befehle und Definitionen
+% **************************************
+\newcommand{\NLine}[1]{\vbox{\rule{\wd16}{#1}}}
+\newcommand{\BKopf}{}
+\newcommand{\nBKopf}{%
+   \nexthead{\parbox[b]{\textwidth}{{%
+      \sc\ignorespaces\fromname}{%
+      \hfill\sf\footnotesize\headtoname\ \ignorespaces\toname
+      \hfill\datename:\ \@date\hfill\pagename\
+      \thepage\\[-8pt]\rule{\textwidth}{.4pt}}}}}
+
+% *****************
+%   DeclareOption
+% *****************
+\DeclareOption{Calli}{%
+   \renewcommand{\BKopf}{%
+   \firsthead{%
+      \put(0,30){\parbox{\textwidth}{{%
+      \calligraphie\ignorespaces\fromname}\hfill\raisebox{8mm}[15.7mm]{%
+      \parbox[t]{4.5cm}{%
+      \baselineskip2.5ex\raggedleft\ignorespaces\fromaddress\\
+      \telephonenum}}}}}}
+   \renewcommand{\nBKopf}{%
+   \nexthead{\parbox[b]{\textwidth}{{%
+      \smallcalli\ignorespaces\fromname}{%
+      \hfill\footnotesize\headtoname\ \ignorespaces\toname
+      \hfill\datename:\ \@date\hfill\pagename\
+      \thepage\\[-6pt]\rule{\textwidth}{.4pt}}}}}}
+\DeclareOption{DIN}{%
+   \renewcommand{\BKopf}{%
+   \firsthead{%
+      \put(0,23){\parbox[t]{\textwidth}{%
+      \normalsize\ignorespaces\fromname\\\ignorespases\fromaddress\\
+      \telephonenum}}}}
+   \renewcommand{\nBKopf}{%
+   \nexthead{\parbox[b]{\textwidth}{{%
+      \sfb\ignorespaces\fromname}
+      \hfill\sf\headtoname\ \ignorespaces\toname
+      \hfill\datename:\ \@date\hfill\pagename\
+      \thepage\\[-8pt]\rule{\textwidth}{.4pt}}}}}
+\DeclareOption{SmallC}{%
+   \renewcommand{\BKopf}{%
+   \firsthead{%
+      \put(0,32){\parbox[t]{\textwidth}{{%
+      \setbox16=\hbox{\alex\ignorespaces\fromname}\parbox[t]{\wd16}{%
+      \offinterlineskip\NLine{0.5mm}\vglue1.5mm\hbox to \wd16{%
+      \alex\ignorespaces\fromname}%
+      \vglue1.5mm\NLine{0.5mm}}}\hfill\raisebox{-2.25mm}[15.7mm]{%
+      \parbox[t]{4.5cm}{\baselineskip2.5ex\raggedleft\ignorespaces
+      \fromaddress\\\telephonenum\\[2.5ex]}}}}}}
+   \renewcommand{\nBKopf}{%
+   \nexthead{\parbox[b]{\textwidth}{{%
+      \setbox16=\hbox{\smallalex\ignorespaces\fromname}\parbox[b]{\wd16}{%
+      \offinterlineskip\NLine{0.2mm}\vglue0.35mm\hbox to \wd16{%
+      \smallalex\ignorespaces\fromname}\vglue0.5mm\NLine{0.2mm}}}
+%      \sfb\ignorespaces\fromname}
+      \hfill\rm\headtoname\ \ignorespaces\toname
+      \hfill\datename:\ \@date\hfill\pagename\
+      \thepage\\[-8pt]\rule{\textwidth}{.4pt}}}}}
+\DeclareOption*{%
+   \PassOptionsToClass{\CurrentOption}{scrlettr}}
+\ProcessOptions
+\LoadClass{scrlettr}[1997/05/31]
+
+% *********************************
+%   scrlettr-Befehle undefinieren
+% *********************************
+
+\pagestyle{headings}
+\BKopf
+\nBKopf
+
+