1
2
3
4
5
6
7
8
9
10
11
12
13
14\usemodule [ present stepwise ]
15
16\startmodule [ present simple ]
17
18
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
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 |