Fix punchmarks, closes #24

Signed-off-by: Adrian C. Hinrichs's avatarAdrian C. Hinrichs <adrian.hinrichs@rwth-aachen.de>
parent 76357df2
......@@ -71,7 +71,6 @@
\DeclareComplementaryOption{onecolumn}{twocolumn}
\DeclareBoolOption[false]{punchmark}
\DeclareStringOption[all]{hlines}
\ifxetex
\DeclareBoolOption[true]{unicodemath}
\else
......@@ -451,9 +450,21 @@
\normalsize{\@author}\\
\hwa@hline@LTWO \normalsize
\end{centering}
\ifthenelse{\boolean{hwa@punchmark}}{
\AddToShipoutPictureBG{\AtPageUpperLeft{
\put(\LenToUnit{1cm},\LenToUnit{-10cm}){\LARGE$\circ$}}}}{}
}
\ifthenelse{\boolean{hwa@punchmark}}{
\newcommand{\hwa@punchmarkRad}{3mm}
\newcommand{\hwa@punchmarkDistanceX}{12mm}
\newcommand{\hwa@punchmarkDistanceY}{40mm}
\AtBeginDocument{
% Where will the punch be?
\AddToShipoutPictureBG*{\AtPageUpperLeft{
\put(\LenToUnit{\hwa@punchmarkDistanceX-\hwa@punchmarkRad*2},\LenToUnit{-.5\paperheight-\hwa@punchmarkDistanceY-\hwa@punchmarkRad}){\tikz{\draw (0,0) circle (\hwa@punchmarkRad);}}
\put(\LenToUnit{\hwa@punchmarkDistanceX-\hwa@punchmarkRad*2},\LenToUnit{-.5\paperheight+\hwa@punchmarkDistanceY-\hwa@punchmarkRad}){\tikz{\draw (0,0) circle (\hwa@punchmarkRad);}}}}
% Punch-Positioningmark
\AddToShipoutPictureBG*{\AtPageUpperLeft{
\put(\LenToUnit{5mm},\LenToUnit{-.5\paperheight}){\tikz{\draw (0,0) -- (5mm,0);}}}}
}
}{
}
\newcommand{\hwa@problemno}{\arabic{problem}}
\newcommand{\hwa@subproblemno}{\alph{subproblem}}
......
......@@ -281,7 +281,6 @@
% If XeTeX is used, the default option for this is
% \texttt{true}, otherwise it is false.
%
%
% For the handling of the option, see \ref{QED}
% \begin{macrocode}
......@@ -1048,9 +1047,21 @@
\normalsize{\@author}\\
\hwa@hline@LTWO \normalsize
\end{centering}
\ifthenelse{\boolean{hwa@punchmark}}{
\AddToShipoutPictureBG{\AtPageUpperLeft{
\put(\LenToUnit{1cm},\LenToUnit{-10cm}){\LARGE$\circ$}}}}{}
}
\ifthenelse{\boolean{hwa@punchmark}}{
\newcommand{\hwa@punchmarkRad}{3mm}
\newcommand{\hwa@punchmarkDistanceX}{12mm}
\newcommand{\hwa@punchmarkDistanceY}{40mm}
\AtBeginDocument{
% Where will the punch be?
\AddToShipoutPictureBG*{\AtPageUpperLeft{
\put(\LenToUnit{\hwa@punchmarkDistanceX-\hwa@punchmarkRad*2},\LenToUnit{-.5\paperheight-\hwa@punchmarkDistanceY-\hwa@punchmarkRad}){\tikz{\draw (0,0) circle (\hwa@punchmarkRad);}}
\put(\LenToUnit{\hwa@punchmarkDistanceX-\hwa@punchmarkRad*2},\LenToUnit{-.5\paperheight+\hwa@punchmarkDistanceY-\hwa@punchmarkRad}){\tikz{\draw (0,0) circle (\hwa@punchmarkRad);}}}}
% Punch-Positioningmark
\AddToShipoutPictureBG*{\AtPageUpperLeft{
\put(\LenToUnit{5mm},\LenToUnit{-.5\paperheight}){\tikz{\draw (0,0) -- (5mm,0);}}}}
}
}{
}
% \end{macrocode}
% \end{macro}
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment