% This macro source file is from the four volume series % "TeX in Practice" by Stephan von Bechtolsheim, published % 1993 by Springer-Verlag, New York. % Copyright 1993 Stephan von Bechtolsheim. % No warranty or liability is assumed. % This macro may be copied freely if no fees other than % media cost or shipping charges are charged and as long % as this copyright and the following source code itself % is not changed. Please see the series for further information. % % Version: 1.0 % Date: May 1, 1993 % % % This source code is documented in 36.2.3, p. IV-139. % Original source in file "o3.TEX", starting line 321. \wlog{L: "ola-comm.tip" ["o3.TEX," l. 321, p. IV-139]}% % This file DOES NOT belong to format "texip." \InputD{box-mac.tip} \topskip = 10pt \vsize = 6.0in \newdimen\LeftPageShift \LeftPageShift = 0.25in \newdimen\RightPageShift \RightPageShift= -0.25in \hsize = 24pc \newdimen\PageWidth \PageWidth = 29pc \newdimen\DiffWidth \DiffWidth = \PageWidth \advance\DiffWidth by -\hsize \def\PageLine{\hbox to \PageWidth} \def\SetHeader #1{ \def\RightHeader {\PageLine{\it\hfil #1}} \def\LeftHeader {\PageLine{\it #1\hfil}} } \SetHeader{Some Header} \def\SetFooter #1{ \def\RightFooter {% \PageLine{% \hfil \it #1% \hskip 0.5in \bf \the\pageno }% } \def\LeftFooter {% \PageLine{% \bf \the\pageno \hskip 0.5in \it #1% \hfil }% } } \SetFooter{Some Footer} \newinsert\FigureIns \count\FigureIns = 1000 \dimen\FigureIns = \vsize \skip\FigureIns = 12pt \def\PrepareFigureBoxes #1#2#3{% \setbox 0 = \VboxR to #2{ \vfil \centerline{\tt Figure~#1} \vfil } \setbox 1 = \VboxR{ \hsize = \DiffWidth \raggedright \noindent \strut #3 } }