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\defineframedtext
31 [horizontal]
32 [width=\textwidth,
33 frame=off,
34 strut=no,
35 height=fit,
36 align={right,lohi},
37 before=,
38 after=]
39
40\definecollector
41 [contribution]
42 [state=repeat,
43 corner={left,bottom},
44 location={right,bottom}]
45
46
47
48\startmode[demo]
49
50 \setupcollector
51 [contribution]
52 [voffset=.25\bodyfontsize]
53
54 \setupframedtexts
55 [horizontal]
56 [background=color,
57 backgroundcolor=darkgray,
58 foregroundcolor=white]
59
60\stopmode
61
62
63
64\def\StartSteps
65 {\doifnotmode{mkiv}{\checkutilities}}
66
67\def\StopSteps
68 {\resetcollector[contribution]}
69
70\long\def\StartStep#1\StopStep
71 {\setcollector
72 [contribution]
73 {\starthorizontal[none]#1\stophorizontal}
74 \flushcollector[contribution]
75 \page}
76
77
78
79\installoutputroutine\FlushStep
80 {\StartStep\unvbox\normalpagebox\StopStep}
81
82
83
84\doifnotmode{demo}{\endinput}
85
86\setupcolors[state=start] \setuppapersize[S6][S6] \setuplayout[middle]
87
88\starttext
89
90\StartSteps
91
92 \title[whow]{How Much?} \FlushStep
93 \startitem More \stopitem \FlushStep
94 \startitem And More \stopitem \FlushStep
95 \startitem And Even More \stopitem \FlushStep
96
97 \StartStep And So On \StopStep
98
99\StopSteps
100
101\stoptext
102 |