%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 } % %ALTERNATIVE FOLDING GUIDES: % %For NO printed folding guide, comment out other \def\vdecor's and uncomment: %\def\vdecor{\hskip .2in plus1fil} % %For SOLID LINE folding guide, comment out other \def\vdecor's and uncomment: %\def\vdecor{\hskip .1in plus1fil \vrule width .1pt \hskip .1in plus1fil} % %For SMALL MARKS NEAR TOP AND BOTTOM as folding guide, %comment out other \def\vdecor's and uncomment: \def\vdecor{\hskip .1in plus1fil \vbox to \vsize{\hbox to .1pt{\vrule height 2pt width .1pt}\vfill \hbox to .1pt{\vrule height 2pt width .1pt}} \hskip .1in plus1fil} % %END OF ALTERNATIVES FOR FOLDING GUIDES % \def\tripleformat{\shipout\vbox{\fulline{\box\leftcolumn\vdecor \box\centercolumn\vdecor \columnbox} } \advancepageno} \def\columnbox{\leftline{\pagebody}} \def\bye{\par\vfill \supereject \if R\lcr \null\vfill\eject\fi \end}