x-setups-overview.mkiv /size: 9 Kb    last modification: 2020-07-01 14:35
1
%D \module
2
%D [ file=setups-overview, % x-set-12,
3
%D version=2016.04.05, % 2004.10.31,
4
%D remark=setupx.tex: 1998.07.20 and later,
5
%D title=\CONTEXT\ Setup Definitions,
6
%D subtitle=Macro Definitions,
7
%D author={Hans Hagen & Wolfgang Schuster},
8
%D date=\currentdate,
9
%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
10
%C
11
%C This module is part of the \CONTEXT\ macro||package and is
12
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
13
%C details.
14 15
% context --interface=en --global --result=setup-en x-setups-overview.mkiv --mode=setups:save
16
% context --interface=en --global --result=setup-mapping-en x-setups-overview.mkiv --mode=setups:mapping
17 18
% \enablemode[setups:save]
19 20
% \enablemode[setups:mapping]
21 22
\usemodule
[
setups
-
basics
]
23 24
\unprotect
25 26
\definecolor
[
TitleColor
][
r
=
.
3
7
5
,
g
=
.
1
2
5
,
b
=
.
1
2
5
]
27
\definecolor
[
TitleColor
][
r
=
.
1
2
5
,
g
=
.
3
7
5
,
b
=
.
1
2
5
]
28
\definecolor
[
TitleColor
][
r
=
.
1
2
5
,
g
=
.
1
2
5
,
b
=
.
3
7
5
]
29
\definecolor
[
TitleColor
][
r
=
.
3
7
5
,
g
=
.
3
7
5
,
b
=
.
1
2
5
]
30
\definecolor
[
TitleColor
][
r
=
.
3
7
5
,
g
=
.
1
2
5
,
b
=
.
3
7
5
]
31
\definecolor
[
TitleColor
][
r
=
.
1
2
5
,
g
=
.
3
7
5
,
b
=
.
3
7
5
]
32 33
\definecolor
[
TitleColor
][
r
=
.
2
5
,
g
=
.
2
0
,
b
=
.
1
5
]
34
\definecolor
[
TitleColor
][
r
=
.
2
5
,
g
=
.
1
5
,
b
=
.
2
0
]
35
\definecolor
[
TitleColor
][
r
=
.
2
0
,
g
=
.
1
5
,
b
=
.
2
5
]
36
\definecolor
[
TitleColor
][
r
=
.
2
0
,
g
=
.
2
5
,
b
=
.
1
5
]
37
\definecolor
[
TitleColor
][
r
=
.
1
5
,
g
=
.
2
0
,
b
=
.
2
5
]
38
\definecolor
[
TitleColor
][
r
=
.
1
5
,
g
=
.
2
5
,
b
=
.
2
0
]
39 40
\doifelsemode
{
setups
:
traditional
}
{
41 42
\startinterface
english
\loadsetups
[
cont
-
en
.
xml
]
\stopinterface
43
\startinterface
dutch
\loadsetups
[
cont
-
nl
.
xml
]
\stopinterface
44
\startinterface
german
\loadsetups
[
cont
-
de
.
xml
]
\stopinterface
45
\startinterface
french
\loadsetups
[
cont
-
fr
.
xml
]
\stopinterface
46
\startinterface
italian
\loadsetups
[
cont
-
it
.
xml
]
\stopinterface
47
\startinterface
czech
\loadsetups
[
cont
-
cs
.
xml
]
\stopinterface
48
\startinterface
romanian
\loadsetups
[
cont
-
ro
.
xml
]
\stopinterface
49 50
}
{
51 52
\loadsetups
[
i
-
context
.
xml
]
53 54
}
55 56
\startinterface
english
\definecolor
[
LocalColor
][
r
=
.
2
5
,
g
=
.
7
5
,
b
=
.
2
5
]
\stopinterface
57
\startinterface
dutch
\definecolor
[
LocalColor
][
r
=
.
7
5
,
g
=
.
2
5
,
b
=
.
2
5
]
\stopinterface
58
\startinterface
german
\definecolor
[
LocalColor
][
r
=
.
2
5
,
g
=
.
2
5
,
b
=
.
7
5
]
\stopinterface
59
\startinterface
french
\definecolor
[
LocalColor
][
r
=
.
7
5
,
g
=
.
7
5
,
b
=
.
2
5
]
\stopinterface
60
\startinterface
italian
\definecolor
[
LocalColor
][
r
=
.
2
5
,
g
=
.
7
5
,
b
=
.
7
5
]
\stopinterface
61
\startinterface
czech
\definecolor
[
LocalColor
][
r
=
.
7
5
,
g
=
.
2
5
,
b
=
.
7
5
]
\stopinterface
62
\startinterface
romanian
\definecolor
[
LocalColor
][
r
=
.
5
,
g
=
.
4
,
b
=
.
3
]
\stopinterface
63
% \definecolor[LocalColor][r=.5,g=.3,b=.4]
64
% \definecolor[LocalColor][r=.4,g=.3,b=.5]
65
% \definecolor[LocalColor][r=.4,g=.5,b=.3]
66
% \definecolor[LocalColor][r=.3,g=.4,b=.5]
67
% \definecolor[LocalColor][r=.3,g=.5,b=.4]
68 69
\startinterface
english
\definecolor
[
TitleColor
][
r
=
.
3
7
5
,
g
=
.
1
2
5
,
b
=
.
1
2
5
]
\stopinterface
70
\startinterface
dutch
\definecolor
[
TitleColor
][
r
=
.
1
2
5
,
g
=
.
3
7
5
,
b
=
.
1
2
5
]
\stopinterface
71
\startinterface
german
\definecolor
[
TitleColor
][
r
=
.
1
2
5
,
g
=
.
1
2
5
,
b
=
.
3
7
5
]
\stopinterface
72
\startinterface
french
\definecolor
[
TitleColor
][
r
=
.
3
7
5
,
g
=
.
3
7
5
,
b
=
.
1
2
5
]
\stopinterface
73
\startinterface
italian
\definecolor
[
TitleColor
][
r
=
.
3
7
5
,
g
=
.
1
2
5
,
b
=
.
3
7
5
]
\stopinterface
74
\startinterface
czech
\definecolor
[
TitleColor
][
r
=
.
1
2
5
,
g
=
.
3
7
5
,
b
=
.
3
7
5
]
\stopinterface
75
\startinterface
romanian
\definecolor
[
TitleColor
][
r
=
.
2
5
,
g
=
.
2
0
,
b
=
.
1
5
]
\stopinterface
76
% \definecolor[TitleColor][r=.25,g=.15,b=.20]
77
% \definecolor[TitleColor][r=.20,g=.15,b=.25]
78
% \definecolor[TitleColor][r=.20,g=.25,b=.15]
79
% \definecolor[TitleColor][r=.15,g=.20,b=.25]
80
% \definecolor[TitleColor][r=.15,g=.25,b=.20]
81 82
\definecolor
[
lightgray
]
[
s
=
.
9
]
83
\definecolor
[
darkgray
]
[
s
=
.
1
]
84 85
\usetypescript
[
palatino
]
86 87
\doifelsemode
{
setups
:
mapping
}
{
88
\setupbodyfont
[
palatino
,
8
pt
]
89
}
{
90
\setupbodyfont
[
palatino
,
9
pt
]
91
}
92 93
\defineoverlay
94
[
cover
]
95
[
\hbox
to
\paperwidth
{
\hss
\reuseMPgraphic
{
cover+back
}
}
]
96 97
\defineoverlay
98
[
back
]
99
[
\hbox
to
\paperwidth
{
\reuseMPgraphic
{
cover+back
}
\hss
}
]
100 101
\startreusableMPgraphic
{
cover+back
}
102
numeric
h
,
w
;
boolean
mapping
;
path
p
,
q
,
r
;
color
f
,
d
,
c
;
pair
s
;
103
h
:
=
OverlayHeight
;
w
:
=
2
*
OverlayWidth
;
104
r
:
=
unitsquare
xyscaled
(
w
,
h
)
;
105
fill
r
withcolor
resolvedcolor
(
"
lightgray
"
)
;
106
% mapping := lua.mp.processingmode("setups:mapping") ;
107
mapping
:
=
lua.mp
(
"
processingmode
"
,
"
setups:mapping
"
)
;
108
if
mapping
:
109
set_grid
(
w
,
h
,
w
/
8
,
w
/
160
)
;
110
pickup
pensquare
yscaled
(
w
/
80
)
;
111
else
:
112
set_grid
(
w
,
h
,
w
/
8
,
w
/
16
)
;
113
pickup
pencircle
scaled
(
w
/
100
)
;
114
fi
;
115
forever
:
116
s
:
=
center
r
randomized
(
w
,
h
)
;
117
if
new_on_grid
(
xpart
s
,
ypart
s
)
:
118
c
:
=
resolvedcolor
(
"
lightgray
"
)
;
119
d
:
=
.5
[
resolvedcolor
(
"
LocalColor
"
)
,
c
]
randomized
(
.5
,
.9
)
;
120
f
:
=
c
randomized
(
.5
,
.9
)
;
121
s
:
=
(
dx
,
dy
)
;
122
if
mapping
:
123
p
:
=
(
-
w
/
4
,
0
)
--
(
w
/
4
,
0
)
;
124
p
:
=
(
-
w
/
4
,
0
)
--
origin
;
125
q
:
=
origin
--
(
w
/
4
,
0
)
;
126
draw
p
shifted
s
withcolor
d
;
127
draw
q
shifted
s
withcolor
f
;
128
else
:
129
p
:
=
fullsquare
xyscaled
(
w
/
4
,
w
/
8
)
;
130
q
:
=
(
-4
w
,
ypart
ulcorner
p
)
--
.5
[
ulcorner
p
,
urcorner
p
]
--
(
4
w
,
ypart
urcorner
p
)
;
131
q
:
=
q
shifted
(
0
,
-
w
/
24
)
;
132
p
:
=
p
randomized
(
w
/
40
,
w
/
40
)
;
133
q
:
=
q
randomized
(
0
,
w
/
100
)
;
134
q
:
=
q
cutafter
(
p
cutafter
point
3
of
p
)
;
135
q
:
=
q
cutbefore
(
p
cutbefore
point
3
of
p
)
;
136
fill
p
shifted
s
withcolor
f
;
137
draw
p
shifted
s
withcolor
d
;
138
draw
q
shifted
s
withcolor
d
;
139
fi
;
140
fi
;
141
exitif
grid_full
;
142
endfor
;
143 144
setbounds
currentpicture
to
r
;
145
\stopreusableMPgraphic
146 147
\definelayout
148
[
titlepage
]
149
[
\c!backspace
=
1
cm
,
150
\c!topspace
=
1
cm
,
151
\c!width
=
\v!middle
,
152
\c!height
=
\v!middle
,
153
\c!header
=
0
pt
,
154
\c!footer
=
0
pt
]
155 156
\setuplayout
157
[
\c!backspace
=
2
cm
,
158
\c!topspace
=
1
.
5
cm
,
159
\c!bottomspace
=
0
.
5
cm
,
160
\c!header
=
0
cm
,
161
\c!footer
=
1
cm
,
162
\c!width
=
\v!middle
,
163
\c!height
=
\v!middle
]
164 165
\doifmode
{
setups
:
mapping
}
{
166
\setuplayout
167
[
\c!backspace
=
1
cm
]
168
}
169 170
\setuppagenumbering
171
[
\c!location
=
\v!footer
,
172
\c!alternative
=
\v!doublesided
]
173 174
\setupsetup
175
[
\c!criterium
=
\v!all
]
176 177
\setupframedtexts
178
[
setuptext
]
179
[
\c!before
=
\blank
,
180
\c!after
=
\blank
,
181
\c!frame
=
\v!on
,
182
\c!rulethickness
=
1
pt
,
183
\c!framecolor
=
TitleColor
]
184 185
\setupunderbar
186
[
\c!rulethickness
=
1
pt
,
187
\c!rulecolor
=
TitleColor
]
188 189
\dontcomplain
190 191
\starttext
192 193
\setupbackgrounds
194
[
\v!rightpage
]
195
[
\c!background
=
cover
]
196 197
\setuplayout
198
[
titlepage
]
199 200
\startsetups
text
:
commands
201
\startinterface
dutch
\strut
commando
'
s
\par
\stopinterface
202
\startinterface
english
\strut
commands
\par
\stopinterface
203
\startinterface
german
\strut
befehle
\par
\stopinterface
204
\startinterface
french
\strut
commandes
\par
\stopinterface
205
\startinterface
czech
\strut
p
\v
{
r
}
ikazy
\par
\stopinterface
206
\startinterface
italian
\strut
comandi
\par
\stopinterface
207
\startinterface
romanian
\strut
comenzile
\par
\stopinterface
208
\stopsetups
209 210
\startsetups
text
:
uppercase
211
\startinterface
dutch
NL
\stopinterface
212
\startinterface
english
EN
\stopinterface
213
\startinterface
german
DE
\stopinterface
214
\startinterface
french
FR
\stopinterface
215
\startinterface
czech
CS
\stopinterface
216
\startinterface
italian
IT
\stopinterface
217
\startinterface
romanian
RO
\stopinterface
218
\stopsetups
219 220
\startsetups
text
:
lowercase
221
\startinterface
dutch
\strut
nl
/
nederlands
\par
\stopinterface
222
\startinterface
english
\strut
en
/
english
\par
\stopinterface
223
\startinterface
german
\strut
de
/
deutsch
\par
\stopinterface
224
\startinterface
french
\strut
fr
/
fran
\c
{
c
}
ais
\par
\stopinterface
225
\startinterface
czech
\strut
cs
/
\v
{
c
}
esk
\'
y
\par
\stopinterface
226
\startinterface
italian
\strut
it
/
italiano
\par
\stopinterface
227
\startinterface
romanian
\strut
ro
/
rom
\^
{
a
}
n
\u
{
a
}
\par
\stopinterface
228
\stopsetups
229 230
\startmakeup
[
\v!standard
]
231
\dontcomplain
232
\setupalign
[
\v!left
]
233
\startcolor
[
TitleColor
]
234
\definedfont
[
RegularBold
at
1
0
0
pt
]
\setstrut
235
\strut
Con
\TeX
t
\par
236
\definedfont
[
RegularBold
at
5
0
pt
]
\setstrut
237
\setups
[
text
:
commands
]
238
\vfill
239
\definedfont
[
RegularBold
at
1
5
0
pt
]
\setstrut
240
\setups
[
text
:
uppercase
]
241
\stopcolor
242
\stopmakeup
243 244
\setuplayout
% needed ?
245 246
\setupbackgrounds
247
[
\v!rightpage
]
248
[
\c!background
=]
249 250
\startmakeup
[
\v!standard
]
251
\dontcomplain
252
\startcolor
[
TitleColor
]
253
\definedfont
[
RegularBold
at
1
0
0
pt
]
\setstrut
254
\setupalign
[
\v!flushright
]
255
\strut
Con
\TeX
t
\par
256
\definedfont
[
RegularBold
at
5
0
pt
]
\setstrut
257
\setups
[
text
:
commands
]
258
\stopcolor
259
\vfill
260
\start
261
\switchtobodyfont
[
1
5
pt
]
262
\setuptabulate
[
before
=
,
after
=]
263
\dontleavehmode
\hfill
\hbox
\bgroup
264
\starttabulate
[
|
l
|
l
|
]
265
\BC
language
\EQ
\setups
[
text
:
lowercase
]
\NC
\NR
266
\BC
version
\EQ
\currentdate
\NC
\NR
267
\BC
maintainer
\EQ
Wolfgang
Schuster
\NC
\NR
268
\BC
comments
\EQ
\tt
ntg
-
context
@
ntg
.
nl
\NC
\NR
269
\stoptabulate
270
\egroup
271
\stop
272
\stopmakeup
273 274
\protect
275 276
\doifelsemode
{
setups
:
mapping
}
{
277
\placeeverysetupname
278
}
{
279
\placeeverysetup
280
}
281 282
\unprotect
283 284
\page
[
\v!yes
,
\v!blank
,
\v!right
,
\v!left
]
285 286
\setuplayout
287
[
titlepage
]
288 289
\setupbackgrounds
290
[
\v!leftpage
]
291
[
\c!background
=
back
]
292 293
\startmakeup
[
\v!standard
][
\c!page
=]
294
\dontcomplain
295
\startcolor
[
TitleColor
]
296
\definedfont
[
RegularBold
at
2
4
pt
]
\setupinterlinespace
297
\setupalign
[
\v!left
]
298
\vfill
299
PRAGMA
ADE
\par
300
Ridderstraat
2
7
\par
301
8
0
6
1
GH
Hasselt
NL
\par
302
www
.
pragma
-
ade
.
com
\par
303
\stopcolor
304
\stopmakeup
305 306
\protect
307 308
\stoptext
309