[verein.git] Marken!

teckids.sty

@@ -27,7 +27,7 @@
 \NeedsTeXFormat{LaTeX2e}
 \ProvidesPackage{teckids}
 
-\RequirePackage{picins}
+\RequirePackage{wrapfig}
 \RequirePackage{intcalc}
 
 \RequirePackage[utf8]{inputenc}
@@ -241,19 +241,14 @@
 }
 }
 
-\newcount\stamps
-\stamps=0
+\newcounter{stamps}
+\setcounter{stamps}{0}
+\newcounter{stamp}
 
 \newcommand{\briefmarke}[1]{
- \newcount\stampoff
- \stampoff=\intcalcAdd(#1}{\stamps}
- \newcount\page
- \page=\intcalcAdd{\intcalcMod{\stampoff}{32}}{1}
- \stampoff=\intcalcSub{\stampoff}{\intcalcMul{\page}{32}}
- \newcount\row
- \row=\intcalcMod{\stampoff}{4}
- \stampoff=\intcalcSub{\stampoff}{\intcalcMul{\row}{4}}
- \newcount\col
- \col=\stampoff
- \parpic[r]{\includegraphics[trim=\intcalcAdd{25}{\intcalcMul{\col}{40}}mm \intcalcSub{259}{\intcalcMul{33}{\row}}mm \intcalcSub{177}{\intcalcAdd{25}{\intcalcMul{\col}{40}}mm \intcalcAdd{25}{\intcalcMul{40}{\row}}mm,crop]{\page}
-}
\ No newline at end of file
+ \setcounter{stamp}{\intcalcAdd{\value{stamps}}{#1}}
+ \begin{wrapfigure}{r}{33mm}
+  \includegraphics[width=33mm]{\arabic{stamp}}
+ \end{wrapfigure}
+ \addtocounter{stamps}{1}
+}