blob: 05efd121ea2c639f10f2efb864b953962f5aba13 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
% Copyright (C) 2012 Peter Breitenlohner <tex-live@tug.org>
% You may freely use, modify and/or distribute this file.
%
\input basic
\topskip0pt
\raggedbottom
\newcount\n
\dimen0=1pt
\setbox0=\hbox{%
\hskip 0.05\dimen0
\vbox{%
\vskip 0.05\dimen0
\hbox{%
\vrule width0.05\dimen0
\vbox{%
\hrule height0.05\dimen0 width0.8\dimen0
\vskip 0.8\dimen0
\hrule height0.05\dimen0
}%
\vrule width0.05\dimen0
}%
\vskip 0.05\dimen0
}%
\hskip 0.05\dimen0
}
\def\iterate{\body\expandafter\iterate\fi}
\loop
\vbox{\leaders\hbox{\leaders\copy0\hskip 0.99\hsize}\vskip 0.99\vsize}
\eject
\advance\n by1
\ifnum\n<200
\repeat
\bye
|