summaryrefslogtreecommitdiff
path: root/info/examples/ltt/kasten.sty
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /info/examples/ltt/kasten.sty
Initial commit
Diffstat (limited to 'info/examples/ltt/kasten.sty')
-rw-r--r--info/examples/ltt/kasten.sty50
1 files changed, 50 insertions, 0 deletions
diff --git a/info/examples/ltt/kasten.sty b/info/examples/ltt/kasten.sty
new file mode 100644
index 0000000000..b1244629c1
--- /dev/null
+++ b/info/examples/ltt/kasten.sty
@@ -0,0 +1,50 @@
+% kasten.sty
+\RequirePackage{calc}
+
+% Der Kastenzaehler.
+\newcommand{\kastenname}{Kasten}
+\newcounter{kasten}
+\renewcommand{\thekasten}{\arabic{kasten}}
+
+% Box fuer den Kasteninhalt und Rahmenparameter
+\newsavebox{\kbox}
+\newlength{\kastensep}
+ \setlength{\kastensep}{5mm}
+
+\newlength{\kastenindent}
+ \setlength{\kastenindent}{0.5cm}
+
+% der Befehl selbst
+\newenvironment{kasten}
+ {\renewcommand{\@makecaption}[2]{\textsc{##1} ##2}
+ \@float{kasten}
+ \begin{lrbox}{\kbox}
+ \begin{minipage}
+ {\columnwidth-\kastensep*2-\fboxrule-%
+ \kastenindent*2}
+ \scriptsize}
+ { \end{minipage}
+ \end{lrbox}
+ {\fboxsep=\kastensep
+ \hspace{\kastenindent}\fbox{\usebox{\kbox}}
+ }
+ \end@float}
+\newenvironment{kasten*}
+ {\renewcommand{\@makecaption}[2]{\textsc{##1} ##2}
+ \@dblfloat{kasten}
+ \begin{lrbox}{\kbox}
+ \begin{minipage}
+ {\textwidth-
+ (\kastensep+\fboxrule+\kastenindent)*2}
+ \scriptsize}
+ {\end{minipage}
+ \end{lrbox}
+ {\fboxsep=\kastensep
+ \hspace{\kastenindent}\fbox{\usebox{\kbox}}
+ }
+ \end@dblfloat}
+
+\newcommand{\fps@kasten}{htbp}
+\newcommand{\ftype@kasten}{4}
+\newcommand{\ext@kasten}{lok}
+\newcommand{\fnum@kasten}{\kastenname~\thekasten}