1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
|
%% $Id: dtk.clo 42 2014-07-08 17:34:44Z herbert $
\ProvidesFile{dtk.clo}[2011/04/23 v0.5 dtk class option (RN,hv)]
\newcommand\CoverArt[3]{%
\ifx\CoverTitleFont\@undefined
%\newfont\CoverTitleFont{ecrm1700 scaled \magstep 5}
%\newfont\CoverTitleFont{lmr12 scaled 2938}
\DeclareFixedFont\CoverTitleFont{\encodingdefault}{\rmdefault}{m}{n}{41.26}%
\fi
\ifx\CoverNumberFont\@undefined
%\newfont\CoverNumberFont{ecrm1700 scaled 2986}
\DeclareFixedFont\CoverNumberFont{\encodingdefault}{\rmdefault}{m}{n}{51.66}%
\fi
\newsavebox\dtk@titlebox
\sbox\dtk@titlebox{\parbox{\textheight}{%
\null\hfill\CoverTitleFont\fontsize{41.26}{42}\selectfont\color{black!60}%\journalname
Die \color{black}\TeX\color{black!60}nische Komödie\hfill\null}}
% \hspace*{5pt}
\rotatebox{90}{\usebox\dtk@titlebox}\
\rule{\CoverArt@barwidth}{\textheight}
\hfill
%
\begin{minipage}[b]{.7\textwidth}\raggedright
\rule{1em}{0pt}%
\dimen2=\textwidth\advance\dimen2-1em
\parbox{\dimen2}{\CoverArt@font
{\Huge\DANTE}\\
Deutschsprachige\\
Anwendervereinigung
\TeX\ \eV}\\[1ex]
\dimen3=\textwidth\advance\dimen3-\CoverArt@gap
\hfill\rule{\dimen3}{\CoverArt@linewidth}\\[-\baselineskip]
\null\hspace{1em}%
{\CoverArt@small\cover@sub{#1}{#2}{#3}}\\[-\baselineskip]
\rule{0pt}{.617647\textheight}%
\CoverNumberFont
\null\hfill
\makebox(0,0)[br]{%
\textcolor{CoverArt@grey}{%
\CoverArt@strip@no #1;\hspace{1pt}%
}}% Warum verwendet `\CoverArt@strip@no' \CoverTitleFont? RN
\end{minipage}%
}
%\PassOptionsToPackage{ngerman}{babel}
%\RequirePackage[ngerman]{babel}
\newif\ifDTKcolor \DTKcolorfalse
\RequirePackage{xcolor}
\RequirePackage{longtable}
\RequirePackage{caption}
\captionsetup{justification=RaggedRight}
\ifDTKcolor
\definecolor{DTKlstBackground}{rgb}{1,1,0.95}
\definecolor{DTKlstKeys}{rgb}{0,0,1}
\definecolor{DTKlstIdentifiers}{rgb}{0,0,0}
\definecolor{DTKlstComments}{rgb}{1,0,0}
\definecolor{DTKlstStrings}{rgb}{0,0.5,0}
\else
\colorlet{DTKlstBackground}{black!5}
\colorlet{DTKlstKeys}{black}
\colorlet{DTKlstIdentifiers}{black}
\colorlet{DTKlstComments}{black}
\colorlet{DTKlstStrings}{black}
\fi
\RequirePackage[final]{listings}
\newcommand*\DTK@lst@colorbox[2]{%
\fboxsep=.16em\relax
\settowidth\@ovxx{#2}\settoheight\@ovyy{#2}%
\makebox[\@ovxx][c]{\colorbox{#1}{\raisebox{0pt}[\@ovyy][0pt]{#2}}}%
}
\newcommand\Small{\fontsize{9}{9.2}\selectfont}
\ifluatex
\newcommand*\DTKlstfont{\Small\ttfamily\addfontfeature{FakeStretch=0.9}}%\lsstyle}
\lstdefinestyle{DTKlstBase}{%
basicstyle=\DTKlstfont,
basewidth=0.55em,
keepspaces,
identifierstyle=\color{DTKlstIdentifiers},
keywordstyle=\color{DTKlstKeys},
stringstyle=\itshape\color{DTKlstStrings},
commentstyle=\itshape\color{DTKlstComments},
columns=fullflexible,
tabsize=2,
frame=single,
extendedchars=true,
showspaces=false,
showstringspaces=false,
breaklines=true,
breakindent=0.5em,
backgroundcolor=\color{DTKlstBackground},
breakautoindent=true,
captionpos=t,
aboveskip=\medskipamount,
belowskip=\medskipamount,
xrightmargin=\fboxsep,
emphstyle=\DTK@lst@colorbox{lightgray},
prebreak=,
postbreak=\mbox{$\hookrightarrow$},
% literate={ä}{{\"a}}1 {ö}{{\"o}}1 {ü}{{\"u}}1
% {Ä}{{\"A}}1 {Ö}{{\"O}}1 {Ü}{{\"U}}1 {ß}{\ss}1
}
\else
\newcommand*\DTKlstfont{\Small\ttfamily\SetTracking{encoding=*}{-60}\lsstyle}
\lstdefinestyle{DTKlstBase}{%
basicstyle=\DTKlstfont,
basewidth=0.55em,
keepspaces,
identifierstyle=\color{DTKlstIdentifiers},
keywordstyle=\color{DTKlstKeys},
stringstyle=\itshape\color{DTKlstStrings},
commentstyle=\itshape\color{DTKlstComments},
columns=fullflexible,
tabsize=2,
frame=single,
extendedchars=true,
showspaces=false,
showstringspaces=false,
breaklines=true,
breakindent=0.5em,
backgroundcolor=\color{DTKlstBackground},
breakautoindent=true,
captionpos=t,
aboveskip=\medskipamount,
belowskip=\medskipamount,
xrightmargin=\fboxsep,
emphstyle=\DTK@lst@colorbox{lightgray},
prebreak=,
postbreak=\mbox{$\hookrightarrow$},
literate={ä}{{\"a}}1 {ö}{{\"o}}1 {ü}{{\"u}}1
{Ä}{{\"A}}1 {Ö}{{\"O}}1 {Ü}{{\"U}}1 {ß}{\ss}1
}
\fi
\lstdefinestyle{DTKlstNumber}{%
style=DTKlstBase,
numbers=left,
numberstyle=\tiny\ttfamily,
numbersep=1em,
xleftmargin=1.5em,
}
\lstdefinestyle{DTKlstNoNumber}{%
style=DTKlstBase,
numbers=none,
xleftmargin=\fboxsep,
}
\lst@AddToHookExe{DeInit}{%
\@tempdima=\lst@belowskip \advance\@tempdima-.65\baselineskip
\edef\lst@belowskip{\the\@tempdima}%
}
\let\verbatim=\relax
\lstnewenvironment{verbatim}
{\lstset{language={},style=DTKlstNoNumber}}
{}
\AtBeginDocument{\belowcaptionskip=\abovecaptionskip}
\lstset{style=DTKlstNoNumber}
\def\ctanurl#1{\url{CTAN:#1}}%
\let\CTANurl\ctanurl
\newcommand\fboxlinewidth[1][\textwidth]{\dimexpr#1-2\fboxsep-2\fboxrule\relax}
\newcommand\tabcolwidth[2][\columnwidth]{\dimexpr#1-#2\tabcolsep\relax}
\newcommand*{\dudenpt}{\@ifnextchar\bgroup\dudenpt@arg\dudenpt@}
\newcommand*{\dudenpt@arg}[1]{\dudenpt@#1\relax}
\newcommand*{\dudenpt@}{%
\begingroup
\afterassignment\@dudenpt
\dimen@=}
\newcommand*{\@dudenpt}{%
\expandafter\endgroup
\expandafter\duden@pt\the\dimen@}
\begingroup
\catcode`P=12
\catcode`T=12
\lowercase{%
\def\x{%
\def\duden@pt##1.##2PT{%
##1\ifnum##2>\z@.##2\fi
\ifcase
\ifnum##2>\z@\@ne
\else\ifnum##1>9 \@ne
\else\ifnum##1<\z@ \@ne
\else \z@
\fi\fi\fi
\thinspace
\else
\nobreakspace
\fi
pt%
}%
}%
}%
\expandafter\endgroup\x
\endinput
|
