page-smp.mkxl /size: 1551 b    last modification: 2023-12-21 09:44
1%D \module
2%D   [       file=page-smp,  % was: core-mul, page-mul
3%D        version=1998.03.15,
4%D          title=\CONTEXT\ Page Macros,
5%D       subtitle=Simple Multi Column Output,
6%D         author=Hans Hagen,
7%D           date=\currentdate,
8%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9%C
10%C This module is part of the \CONTEXT\ macro||package and is
11%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12%C details.
13
14\unprotect
15
16\startcontextdefinitioncode
17
18%D The old one:
19
20\definemixedcolumns
21  [\v!columns]
22  % compatible with columns default :
23  [\c!balance=\v!yes,
24   \c!blank={\v!line,\v!fixed}]
25
26\permanent\protected\def\setupcolumns
27  {\setupmixedcolumns[\v!columns]}
28
29%D This will be replaced by mixed box.
30
31\permanent\tolerant\protected\def\startsimplecolumns[#S#1]%
32  {\bgroup
33   \setsimplecolumnshsize[#1]%
34   \nopenalties
35   \enforced\permanent\protected\def\column{\vfill\break}% quick hack
36   \setbox\scratchbox\vbox\bgroup
37   \forgetall} % \blank[\v!disable]
38
39\permanent\protected\def\stopsimplecolumns
40  {\removebottomthings
41   \egroup
42   \rigidcolumnbalance\scratchbox
43   \egroup}
44
45\permanent\protected\def\setsimplecolumnshsize[#S#1]%
46  {\getdummyparameters
47     [\c!width=\hsize,
48      \c!distance=1.5\bodyfontsize,
49      \c!n=2,
50      \c!lines=0,
51      #1]%
52   \edef\rigidcolumnlines
53     {\directdummyparameter\c!lines}%
54   \setrigidcolumnhsize
55     {\directdummyparameter\c!width}
56     {\directdummyparameter\c!distance}
57     {\directdummyparameter\c!n}}
58
59\stopcontextdefinitioncode
60
61\protect \endinput
62