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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
%D \module
%D [ file=page-smp, % was: core-mul, page-mul
%D version=1998.03.15,
%D title=\CONTEXT\ Page Macros,
%D subtitle=Simple Multi Column Output,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.
\unprotect
%D The old one:
\definemixedcolumns
[\v!columns]
% compatible with columns default :
[\c!balance=\v!yes,
\c!blank={\v!line,\v!fixed}]
\unexpanded\def\setupcolumns
{\setupmixedcolumns[\v!columns]}
%D This will be replaced by mixed box.
\unexpanded\def\startsimplecolumns
{\dosingleempty\page_simple_start}
\def\page_simple_start[#1]%
{\bgroup
\setsimplecolumnshsize[#1]%
\nopenalties
\setbox\scratchbox\vbox\bgroup
\forgetall} % \blank[\v!disable]
\unexpanded\def\stopsimplecolumns
{\removebottomthings
\egroup
\rigidcolumnbalance\scratchbox
\egroup}
\unexpanded\def\setsimplecolumnshsize[#1]%
{\getdummyparameters
[\c!width=\hsize,
\c!distance=1.5\bodyfontsize,
\c!n=2,
\c!lines=0,
#1]%
\edef\rigidcolumnlines
{\directdummyparameter\c!lines}%
\setrigidcolumnhsize
{\directdummyparameter\c!width}%
{\directdummyparameter\c!distance}%
{\directdummyparameter\c!n}}
\protect \endinput
|