s-present-simple.mkiv /size: 3040 b    last modification: 2020-07-01 14:35
1
%D \module
2
%D [ file=s-present-simple, % was: s-pre-68,
3
%D version=2009.08.28,
4
%D title=\CONTEXT\ Style File,
5
%D subtitle=Presentation Environment Simple,
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
\usemodule
[
present
-
stepwise
]
15 16
\startmodule
[
present
-
simple
]
17 18
% style
19 20
\setuppapersize
21
[
S
6
6
][
S
6
6
]
22 23
\setuplayout
24
[
height
=
middle
,
25
width
=
middle
,
26
header
=
0
pt
,
27
footer
=
0
pt
,
28
backspace
=
2
cm
,
29
topspace
=
2
cm
]
30 31
\setupinteraction
32
[
state
=
start
,
33
click
=
no
]
34 35
\definecolor
[
maincolor
][
r
=
.
4
]
36 37
\startreusableMPgraphic
{
page
}
38
StartPage
;
39
fill
Page
enlarged
5
mm
withcolor
"
maincolor
"
;
40
StopPage
;
41
\stopreusableMPgraphic
42 43
\startreusableMPgraphic
{
next
}
44
fill
ultriangle
scaled
.15
PaperWidth
withcolor
white
;
45
\stopreusableMPgraphic
46 47
\startreusableMPgraphic
{
last
}
48
fill
boundingbox
(
ultriangle
scaled
.15
PaperWidth
)
withcolor
white
;
49
\stopreusableMPgraphic
50 51
\startuniqueMPgraphic
{
bullit
}
52
fill
ultriangle
scaled
2
ExHeight
withcolor
white
;
53
\stopuniqueMPgraphic
54 55
\definelayer
56
[
extra
]
57
[
width
=
\paperwidth
,
58
height
=
\paperheight
]
59 60
\defineoverlay
61
[
page
]
62
[
\reuseMPgraphic
{
page
}
]
63 64
\setupbackgrounds
65
[
page
]
66
[
background
=
{
page
,
extra
}
]
67 68
\setupcolors
69
[
state
=
start
,
70
textcolor
=
white
]
71 72
\setuphead
73
[
chapter
]
74
[
style
=
\bfc
]
75 76
\definehead
77
[
Title
]
78
[
title
]
79 80
\definesymbol
81
[
MyBullet
]
82
[
\uniqueMPgraphic
{
bullit
}
]
83 84
\setupitemgroup
85
[
itemize
]
86
[
each
]
87
[
symbol
=
MyBullet
]
88 89
\doifelsemode
{
asintended
,
atpragma
}
{
90
\setupbodyfont
[
cambria
,
1
4
.
4
pt
]
91
}
{
92
\setupbodyfont
[
pagella
,
1
4
.
4
pt
]
93
}
94 95
% interface
96 97
\unexpanded
\def
\StartItems
98
{
\begingroup
99
\StartSteps
100
\startitemize
101
\unexpanded
\def
\StartItems
{
\startitemize
\unexpanded
\def
\StopItems
{
\stopitemize
}}}
102 103
\unexpanded
\def
\StopItems
104
{
\FlushStep
105
\stopitemize
106
\NextPageSymbol
107
\StopSteps
108
\endgroup
}
109 110
\unexpanded
\def
\Item
111
{
\unexpanded
\def
\Item
{
\FlushStep
\item
}
112
\item
}
113 114
\unexpanded
\def
\NextPageSymbol
115
{
\setlayer
116
[
extra
]
117
[
preset
=
rightbottom
,
offset
=
2
mm
]
118
{
\ifnum
\realpageno
=
\lastpage
\relax
119
\reuseMPgraphic
{
last
}
%
120
\else\ifnum
\realpageno
>
\plusone
121
\reuseMPgraphic
{
next
}
%
122
\fi\fi
123
\FlushStep
}}
124 125
\unexpanded
\def
\TitlePage
#
1
#
2
%
126
{
\startstandardmakeup
[
bottom
=
,
top
=]
127
\scale
[
width
=
\textwidth
]
{
\framed
[
align
=
flushleft
,
foregroundstyle
=
\bf
,
frame
=
off
]
{
#
1
}}
128
\vfilll
129
\hfill
\scale
[
width
=
.
5
\textwidth
]
{
\framed
[
align
=
flushright
,
foregroundstyle
=
\bf
,
frame
=
off
]
{
#
2
}}
130
\stopstandardmakeup
}
131 132
\unexpanded
\def
\StartTopic
#
1
%
133
{
\Title
{
#
1
}}
134 135
\unexpanded
\def
\StopTopic
136
{
\page
}
137 138
\startsetups
document
:
start
139
\TitlePage
140
{
\documentvariable
{
title
}}
141
{
\documentvariable
{
author
}
\\
142
\documentvariable
{
location
}}
143
\stopsetups
144 145
\stopmodule
146 147
\continueifinputfile
{
s
-
present
-
simple
.
mkiv
}
148 149
\usemodule
[
present
-
common
]
150 151
\inputpresentationfile
{
examples
/
present
-
simple
-
0
0
1
.
tex
}
152