blob: 604101e2e7e5643effde4df74f5976d12e1d300a (
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
|
%Three-column format for landscape printing on 8.5x11 paper
%pesch 1990 december 31
%We want output .25 inch *from paper edge*; i.e. -.75in from TeX default
\hoffset=-0.8in \voffset=-0.75in
\newdimen\fullhsize
\fullhsize=10.5in \hsize=3.3in
\def\fulline{\hbox to \fullhsize}
\let\lcr=L \newbox\leftcolumn\newbox\centercolumn
\output={\if L\lcr
\global\setbox\leftcolumn=\columnbox \global\let\lcr=C
\else
\if C\lcr
\global\setbox\centercolumn=\columnbox \global\let\lcr=R
\else \tripleformat \global\let\lcr=L
\fi
\fi
% \ifnum\outputpenalty>-20000 \else\dosupereject\fi
}
\def\tripleformat{\shipout\vbox{\fulline{\box\leftcolumn\hskip .2in plus1fil
\box\centercolumn\hskip .2in plus1fil
\columnbox}
}
\advancepageno}
\def\columnbox{\leftline{\pagebody}}
\def\bye{\par\vfill
\supereject
\if R\lcr \null\vfill\eject\fi
\end}
|