autorenlisten test

This commit is contained in:
koeart 2013-07-22 11:52:30 +02:00
parent e1bc16d05f
commit 3817425527
2 changed files with 45 additions and 26 deletions

View File

@ -22,7 +22,7 @@
pdftex,
a5paper,
twoside,
twocolumn,
% twocolumn,
DIV=15,
]{scrartcl}
@ -80,9 +80,15 @@
\newcommand{\@DSabstract}{}
\newcommand{\DSabstract}[1]{\renewcommand{\@DSabstract}{#1}}
\newtoks{\@DSauthorstok}
\@DSauthorstok={Test, }%
\@DSauthorstok=\expandafter{\the\@DSauthorstok Hallo, }
\newcommand{\@addauthor}[1]{\@DSauthorstok=\expandafter{\the\@DSauthorstok #1, }}
\newcommand{\addauthor}[1]{\@addauthor{#1}}
\addauthor{Eris Discordia}
\renewcommand{\maketitle}{%
\twocolumn[
% \twocolumn[
% \renewcommand{\@runninghead}{\@runningheadtmp}
\textsf{\Huge\@title}
@ -92,7 +98,7 @@
{\bfseries\@DSabstract}
\vspace*{3mm}
]
% ]
\directlua{ruhetmp=nxruhetmp nxruhetmp=nil}
\normalsize
}
@ -109,8 +115,11 @@
\newenvironment{DSarticle}[1][]{%
\setkeys{DSarticleKeys}{#1}%
\maketitle
}{}
\@addauthor{Ein Test}
\addauthor{Zwei Test}
\maketitle
\begin{multicols}{2}
}{\end{multicols}}
\newcounter{NumOfLetters}
\setcounter{NumOfLetters}{0}
@ -170,19 +179,27 @@
% #1
%}
\newcommand{\@DSvisdp}[1]{\textbf{V.i.S.d.P }#1}
\newcommand{\@DSvisdp}[1]{\textbf{V.i.S.d.P }\\#1}
\newcommand{\DSvisdp}[1]{\@DSvisdp{#1}}
\newcommand{\@DSauthors}{\textbf{Autoren }\\\the\@DSauthorstok}
\newcommand{\DSauthors}{\@DSauthors}
%\define@key{DSimpressumKeys}{ViSdP}{%
% \DSvisdp{#1}
%}
\newcommand{\DSimpressum}{%
\begin{impressum*}[t!]
\begin{impressum*}[b!]
%minipage: pos., höhe, textpos, breite
\colorbox{lightgray}{
\begin{minipage}[t]{1\linewidth}
\begin{multicols}{2}
Die Datenschleuder Nr. \@volume\\
\lipsum[1]
\DSvisdp{Eris Discordia}
\large \textbf{Die Datenschleuder Nr. \@volume}\\
\normalsize
\DSvisdp{Eris Discordia}\\
\@DSauthors
\end{multicols}
\end{minipage}
}
\end{impressum*}
}

View File

@ -53,14 +53,16 @@
\DSimpressum
% Article 1 (with old-fashioned commands)
\title{Krasser Artikel!!k!}
\author{Mr. Ultracool}
\runninghead{Korrekt}
\DSabstract{%
\begin{DSarticle}[
title={Krasser Artikel!!k!},
author=Mr. Ultracool,
runninghead=Korrekt,
DSabstract={%
blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb
}
\maketitle
]
\lipsum[30-41]
\end{DSarticle}
\begin{DSarticle}[%
title=Kleiner kurzer Artikel,
@ -70,21 +72,20 @@
Dies ist wirklich ein kurzer Artikel. Ich möchte den Impressumsfloat testen. Punkt. Mehr nicht. Aber vielleicht werden das ja zwei Spalten? Nun, ich bin gespannt.
\end{DSarticle}
Dies ist Text, der hier nur zum Test steht.
\DSimpressum
% Article 1 (with old-fashioned commands)
\title{Noch was tolles}
\author{Mr. Wahnsinn}
\runninghead{Tolltoll}
\DSabstract{%
blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb
}
\maketitle
\makeatletter
\makeatother
\lipsum[1-3]
%%%\title{Noch was tolles}
%%%\author{Mr. Wahnsinn}
%%%\runninghead{Tolltoll}
%%%\DSabstract{%
%%% blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb blablabblablb
%%%}
%%%\maketitle
%%%\makeatletter
%%% \makeatother
%%%\lipsum[1-3]
% Article 2 (with DSarticle environment)
\begin{DSarticle}[%
@ -95,6 +96,7 @@ Dies ist Text, der hier nur zum Test steht.
abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract abstract
}
]
\addauthor{Koeart}
\lipsum[1-3]
\end{DSarticle}