blob: 2f36486164dca103ec3d02c682c291aaf2217af0 (
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
|
%
% This is the two column output format from Chapter 23 of the TeXbook.
%
%
\hoffset=-.5in
\newdimen\fullhsize
\fullhsize=7.5in \hsize=3.6in
\def\fullline{\hbox to \fullhsize}
%
\def\makeheadline{%
\vbox to 0pt{\vskip-22.5pt
\fullline{\vbox to8.5pt{}\the\headline}\vss}
\nointerlineskip
}
%
\def\makefootline{%
\baselineskip=2\normalbaselineskip
\fullline{\the\footline}
}
%
\let\lr=L \newbox\leftcolumn
\output={\if L\lr
\global\setbox\leftcolumn=\columnbox \global\let\lr=R
\else \doubleformat \global\let\lr=L\fi
\ifnum\outputpenalty>-20000 \else\dosupereject\fi}
\def\doubleformat{\shipout\vbox{\makeheadline
\fullline{\box\leftcolumn\hfil\vrule\hfil\columnbox}
\makefootline}
\advancepageno}
\def\columnbox{\leftline{\pagebody}}
%
\def\endtwocol{%
\vfill\supereject
\if R\lr \null\vfill\eject\fi
}
|