% 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
