diff options
Diffstat (limited to 'tex/bbdb-cols.tex')
-rw-r--r-- | tex/bbdb-cols.tex | 61 |
1 files changed, 34 insertions, 27 deletions
diff --git a/tex/bbdb-cols.tex b/tex/bbdb-cols.tex index b9a3d2b..4102d0f 100644 --- a/tex/bbdb-cols.tex +++ b/tex/bbdb-cols.tex @@ -1,13 +1,13 @@ -%%% multicol.tex - multiple columns per page, multiple pages per sheet. +%%% bbdb-cols.tex - multiple columns per page, multiple pages per sheet. %%% Authors: Luigi Semenzato <luigi@paris.cs.berkeley.edu> %%% Boris Goldowsky <boris@cs.rochester.edu> %%% Copyright (C) 1993 Boris Goldowsky -%%% Version: 3.0; 21Mar94 +%%% Version: 3.92; 5Jan95 %%% Commentary: %%% -%%% Put \input multicol.tex +%%% Put \input bbdb-cols.tex %%% at the beginning of your TeX file. %%% Then \twocol, \threecol, or \fourcol for multi-column output %%% or \gridformat (4x3 grid of small credit-card-sized pages) @@ -15,27 +15,31 @@ %%% In any case you will need to put \endcol at the end of the %%% document, before \bye. +%%% For instructions on using this format file with BBDB, see bbdb-print.el +%%% which should have come bundled with this file. The complete bbdb-print +%%% package is also available via anonymous ftp at: +%%% /cs.rochester.edu:/pub/u/boris/bbdb-print.tar.gz + %%% This file is part of the bbdb-print extensions to the Insidious %%% Big Brother Database, which is for use with GNU Emacs. %%% -%%% The Insidious Big Brother Database is free software; you can redistribute -%%% it and/or modify it under the terms of the GNU General Public License as -%%% published by the Free Software Foundation; either version 1, or (at your -%%% option) any later version. +%%% This program is free software; you can redistribute it and/or +%%% modify it under the terms of the GNU General Public License as +%%% published by the Free Software Foundation; either version 1, or +%%% (at your option) any later version. %%% -%%% BBDB is distributed in the hope that it will be useful, but WITHOUT ANY -%%% WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS -%%% FOR A PARTICULAR PURPOSE. See the GNU General Public License for more -%%% details. +%%% This program is distributed in the hope that it will be useful, +%%% but WITHOUT ANY WARRANTY; without even the implied warranty of +%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +%%% General Public License for more details. %%% %%% You should have received a copy of the GNU General Public License %%% along with GNU Emacs; see the file COPYING. If not, write to %%% the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. -\newdimen\multicolhsize \multicolhsize=\hsize +\newdimen\colshsize \colshsize=\hsize \newdimen\columngutter \columngutter=.2in % space between columns -\newdimen\pagegutter \pagegutter=1in % space between minipages \newbox\columnA \newbox\columnB \newbox\columnC @@ -48,16 +52,16 @@ \def\columnbox{\leftline{\pagebody}} -\def\multicolline{\hbox to \multicolhsize} +\def\colsline{\hbox to \colshsize} \newcount\NROW \NROW=3 % for grid format. are these really variables \newcount\NCOL \NCOL=4 % that can be changed? should they be set - % from lisp? + % from lisp? I'm not sure. \newcount\rowindex \newcount\colindex \def\onecol % for consistency---or maybe one could use it for switching back. { - \output={\shipout\vbox{\makeheadline\multicolline{\columnbox}\makefootline} + \output={\shipout\vbox{\makeheadline\colsline{\columnbox}\makefootline} \advancepageno \ifnum\outputpenalty>-20000 \else\dosupereject\fi} \def\endcol{} }% end onecol @@ -71,7 +75,7 @@ \global\setbox\columnA=\columnbox \global\let\column=B \else \shipout\vbox{\makeheadline - \multicolline{\box\columnA\hfil\columnbox} + \colsline{\box\columnA\hfil\columnbox} \makefootline} \advancepageno \global\let\column=A \fi @@ -96,8 +100,8 @@ \global\setbox\columnB=\columnbox \global\let\column=C \else \shipout\vbox{\makeheadline - \multicolline{\box\columnA\hfil\box\columnB - \hfil\columnbox} + \colsline{\box\columnA\hfil\box\columnB + \hfil\columnbox} \makefootline} \advancepageno \global\let\column=A \fi\fi @@ -129,8 +133,8 @@ \else \shipout\vbox { \makeheadline - \multicolline{\box\columnA\hfil\box\columnB\hfil - \box\columnC\hfil\columnbox} + \colsline{\box\columnA\hfil\box\columnB\hfil + \box\columnC\hfil\columnbox} \makefootline} \advancepageno\global\let\column=A \fi\fi\fi @@ -149,17 +153,20 @@ \def\quadformat#1#2 { - \hsize=#1 \advance\hsize by -.15in \divide\hsize 2 + \FULLHSIZE=\hsize + \FULLVSIZE=\vsize + + \colshsize=#1 \vsize=#2 - \multicolhsize=#1 - \FULLHSIZE=#1 \multiply\FULLHSIZE 2 \advance\FULLHSIZE by \pagegutter - \FULLVSIZE=#2 \multiply\FULLVSIZE 2 \advance\FULLVSIZE by \pagegutter + + \hsize=\colshsize \advance\hsize by -.15in \divide\hsize 2 + \let\lr=L \let\quadrant=A \output={\if L\lr \global\setbox\columnA=\columnbox \global\let\lr=R \else - \global\setbox\quadrantbox=\vbox{\multicolline + \global\setbox\quadrantbox=\vbox{\colsline {\box\columnA\hfil\columnbox}} \global\let\lr=L \quadrantformat \fi @@ -223,5 +230,5 @@ \ifnum\colindex=1\null\vfill\eject\fi} } % end of grid. -%%% multicol.tex ends here. +%%% bbdb-cols.tex ends here. |