summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/dtk/dtk-pdf.sty
blob: a2b6fbb102baa4c697a40ea5d42a37a16a846e9e (plain)
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
%%
%% This is file `dtk-pdf.sty',
%% 
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% $Id: dtk-pdf.sty 13 2010-06-19 06:53:35Z herbert $
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Purpose:
%%      LaTeX Class and Styles for ``Die TeXnische Komoedie''.
%%
%% Documentation:
%%      The documentation  can be  generated  from  the original file
%%      dtk.dtx with the doc style/package. LaTeX the file dtk.tex to
%%      get the full documentation in DVI format.
%%
%%
%% Author: Gerd Neugebauer
%%         Mainzer Str. 8
%%         56321 Rhens (Germany)
%% Mail:   gene@gerd-neugebauer.de
%%
%% Copyright (C) 1995-1996 Gerd Neugebauer
%% Copyright (C) 1997-2011 DANTE, Deutschsprachige
%%                                Anwendervereinigung TeX e.V.
%%
%% It may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.3c
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%%    http://www.latex-project.org/lppl.txt
%% and version 1.3c or later is part of all distributions of LaTeX
%% version 2005/12/01 or later.
%%
%%  This package is still under development and may be replaced with
%%  a new version which provides enhanced functionality.
%%
\def\fileversion{1.9b}
\def\filedate{2010/06/19}
\let\docversion=\fileversion
\let\docdate=\filedate
\ProvidesPackage{dtk-pdf}[\filedate\space\fileversion\space  (gn,hv)]
\RequirePackage{multicol,graphicx,color}
\RequirePackage[bookmarks=false]{hyperref}
\definecolor{navy}{rgb}{0,0,.5}
\hypersetup{a5paper,colorlinks,urlcolor=navy}
\oddsidemargin=-10mm
\evensidemargin=-10mm
\topmargin=-15mm
\renewcommand\Volume{?/??}
\newcommand\Pages{???}
\renewcommand\volume{\Volume\ -- Nachdruck}
\let\titlemark\@gobble
\newcount\AdNo \AdNo=0
\newcommand\Address{\bigskip\par\advance\AdNo1
  \begin{multicols}2 \count255=0\relax
    \loop\csname Address\the\count255\endcsname\advance\count255 1
    \ifnum\count255<\AdNo \repeat
  \end{multicols}}
\renewcommand\address[3]{%
  \expandafter\gdef\csname Address\the\AdNo\endcsname
  {\par\parbox{.45\textwidth}{\footnotesize\raggedright
      #1 #2 \\#3}}\advance\AdNo1\relax}
\address{\href{http://cms.dante.de/}{\Dante}}{}{%
  \href{http://cms.dante.de/}{Postfach 10\,18\,40\\
    69008 Heidelberg\\
    \texttt{dante@dante.de}}}
\providecommand\DTK@keywords{}
\let\m@ketitle=\maketitle
\renewcommand\maketitle{%
  \thispagestyle{empty}%
  \newlength{\l@@x}\settowidth{\l@@x}{\Large\DTK}%
  \advance\l@@x3em\quad
  \href{http://archiv.dante.de/dante/DTK}{%
    \rotatebox{90}{\hspace*{1.5em}\Large\DTK}}
  \rule{.9pt}{\l@@x}\quad
                                %
  \begin{minipage}[b]{.75\textwidth}\parskip=1ex
    {\raggedleft\large
      \href{http://cms.dante.de/}{DANTE\\
      Deutschsprachige\\
      Anwendervereinigung \TeX\ e.V.}\medskip\par
      }%
    {\let\thanks\@gobble
    \ifx\@author\empty\else\@author: \fi
    \ifx\@title\empty\else\emph{\@title}, \fi
    }
    \DTK\ \Volume, S.\ \Pages.\medskip

    \scriptsize Reproduktion oder Nutzung dieses Beitrags durch
    konventionelle, elektronische oder beliebige andere Verfahren ist
    nur im nichtkommerziellen Rahmen gestattet.  Verwendungen in
    gr\"o\ss erem Umfang bitte zur Information bei \dante{} melden.  F\"ur
    kommerzielle Nutzung ist die Zustimmung der Autoren einzuholen.

    \DTK\ ist die Mitgliedszeitschrift von \Dante. Einzelne Hefte
    k\"onnen von Mitgliedern bei der Gesch\"aftsstelle von \Dante\
    erworben werden. Mitglieder erhalten \DTK\ im Rahmen ihrer
    Mitgliedschaft.
  \end{minipage}

  \begingroup
    \def\LaTeX{LaTeX}%
    \def\BibTeX{BibTeX}%
    \def\TeX{TeX}%
    \def\LyX{LyX}%
    \hypersetup{%
      pdftitle=\@title,
      pdfauthor=\@author,
      pdfkeywords={\DTK@keywords},
      pdfsubject={\volume},
      pdfstartview={FitBH}
      }%
  \endgroup
  \m@ketitle
}
\def\textcentigrade{\textcelsius}
\iffalse
\AtBeginDocument{%
  \DeclareFontEncoding{OT4}{}{}%
  \DeclareFontEncoding{TS1}{}{}%
  \DeclareFontSubstitution{OT4}{cmr}{m}{n}%
  \DeclareTextCommand{\guillemotleft}{\encodingdefault}{%
    {\fontencoding{OT4}\fontfamily{cmr}\selectfont\char174}}%
  \DeclareTextCommand{\guillemotright}{\encodingdefault}{%
    {\fontencoding{OT4}\fontfamily{cmr}\selectfont\char175}}%
  \DeclareTextCommand{\guilsinglleft}{\encodingdefault}{%
    {\fontencoding{T1}\fontfamily{cmr}\selectfont\char14}}%
  \DeclareTextCommand{\guilsinglright}{\encodingdefault}{%
    {\fontencoding{T1}\fontfamily{cmr}\selectfont\char15}}%
  \DeclareTextCommand{\textperthousand}{\encodingdefault}{%
    {\fontencoding{TS1}\fontfamily{cmr}\selectfont\char135}}%
}
\fi
\newif\ifmaintitle
\newlength\footheight
\endinput
%%
%% End of file `dtk-pdf.sty'.