summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/plain/gustlib/infram.tex
blob: 8aae4ebae8df7674d5d8b8816ca1cd2782f09a2e (plain)
1
2
3
4
5
6
7
8
9
10
11
%% u/zycie: \infram <gr.ramki> <odl.od ramki> {tre/s/c (materia/l pionowy)}
%% usage:   \infram <thickness> <distance> {contents (vertical stuff)}
\newdimen\frth \newdimen\frdi
\long\def\infram{\vbox\bgroup \afterassignment\inframa \frth = }
\def\inframa{\afterassignment\inframb \frdi = }
\long\def\inframb#1{\hrule height\frth
               \hbox{\vrule width\frth
                     \kern\frdi \vbox{\kern\frdi#1\kern\frdi}\kern\frdi
                     \vrule width\frth}
                     \hrule height\frth\egroup}
\endinput