s-present-stepper.mkiv /size: 5516 b    last modification: 2021-10-28 13:51
1
%D \module
2
%D [ file=s-present-stepper, % was s-pre-61
3
%D version=2004.03.15,
4
%D title=\CONTEXT\ Style File,
5
%D subtitle=Presentation Environment Stepper,
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
%D Optima
15 16
% \overloadmode\zerocount % for now (me)
17 18
\startmodule
[
present
-
stepper
]
19 20
\usemodule
[
present
-
stepwise
]
21 22
\doifmodeelse
{
atpragma
,
asintended
}
{
23
\usetypescriptfile
[
ghz
]
24
\definetypeface
[
mainface
]
[
ss
]
[
sans
]
[
optima
-
nova
]
[
default
]
25
}
{
26
\usetypescriptfile
[
type
-
ghz
]
27
\definetypeface
[
mainface
]
[
ss
]
[
sans
]
[
optima
-
nova
]
[
default
]
[
encoding
=
\defaultencoding
]
28
}
29 30
\setupbodyfont
[
mainface
,
ss
,
1
8
pt
]
31 32
\setupinterlinespace
33
[
line
=
3
.
2
5
ex
]
34 35
\setuppapersize
36
[
S
6
]
[
S
6
]
37 38
% \setuppapersize
39
% [SW][SW]
40 41
\setuplayout
42
[
topspace
=
1
0
pt
,
43
header
=
3
0
pt
,
44
headerdistance
=
2
0
pt
,
45
height
=
middle
,
46
footerdistance
=
2
0
pt
,
47
footer
=
0
pt
,
48
bottomdistance
=
2
0
pt
,
49
bottom
=
2
0
pt
,
50
bottomspace
=
5
0
pt
,
51
backspace
=
3
0
pt
,
52
width
=
middle
]
53 54
\setupinteraction
55
[
state
=
start
,
56
click
=
off
,
57
menu
=
on
,
58
style
=
,
59
color
=
interactioncolor
,
60
contrastcolor
=
interactioncolor
]
61 62
\setupinteractionscreen
63
[
option
=
max
]
64 65
\setupinteractionmenu
66
[
bottom
]
67
[
color
=
maincolor
,
68
contrastcolor
=
maincolor
,
69
style
=
\tfa
,
% acceptable
70
left
=
\hfill
,
71
middle
=
,
72
right
=
,
73
height
=
\bottomheight
,
74
width
=
2
\bottomheight
,
75
offset
=
overlay
,
76
frame
=
off
]
77 78
\startinteractionmenu
[
bottom
]
79
\startbut
[
firstpage
]
\symbol
[
firstpage
]
\stopbut
80
\startbut
[
previouspage
]
\symbol
[
previouspage
]
\stopbut
81
\startbut
[
InvokeStepper
]
\StartBusy
\symbol
[
PauseRendering
]
\StopBusy
\stopbut
82
\startbut
[
nextpage
]
\symbol
[
nextpage
]
\stopbut
83
\startbut
[
lastpage
]
\symbol
[
lastpage
]
\stopbut
84
\startbut
[
CloseDocument
]
\symbol
[
CloseDocument
]
\stopbut
85
\stopinteractionmenu
86 87
% maybe in colo-sjk : \setupcolor[sjk]
88 89
\definecolor
[
dark
]
[
s
=
.
4
]
90
\definecolor
[
bright
]
[
s
=
.
9
]
91 92
\definecolor
[
red
]
[
r
=
.
4
,
g
=
.
2
,
b
=
.
2
]
93
\definecolor
[
green
]
[
r
=
.
2
,
g
=
.
4
,
b
=
.
2
]
94
\definecolor
[
blue
]
[
r
=
.
2
,
g
=
.
2
,
b
=
.
4
]
95 96
\definecolor
[
cyan
]
[
r
=
.
2
,
g
=
.
4
,
b
=
.
4
]
97
\definecolor
[
magenta
]
[
r
=
.
4
,
g
=
.
2
,
b
=
.
4
]
98
\definecolor
[
yellow
]
[
r
=
.
4
,
g
=
.
4
,
b
=
.
2
]
99 100
\definecolor
[
pagecolor
]
[
dark
]
101
\definecolor
[
maincolor
]
[
bright
]
102
\definecolor
[
textcolor
]
[
red
]
103 104
\definecolor
[
interactioncolor
]
[
r
=
.
8
,
g
=
.
8
,
b
=
.
6
]
105 106
\setupcolors
107
[
textcolor
=
maincolor
]
108 109
\setupbackgrounds
110
[
page
]
111
[
background
=
page
,
112
backgroundcolor
=
textcolor
]
113 114
\setupbackgrounds
115
[
text
]
% [text]
116
[
background
=
{
comments
,
text
,
invoke
}
]
117 118
\definelayer
119
[
text
]
120
[
width
=
\textwidth
,
121
height
=
\textheight
]
122 123
\defineoverlay
124
[
comments
]
125
[
{
\setlayer
[
text
]
[
preset
=
middle
]
{
\placecomments
}
}
]
126 127
\defineoverlay
[
page
]
[
\uniqueMPgraphic
{
page-\ifcase\realpageno\or one\else plus\fi
}
]
128 129
\startuniqueMPgraphic
{
page-one
}
130
StartPage
;
131
fill
Page
132
enlarged
4
pt
133
withcolor
\MPcolor
{
pagecolor
}
;
134
fill
Field
[
Text
]
[
Text
]
135
enlarged
10
pt
136
% topenlarged (HeaderHeight+HeaderDistance)
137
leftenlarged
(
BackSpace
+4
pt
)
138
rightenlarged
(
CutSpace
+4
pt
)
139
withcolor
OverlayColor
;
140
StopPage
;
141
\stopuniqueMPgraphic
142 143
\startuniqueMPgraphic
{
page-plus
}
144
StartPage
;
145
fill
Page
146
enlarged
4
pt
147
withcolor
\MPcolor
{
pagecolor
}
;
148
fill
Field
[
Text
]
[
Text
]
149
enlarged
10
pt
150
leftenlarged
(
BackSpace
+4
pt
)
151
rightenlarged
(
CutSpace
+4
pt
)
152
withcolor
OverlayColor
;
153
StopPage
;
154
\stopuniqueMPgraphic
155 156
\startsetups
fonts
:
normalize
157
\definefont
[
HeadFont
]
[
SansBold
*
default
ht
\the
\dimexpr
0
.
7
5
0
\headerheight
\relax
]
158
\definefont
[
TitleFont
]
[
SansBold
*
default
ht
\the
\dimexpr
1
.
5
0
0
\headerheight
\relax
]
159
\definefont
[
SubTitleFont
]
[
SansBold
*
default
ht
\the
\dimexpr
0
.
3
7
5
\headerheight
\relax
]
160
\definefont
[
SubSubTitleFont
]
[
SansBold
*
default
ht
\the
\dimexpr
0
.
7
5
0
\headerheight
\relax
]
161
\stopsetups
162 163
\setuphead
164
[
chapter
]
165
[
placehead
=
empty
,
166
after
=
{
\blank
[
medium
]
}
,
167
color
=
maincolor
,
168
placenumber
=
no
,
169
style
=
\HeadFont
]
170 171
\setupheadertexts
172
[
\doiftextelse
{
\currentheadnumber
}
{
\placeheadtext
[
Topic
]
}
{
\placeheadtext
[
Nopic
]
}
]
173
[
]
174 175
\setuppagenumbering
176
[
location
=
]
177 178
\definesymbol
179
[
emdash
]
180
[
\emdash
]
181 182
\setupitemize
183
[
each
]
184
[
loose
,
serried
,
joinedup
,
broad
]
185
[
symbol
=
emdash
]
186 187
\setupalign
188
[
broad
,
right
]
189 190
\def
\doTitlePage
#
1
#
2
#
3
%
191
{
\setups
[
fonts
:
normalize
]
192
\resetsetups
[
fonts
:
normalize
]
193
\startstandardmakeup
[
headerstate
=
high
]
194
\protected
\def
\\
{
\protected
\def
\\
{
\endgraf
\quad
\quad
}
\endgraf
\quad
\ignorespaces
#
2
}
%
195
#
1
\setstrut
\setupinterlinespace
\vfil
#
3
\vfil
\vfil
196
\stopstandardmakeup
}
197 198
\unexpanded
\def
\TitlePage
{
\doTitlePage
\TitleFont
\relax
}
199
\unexpanded
\def
\SubTitlePage
{
\doTitlePage
\TitleFont
\SubTitleFont
}
200 201
\definehead
[
Topic
]
[
chapter
]
202
\definehead
[
Nopic
]
[
title
]
203 204
\unexpanded
\def
\Topics
#
1
%
205
{
\Nopic
[
topics
]
{
#
1
}
206
\startcolumns
207
\placelist
[
Topic
]
208
\stopcolumns
}
209 210
\setuplist
211
[
Topic
]
212
[
alternative
=
f
,
213
color
=
maincolor
,
214
contrastcolor
=
maincolor
,
215
criterium
=
all
]
216 217
\defineoverlay
[
topics
]
[
\overlaybutton
{
topics
}
]
218 219
\setupbackgrounds
220
[
bottom
]
[
text
]
221
[
background
=
topics
]
222 223
\stopmodule
224 225
\continueifinputfile
{
s
-
present
-
stepper
.
mkiv
}
226 227
\usemodule
[
present
-
common
]
228 229
\inputpresentationfile
{
examples
/
present
-
stepper
-
0
0
1
.
tex
}
230