Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

g-brief in C5 briefumschlag / fenster links

141 views
Skip to first unread message

beni

unread,
Nov 22, 2004, 1:10:02 PM11/22/04
to
hallo

ich habe mein g-brief.cls file so angepasst, das der brief in ein DIN
C5 kuvert passt. diese briefumschläge sind in der schweiz verbreitet
und bringen den vorteil, dass der brief nur 1mal gefaltet werden muss,
nicht wie beim sogennannten DIN C6/5 format, für den der g-brief
eigentlich wäre.
das file sieht jetzt so aus:
%%
%% This is file `g-brief.cls',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% g-brief.dtx (with options: `class')
%%
%% =======================================================================
%%
%% Copyright (C) 1991-2003 Michael Lenzen.
%%
%% For additional copyright information see further down in this file.
%%
%% This file is part of the G-BRIEF package.
%% -----------------------------------------------------------------------
%%
%% It may be distributed under the terms of the LaTeX Project Public
%% License (LPPL), as described in lppl.txt in the base LaTeX
distribution.
%% Either version 1.1 or, at your option, any later version.
%%
%% The latest version of this license is in
%%
%% http://www.latex-project.org/lppl.txt
%%
%% LPPL Version 1.1 or later is part of all distributions of LaTeX
%% version 1999/06/01 or later.
%%
%%
%% Error reports in case of UNCHANGED versions to
%%
%% <len...@lenzen.com>
%% <m.le...@t-online.de>
%%
%% 2004/11/22 file adapted to fit in DIN C5 envelope instead of what
is
%% called DIN C6/5. <benibunnyRËMÔVÈ//THÍ$gmx/net>
%%
\def\filedate{2003/05/08}
\def\fileversion{4.0.1}
\def\filedate{2003/05/08}
\def\fileversion{4.0.1}
\def\filename{g-brief.cls}
\NeedsTeXFormat{LaTeX2e}[2001/06/01]

\ProvidesClass{g-brief}[\filedate\space v\fileversion\space g-brief
class]

\newdimen\VorschubH
\newdimen\VorschubV
\VorschubH = 0.0mm
\VorschubV = 0.0mm

\def\sprache{ngerman}
\def\telefontex{{\footnotesize Telefon\/:}}
\def\telefaxtext{{\footnotesize Telefax\/:}}
\def\telextext{{\footnotesize Telex\/:}}
\def\emailtext{{\footnotesize e--Mail\/:}}
\def\httptext{{\footnotesize HTTP\/:}}
\def\banktext{{\footnotesize Bankverbindung\/:}}
\def\blztext{{\footnotesize BLZ}}
\def\kontotext{{\footnotesize Kto.}}
\def\betrefftext{{\normalsize Betr.:}}
\def\ihrzeichentext{\footnotesize\textsc{Ihr Zeichen}}
\def\ihrschreibentext{\footnotesize\textsc{Ihr Schreiben vom}}
\def\meinzeichentext{\footnotesize\textsc{Mein Zeichen}}
\def\unserzeichentext{\footnotesize\textsc{Unser Zeichen}}
\def\datumtext{\footnotesize\textsc{}}
\def\datum{\number\day.~\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 \space\number\year}

\DeclareOption{10pt}{\def\@schrift{0}}
\DeclareOption{11pt}{\def\@schrift{1}}
\DeclareOption{12pt}{\def\@schrift{2}}

\let\@docencoding\@empty
\DeclareOption{ansinew}{\def\@docencoding{ansinew}}
\DeclareOption{applemac}{\def\@docencoding{applemac}}
\DeclareOption{ascii}{\def\@docencoding{ascii}}
\DeclareOption{cp1250}{\def\@docencoding{cp1250}}
\DeclareOption{cp1252}{\def\@docencoding{cp1252}}
\DeclareOption{cp437de}{\def\@docencoding{cp437de}}
\DeclareOption{cp437}{\def\@docencoding{cp437}}
\DeclareOption{cp850}{\def\@docencoding{cp850}}
\DeclareOption{cp852}{\def\@docencoding{cp852}}
\DeclareOption{cp865}{\def\@docencoding{cp865}}
\DeclareOption{decmulti}{\def\@docencoding{decmulti}}
\DeclareOption{latin1}{\def\@docencoding{latin1}}
\DeclareOption{latin2}{\def\@docencoding{latin2}}
\DeclareOption{latin3}{\def\@docencoding{latin3}}
\DeclareOption{latin4}{\def\@docencoding{latin4}}
\DeclareOption{latin5}{\def\@docencoding{latin5}}
\DeclareOption{latin9}{\def\@docencoding{latin9}}
\DeclareOption{next}{\def\@docencoding{next}}

\DeclareOption{german}{
\def\sprache{german}
\def\telefontex{{\footnotesize Telefon\/:}}
\def\telefaxtext{{\footnotesize Telefax\/:}}
\def\telextext{{\footnotesize Telex\/:}}
\def\emailtext{{\footnotesize e--Mail\/:}}
\def\httptext{{\footnotesize HTTP\/:}}
\def\banktext{{\footnotesize Bankverbindung\/:}}
\def\blztext{{\footnotesize BLZ}}
\def\kontotext{{\footnotesize Kto.}}
\def\betrefftext{{\normalsize Betr.:}}
\def\ihrzeichentext{\footnotesize\textsc{Ihr Zeichen}}
\def\ihrschreibentext{\footnotesize\textsc{Ihr Schreiben vom}}
\def\meinzeichentext{\footnotesize\textsc{Mein Zeichen}}
\def\unserzeichentext{\footnotesize\textsc{Unser Zeichen}}
\def\datumtext{\footnotesize\textsc{}}
\def\datum{\number\day.~\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 \space\number\year}}

\DeclareOption{ngerman}{
\def\sprache{ngerman}
\def\telefontex{{\footnotesize Telefon\/:}}
\def\telefaxtext{{\footnotesize Telefax\/:}}
\def\telextext{{\footnotesize Telex\/:}}
\def\emailtext{{\footnotesize e--Mail\/:}}
\def\httptext{{\footnotesize HTTP\/:}}
\def\banktext{{\footnotesize Bankverbindung\/:}}
\def\blztext{{\footnotesize BLZ}}
\def\kontotext{{\footnotesize Kto.}}
\def\betrefftext{{\normalsize Betr.:}}
\def\ihrzeichentext{\footnotesize\textsc{Ihr Zeichen}}
\def\ihrschreibentext{\footnotesize\textsc{Ihr Schreiben vom}}
\def\meinzeichentext{\footnotesize\textsc{Mein Zeichen}}
\def\unserzeichentext{\footnotesize\textsc{Unser Zeichen}}
\def\datumtext{\footnotesize\textsc{Datum}}
\def\datum{\number\day.~\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 \space\number\year}}

\DeclareOption{english}{
\def\sprache{english}
\def\telefontex{{\footnotesize Phone\/:}}
\def\telefaxtext{{\footnotesize Fax\/:}}
\def\telextext{{\footnotesize Telex\/:}}
\def\emailtext{{\footnotesize e--Mail\/:}}
\def\httptext{{\footnotesize HTTP\/:}}
\def\banktext{{\footnotesize Bank\/:}} \def\blztext{{\footnotesize
code}} \def\kontotext{{\footnotesize acct}}
\def\betrefftext{{\normalsize Subj.:}}
\def\ihrzeichentext{\footnotesize\textsc{Your Ref.}}
\def\ihrschreibentext{\footnotesize\textsc{Your Mail}}
\def\meinzeichentext{\footnotesize\textsc{My Ref.}}
\def\unserzeichentext{\footnotesize\textsc{Our Ref.}}
\def\datumtext{\footnotesize\textsc{Date}}}

\DeclareOption{american}{
\def\sprache{american}
\def\telefontex{{\footnotesize Phone\/:}}
\def\telefaxtext{{\footnotesize Fax\/:}}
\def\telextext{{\footnotesize Telex\/:}}
\def\emailtext{{\footnotesize e--Mail\/:}}
\def\httptext{{\footnotesize HTTP\/:}}
\def\banktext{{\footnotesize Bank\/:}} \def\blztext{{\footnotesize
code}} \def\kontotext{{\footnotesize acct}}
\def\betrefftext{{\normalsize Subj.:}}
\def\ihrzeichentext{\footnotesize\textsc{Your Ref.}}
\def\ihrschreibentext{\footnotesize\textsc{Your Mail}}
\def\meinzeichentext{\footnotesize\textsc{My Ref.}}
\def\unserzeichentext{\footnotesize\textsc{Our Ref.}}
\def\datumtext{\footnotesize\textsc{Date}}}

\ExecuteOptions{11pt,@sprache} \ProcessOptions
\LoadClass[1\@schrift pt, a4paper, oneside, final]{letter}[1999/04/29]
\normalsize

\setlength\oddsidemargin{0\p@}
\setlength\evensidemargin{\oddsidemargin}
\setlength\marginparwidth{90\p@}
\setlength\marginparsep{11\p@}
\setlength\marginparpush{5\p@}
\setlength\topmargin{-7.69mm}
\setlength\headheight{4.23mm}
\setlength\headsep{6.35mm}
\setlength\topskip{20.38mm}
\addtolength\footskip{4.23mm}

\setlength\textheight{178.88mm}
\setlength\textwidth{165mm}

\setlength\lineskip{1\p@}
\setlength\normallineskip{1\p@}

\renewcommand\baselinestretch{1}

\advance\topmargin by \VorschubV
\advance\oddsidemargin by \VorschubH
\setlength\evensidemargin{\oddsidemargin}

\AtEndOfClass{\pagestyle{regularpage}}

\def\Name#1{\def\name{#1}} \def\name{}
\def\Strasse#1{\def\strasse{#1}} \def\strasse{}
\def\Zusatz#1{\def\zusatz{#1}} \def\zusatz{}
\def\Ort#1{\def\ort{#1}} \def\ort{}
\def\Land#1{\def\land{#1}} \def\land{}
\def\RetourAdresse#1{\def\retouradresse{#1}} \def\retouradresse{}

\def\Telefon#1{\def\telefon{#1}} \def\telefon{}
\def\Telefax#1{\def\telefax{#1}} \def\telefax{}
\def\Telex#1{\def\telex{#1}} \def\telex{}
\def\EMail#1{\def\email{#1}} \def\email{}
\def\HTTP#1{\def\http{#1}} \def\http{}

\def\Bank#1{\def\bank{#1}} \def\bank{}
\def\BLZ#1{\def\blz{#1}} \def\blz{}
\def\Konto#1{\def\konto{#1}} \def\konto{}

\def\Postvermerk#1{\def\postvermerk{#1}} \def\postvermerk{}
\def\Adresse#1{\def\adresse{#1}} \def\adresse{}

\def\IhrZeichen#1{\def\ihrzeichen{#1}} \def\ihrzeichen{}
\def\IhrSchreiben#1{\def\ihrschreiben{#1}} \def\ihrschreiben{}
\def\MeinZeichen#1{\def\meinzeichen{#1}} \def\meinzeichen{}
\def\Datum#1{\def\datum{#1}} \def\datum{\today}

\def\Betreff#1{\def\betreff{#1}} \def\betreff{}

\def\Anrede#1{\def\anrede{#1}} \def\anrede{}
\def\Gruss#1#2{\def\gruss{#1} \def\grussskip{#2}}
\def\gruss{} \def\grussskip{}

\def\Unterschrift#1{\def\unterschrift{#1}} \def\unterschrift{}

\def\Anlagen#1{\def\anlagen{#1}} \def\anlagen{}
\def\Verteiler#1{\def\verteiler{#1}} \def\verteiler{}

\long\def\Einrueckung#1{\par\begin{tabular}{@{\hspace{1in}}p{5in}@{}}
#1\end{tabular}\par}

\newif\ifklassisch\klassischfalse
\def\klassisch{\klassischtrue}

\newif\iftrennlinien\trennlinienfalse
\def\trennlinien{\trennlinientrue}

\newif\iflochermarke\lochermarkefalse
\def\lochermarke{\lochermarketrue}

\newif\iffaltmarken\faltmarkenfalse
\def\faltmarken{\faltmarkentrue}

\newif\iffenstermarken\fenstermarkenfalse
\def\fenstermarken{\fenstermarkentrue}

\newif\ifunserzeichen\unserzeichenfalse
\def\unserzeichen{\unserzeichentrue}

\newenvironment{g-brief}{
\thispagestyle{firstpage}
\setlength\unitlength{1mm}

\c@page\@ne
\interlinepenalty=200
\clearpage

\ifx \ihrzeichen\empty \ifx \ihrschreiben\empty \ifx
\meinzeichen\empty \vspace{8mm} \makebox[45.5mm][l]{}
\makebox[55.0mm][l]{}
\makebox[30.0mm][l]{} \else \makebox[45.5mm][l]{\ihrzeichentext}
\makebox[55.0mm][l]{\ihrschreibentext} \ifunserzeichen
\makebox[20.0mm][l]{\unserzeichentext} \else
\makebox[20.0mm][l]{\meinzeichentext} \fi \fi \else
\makebox[45.5mm][l]{\ihrzeichentext}
\makebox[55.0mm][l]{\ihrschreibentext} \ifunserzeichen
\makebox[20.0mm][l]{\unserzeichentext} \else
\makebox[20.0mm][l]{\meinzeichentext} \fi \fi \else
\makebox[45.5mm][l]{\ihrzeichentext}
\makebox[55.0mm][l]{\ihrschreibentext} \ifunserzeichen
\makebox[20.0mm][l]{\unserzeichentext} \else
\makebox[20.0mm][l]{\meinzeichentext} \fi \fi
\makebox[37.0mm][l]{\datumtext} \\
\makebox[45.5mm][l]{\ihrzeichen}
\makebox[55.0mm][l]{\ihrschreiben}
\makebox[20.0mm][l]{\meinzeichen}
\makebox[37.0mm][l]{\datum} \par

\vspace{12mm} %distanz zw. ihr zeichen und betreff

\ifcase\@ptsize\vspace{0.045pt}\or \vspace{-1.555pt}\or
\vspace{-2.955mm} \fi

\ifx \betreff\empty \else \ifklassisch \betrefftext \space \space
\betreff \else \textbf{\betreff} \fi \mbox{}
\par \vspace{-1\parskip} \vspace{8mm} \fi

\ifcase\@ptsize\vspace{0.045pt}\or \vspace{-1.555pt}\or
\vspace{-2.955pt} \fi

\ifx \anrede\empty \else \anrede \par \fi\nobreak
\addtolength\textheight{63mm}
}
{
\renewcommand{\baselinestretch}{1.0}
\ifcase \@ptsize\relax \normalsize \or \small \or \footnotesize \fi

\vspace{\grussskip} \par \nobreak \stopbreaks \noindent
\parbox[t]{3.5in}{\raggedright \ignorespaces {\normalsize \ifx
\gruss\empty \else \gruss \mbox{} \\[16.92mm] \fi \ifx
\unterschrift\empty \relax \else \ifklassisch
\textsl{(\unterschrift)} \else \unterschrift \fi}
\fi\strut} \ifx \anlagen\empty \else \vspace{4mm} \par \anlagen
\par \fi \ifx \verteiler\empty \else \ifx \anlagen\empty
\vspace{4mm}\par \fi \verteiler \fi }

\def\ps@firstpage{
\renewcommand{\baselinestretch}{1.0}
\ifcase \@ptsize\relax \normalsize \or \small \or \footnotesize \fi
\headheight16pt\headsep63mm
\def\@oddhead{
\unitlength1mm
\begin{picture}(0,0)
\put(-9, 3){\parbox{180mm}{\Large \ifklassisch
\textsl{\quad\name}
\else \textsc{\quad\name} \fi}}
\put(-9, 4){\parbox{180mm}{\hfill \normalsize \ifklassisch
\textsl{
\begin{tabular}{r} \strasse \quad \\ \ifx \zusatz\empty
\else
\zusatz \quad \\ \fi \ort \quad \ifx \land\empty \else
\\
\land \quad \fi \end{tabular}} \else \textsc{
\begin{tabular}{r} \strasse \quad \\ \ifx \zusatz\empty
\else
\zusatz \quad \\ \fi \ort \quad \ifx \land\empty \else
\\
\land \quad \fi \end{tabular}} \fi}}
\iftrennlinien \put(-9,-7){\rule{180mm}{0.5pt}} \fi
\iflochermarke \put(-20,- 130.50){\line(1,0){4}} \fi
\iffaltmarken \put(-15,- 75.16){\line(1,0){3}}
\put(-15,-182.16){\line(1,0){3}} \fi
\put( -9, -33.00){\makebox(85,4)
{\scriptsize \ifx \retouradresse\empty
\textrm{\name\ $\cdot$\ \strasse\ $\cdot$\ \ort \ifx
\land\empty \else \ $\cdot$\ \land \fi } \else
\textrm{\retouradresse} \fi}}
\iftrennlinien \put( -9, -33.10){\line(1,0){85}} \fi
\put(-1,-39.15){\parbox[t]{3in}{\ifx \postvermerk\empty \hfill
\par
\else \textbf{\postvermerk} \par \vspace{2mm} \fi \adresse}}
\iffenstermarken
\put(-9,-24.15){\line( 1, 0){1}} \put(-9,-24.15){\line(
0,-1){1}}
\put(76,-24.15){\line(-1, 0){1}} \put(76,-24.15){\line(
0,-1){1}}
\put(-9,-67.00){\line( 1, 0){1}} \put(-9,-67.00){\line( 0,
1){1}}
\put(76,-67.00){\line(-1, 0){1}} \put(76,-67.00){\line( 0,
1){1}}
\fi

\end{picture}
\hfill}
\def\@oddfoot{\unitlength1mm
\begin{picture}(0,0)
\put(-9,0){\parbox{180mm}{\footnotesize \iftrennlinien
\rule{180mm}{0.5pt} \fi
\begin{tabular}{ll}
\ifx \telefon\empty \else \telefontex & \telefon \\ \fi
\ifx
\telefax\empty \else \telefaxtext & \telefax \\ \fi \ifx
\telex\empty \else \telextext & \telex \\ \fi \ifx
\email\empty \else \emailtext & \email \\ \fi \ifx
\http\empty \else \httptext & \http \\ \fi \
\end{tabular}\hfill
\begin{tabular}{ll}
\ifx \bank\empty \else \ifx \blz\empty \else \ifx
\konto\empty \else \banktext & \bank \\ & \blztext \space
\blz
\\ & \kontotext \space \konto \\ \ \fi \fi \fi
\end{tabular}}}
\end{picture} \hfill}
\def\@evenhead{\@oddhead} \def\@evenfoot{\@oddfoot}}

\def\ps@regularpage{ \headheight36pt\def\@oddhead{\unitlength1mm
\begin{picture}(0,0)
\put(-9,3){\makebox(180,15){\normalsize \ifklassisch \textsl{
{\Large\quad}\name\hfill\datum\hfill\pagename\ \thepage\quad}
\else \textsc{{\Large\quad}\name\hfill\datum\hfill\pagename\
\thepage\quad} \fi}}
\iftrennlinien \put(-9,0){\rule{180mm}{0.5pt}} \fi
\end{picture}\hfill}
\def\@oddfoot{\empty} \def\@evenhead{\@oddhead}
\def\@evenfoot{\@oddfoot}}

\IfFileExists{babel.sty}
{\RequirePackage[\sprache]{babel}[2001/03/01]}
{\ClassError{g-brief}
{Babel not installed !!!}
{Get babel package !!!}}

\ifx \@docencoding\empty \else
\IfFileExists{inputenc.sty}
{\RequirePackage[\@docencoding]{inputenc}}
{\ClassError{g-brief}
{LaTeX2e not complete installed or out of date !!!}
{Get current LaTeX2e !!!}}
\fi

\IfFileExists{marvosym.sty}
{\RequirePackage{marvosym}}
{}
\def\Telefon#1{\def\telefon{#1}} \def\telefon{}
\IfFileExists{europs.sty}
{\RequirePackage{europs}}
{}{}
\IfFileExists{eurosym.sty}
{\RequirePackage{eurosym}}
{}{}


\endinput
%%
%% End of file `g-brief.cls'.

0 new messages