Skip to content
Snippets Groups Projects
Commit 3467ca8b authored by Rolf Niepraschk's avatar Rolf Niepraschk
Browse files

Layoutanpassungen, BLN/BS, serif/sanserif + allerlei

parent a21db574
Branches
No related tags found
No related merge requests found
Show whitespace changes
Inline Side-by-side
antragsbestaetigung/ptbletter-test.tex
+ 15
− 15
View file @ 3467ca8b
...@@ -2,38 +2,38 @@ ...@@ -2,38 +2,38 @@
\documentclass[% \documentclass[%
,ngerman ,ngerman
,visualize ,visualize
,twoside
,serif
,BLN
]{ptbletter} ]{ptbletter}
\usepackage{blindtext} \usepackage{blindtext}
\setkomavar{backaddress}{PTB\\Abbestr. 2--12\\10587 Berlin} \yourref{hugo}
%\setkomavar{backaddress}{PTB\\Postfach 33 45\\38023 Braunschweig} \yourmail{2015-05-08}
\setkomavar{yourref}{hugo} \handledby{Peter Silie}
\setkomavar{yourmail}{2015-05-08} \myref{pesi}
\mymail{2015-05-14}
\myphone{7316}
\myfax{7777}
\myemail{Peter.Silie@ptb.de}
\setkomavar{handledby}{Peter Silie} \subject{Neuordnung der Welt}
\setkomavar{myref}{pesi}
\setkomavar{mymail}{2015-05-14}
\setkomavar{myphone}{7316}
\setkomavar{myfax}{7777}
\setkomavar{fromemail}{Peter.Silie@ptb.de}
\setkomavar{subject}{Neuordnung der Welt} \date{2015-05-21}
\setkomavar{date}{2015-05-21}
\begin{document} \begin{document}
\begin{letter}{% \begin{letter}{%
Petra Mustermann\\ Petra Mustermann\\
Vor dem Berg 1\\ Vor dem Berg 1\\
12345 Musterhausen% 12345 Musterhausen
} }
\opening{Liebe Vereinsvorsitzende,} \opening{Liebe Vereinsvorsitzende,}
\blindtext[2] \blindtext[12]
\end{letter} \end{letter}
......
antragsbestaetigung/ptbletter.cls
+ 123
− 23
View file @ 3467ca8b
...@@ -4,13 +4,29 @@ ...@@ -4,13 +4,29 @@
\NeedsTeXFormat{LaTeX2e}[1999/12/01] \NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesClass{ptbletter} \ProvidesClass{ptbletter}
[2015/05/08 v0.1a PTB-Brief-Klasse (RN)] [2015/05/22 v0.1b PTB-Brief-Klasse (RN)]
\let\ptb@tempdima=\@ovxx
\let\ptb@tempdimb=\@ovyy
\let\ptb@tempdimc=\@ovdx
\let\ptb@tempdimd=\@clnwd
\let\ptb@tempdime=\@clnht
\let\ptb@tempdimf=\@dashdim
\newif\ifptb@BLN \ptb@BLNtrue
\newif\ifPTB@serif \PTB@seriffalse
% TODO: BS, BLN, serif, sanserif
\DeclareOption{german}{\def\ptb@lang{main=ngerman}} \DeclareOption{german}{\def\ptb@lang{main=ngerman}}
\DeclareOption{ngerman}{\def\ptb@lang{main=ngerman}} \DeclareOption{ngerman}{\def\ptb@lang{main=ngerman}}
\DeclareOption{de}{\def\ptb@lang{main=ngerman}} \DeclareOption{de}{\def\ptb@lang{main=ngerman}}
\DeclareOption{english}{\def\ptb@lang{main=english}} \DeclareOption{english}{\def\ptb@lang{main=english}}
\DeclareOption{en}{\def\ptb@lang{main=english}} \DeclareOption{en}{\def\ptb@lang{main=english}}
\DeclareOption{BS}{\ptb@BLNfalse}
\DeclareOption{BLN}{\ptb@BLNtrue}
\DeclareOption{sanserif}{\PTB@seriffalse}
\DeclareOption{serif}{\PTB@seriftrue}
\DeclareOption{visualize}{% \DeclareOption{visualize}{%
\PassOptionsToClass{\CurrentOption}{scrlttr2} \PassOptionsToClass{\CurrentOption}{scrlttr2}
...@@ -30,23 +46,29 @@ ...@@ -30,23 +46,29 @@
\ProcessOptions\relax \ProcessOptions\relax
\LoadClass[% \LoadClass[%
,fontsize=10pt ,fontsize=11pt
,DINmtext ,DINmtext
,fromrule=off% ??? ,fromrule=off% ???
,backaddress=plain ,backaddress=plain
,refline=nodate ,refline=nodate
,enlargefirstpage
]{scrlttr2} ]{scrlttr2}
% Texbreite beibehalten, linken Rand anpassen
\ptb@tempdima=\textwidth
\RequirePackage[verbose,inner=72bp,textwidth=\ptb@tempdima]{geometry}
\RequirePackage{hyphsubst}% Trennregeln austauschen \RequirePackage{hyphsubst}% Trennregeln austauschen
\HyphSubstIfExists{ngerman-x-latest}{% \HyphSubstIfExists{ngerman-x-latest}{%
\HyphSubstLet{ngerman}{ngerman-x-latest}}{} \HyphSubstLet{ngerman}{ngerman-x-latest}}{}
\HyphSubstIfExists{german-x-latest}{% \HyphSubstIfExists{german-x-latest}{%
\HyphSubstLet{german}{german-x-latest}}{} \HyphSubstLet{german}{german-x-latest}}{}
\RequirePackage{ifxetex,ifluatex,url} \RequirePackage{ifxetex,ifluatex,url,array}
\newif\ifXeOrLua \XeOrLuafalse \newif\ifXeOrLua \XeOrLuafalse
\ifxetex\XeOrLuatrue\else\ifluatex\XeOrLuatrue\fi\fi \ifxetex\XeOrLuatrue\else\ifluatex\XeOrLuatrue\fi\fi
% TODO: Mathematik?
\ifXeOrLua% XeLaTeX oder luaLaTeX \ifXeOrLua% XeLaTeX oder luaLaTeX
\RequirePackage{fontspec} \RequirePackage{fontspec}
\setmainfont{TeX Gyre Pagella}[Ligatures=TeX] \setmainfont{TeX Gyre Pagella}[Ligatures=TeX]
...@@ -68,6 +90,14 @@ ...@@ -68,6 +90,14 @@
\RequirePackage[ttdefault=true,scale=1.034]{AnonymousPro} \RequirePackage[ttdefault=true,scale=1.034]{AnonymousPro}
\fi \fi
\def\tiny{\@setfontsize\tiny{7}{8.17}}
\ifPTB@serif
\renewcommand*\familydefault{\rmdefault}
\else
\renewcommand*\familydefault{\sfdefault}
\fi
%\RequirePackage{etoolbox} %\RequirePackage{etoolbox}
%\preto\@classoptionslist{ngerman,} %\preto\@classoptionslist{ngerman,}
% Ohne Sprachangabe "deutsch" verwenden. Bessere Lösung? % Ohne Sprachangabe "deutsch" verwenden. Bessere Lösung?
...@@ -86,41 +116,111 @@ ...@@ -86,41 +116,111 @@
\RequirePackage[babel=once]{csquotes} \RequirePackage[babel=once]{csquotes}
} }
\@setplength{toaddrhpos}{72bp} \@setplength{toaddrhpos}{72bp}
\@setplength{toaddrvpos}{123bp} \@setplength{toaddrvpos}{124bp}
%\@setplength{toaddrwidth}{85mm} %\@setplength{toaddrwidth}{85mm}
\@setplength{lochpos}{-354bp}% "-" --> vom linken Blattand aus \@setplength{lochpos}{-354bp}% "-" --> vom linken Blattand aus
\@setplength{locvpos}{146bp}% --> vom oberen Blattand aus \@setplength{locvpos}{146bp}% --> vom oberen Blattand aus
\@setplength{locwidth}{212bp} \@setplength{locwidth}{212bp}
\@setplength{locheight}{132bp} \@setplength{locheight}{135bp}
%\@setplength{refaftervskip}{75bp}
%\@setplength{refhpos}{72bp}
\@setplength{refvpos}{304bp}
%\@setplength{refwidth}{40mm}
\@setplength{refaftervskip}{\z@}
\@setplength{firstfoothpos}{72bp}
\@setplength{firstfootvpos}{764bp}
\@setplength{firstheadwidth}{469bp}
\@setplength{firstfootwidth}{\useplength{firstheadwidth}}
\footskip= 30bp %
\@setplength{refaftervskip}{75bp} \@setplength{subjectaftervskip}{23bp}
%\@setplength{refvpos}{1sp} %\@setplength{refvpos}{1sp}
%\@setplength{refhpos}{1sp} %\@setplength{refhpos}{1sp}
%\@setplength{refwidth}{110bp} %\@setplength{refwidth}{110bp}
\removereffields \removereffields
\setkomavar{backaddressseparator}{\,\,\textbullet\,\,}
\addtokomafont{addressee}{\sffamily} \addtokomafont{addressee}{\sffamily}
\addtokomafont{refvalue}{\normalfont} \setkomafont{refname}{\sffamily\tiny}
\setkomafont{refvalue}{\normalfont}
\setkomavar{location}{% TODO: Tabelle!
\raggedright\usekomafont{refvalue}% \setkomavar{location}{%
{\usekomafont{refname}\usekomavar*{yourref}:}~\usekomavar{yourref}\\ \extrarowheight=-1bp %
{\usekomafont{refname}\usekomavar*{yourmail}:}~\usekomavar{yourmail}\\ \begin{tabular}{@{}>{\usekomafont{refname}}l<{:}@{~\,}>{\usekomafont{refvalue}}l@{}}
{\usekomafont{refname}\usekomavar*{myref}:}~\usekomavar{myref}\\ \usekomavar*{yourref} & \usekomavar{yourref}\\
{\usekomafont{refname}\usekomavar*{mymail}:}~\usekomavar{mymail}\\ \usekomavar*{yourmail} & \usekomavar{yourmail}\\
~\\ \usekomavar*{myref} & \usekomavar{myref}\\
{\usekomafont{refname}\usekomavar*{handledby}:}~\usekomavar{handledby}\\ \usekomavar*{mymail} & \usekomavar{mymail}\\
{\usekomafont{refname}\usekomavar*{myphone}:}~\usekomavar{myphone}\\ \multicolumn{2}{@{}l@{}}{} \\
{\usekomafont{refname}\usekomavar*{myfax}:}~\usekomavar{myfax}\\ \usekomavar*{handledby} & \usekomavar{handledby}\\
{\usekomafont{refname}\usekomavar*{fromemail}:}~\usekomavar{fromemail}\\ \usekomavar*{myphone} & \usekomavar{myphone}\\
~\\ \usekomavar*{myfax} & \usekomavar{myfax}\\
{\usekomafont{refname}\usekomavar*{date}:}~\usekomavar{date} \usekomavar*{fromemail} & \usekomavar{fromemail}\\
\multicolumn{2}{@{}l@{}}{} \\
\usekomavar*{date} & \usekomavar{date}
\end{tabular}
} }
\setkomavar{firstfoot}{% TODO: engl/dt
\parbox{\useplength{firstfootwidth}}{%
\sffamily\tiny
\begin{tabular}{@{}l@{}}
Hausadresse, Lieferanschrift:\\
\ifptb@BLN Abbestr. 2--12 \else Bundesallee 100 \fi \\
\ifptb@BLN 10587 Berlin \else 38116 Braunschweig\fi \\
DEUTSCHLAND
\end{tabular}%
\hfill
\begin{tabular}{@{}l@{~}l@{}}
Telefon: & \ifptb@BLN +49 30 3481-0 \else +49 531 592-0 \fi \\
Telefax: & \ifptb@BLN +49 30 3481-7490 \else +49 531 592-9292 \fi \\
E-Mail: & \ifptb@BLN poststelle\_ib@ptb.de \else poststelle@ptb.de \fi \\
Internet: & http://www.ptb.de
\end{tabular}%
\hfill
\begin{tabular}{@{}l@{~}l@{}}
\multicolumn{2}{@{}l@{}}{Deutsche Bundesbank, Filiale Leipzig} \\
IBAN: & DE38 8600 0000 0086 0010 40 \\
BIC: & MARKDEF1860 \\
VAT-Nr.: & DE 811 240 952
\end{tabular}%
\hfill
\begin{tabular}{@{}l@{}}
\ifptb@BLN PTB Braunschweig \else PTB Berlin-Charlottenburg \fi \\
\ifptb@BLN Bundesallee 100 \else Abbestr. 2--12 \fi \\
\ifptb@BLN 38116 Braunschweig \else 10587 Berlin \fi \\
DEUTSCHLAND
\end{tabular}%
\hfill \mbox{}
}%
}
\setkomavar{backaddressseparator}{\,\,\textbullet\,\,}
\ifptb@BLN
\setkomavar{backaddress}{PTB\\Abbestr. 2--12\\10587 Berlin}
\else
\setkomavar{backaddress}{PTB\\Postfach 33 45\\38023 Braunschweig}
\fi
\newcommand*\handledby[1]{\setkomavar{handledby}{#1}}
\newcommand*\myref[1]{\setkomavar{myref}{#1}}
\newcommand*\mymail[1]{\setkomavar{mymail}{#1}}
\newcommand*\myphone[1]{\setkomavar{myphone}{#1}}
\newcommand*\myfax[1]{\setkomavar{myfax}{#1}}
\newcommand*\myemail[1]{\setkomavar{fromemail}{#1}}
\newcommand*\yourref[1]{\setkomavar{yourref}{#1}}
\newcommand*\yourmail[1]{\setkomavar{yourmail}{#1}}
\newcommand*\backaddress[1]{\setkomavar{backaddress}{#1}}
\newcommand*\subject[1]{\setkomavar{subject}{#1}}
\renewcommand*\date[1]{\setkomavar{date}{#1}}
\newkomavar[\mymailname]{mymail} \newkomavar[\mymailname]{mymail}
\newkomavar[\myphonename]{myphone} \newkomavar[\myphonename]{myphone}
\newkomavar[\myfaxname]{myfax} \newkomavar[\myfaxname]{myfax}
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment