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
|