1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18\usemodule[pre60]
19\usemodule[abr01]
20
21\definepapersize
22 [wide]
23 [width=960pt,
24 height=600pt]
25
26\setuppapersize
27 [wide]
28 [wide]
29
30\setuplayout
31 [topspace=20pt,
32 bottomspace=20pt,
33 header=0pt,
34 footer=0pt,
35 backspace=20pt,
36 height=middle,
37 rightmargin=0pt,
38 rightedge=\dimexpr220pt40pt\relax,
39 rightedgedistance=40pt,
40 leftedge=0pt,
41 leftmargin=0pt,
42 cutspace=220pt,
43 width=\dimexpr960pt40pt220pt\relax]
44
45\definebodyfontenvironment
46 [20pt]
47
48\definefontfeature[default][default][mode=node,script=latn]
49
50\usetypescript
51 [cambria]
52
53\setupbodyfont
54 [cambria,20pt] \bf
55
56\setupwhitespace
57 [big]
58
59\setupcolors
60 [state=start]
61
62\definecolor[pagecolor][s=.25]
63\definecolor[edgecolor][b=.50,g=.75,r=.75]
64
65\setupinteraction
66 [state=start,
67 click=no,
68 color=,
69 contrastcolor=]
70
71\defineoverlay[pagegraphic][\reuseMPgraphic{pagegraphic}]
72
73\startuseMPgraphic{pagegraphic}
74 StartPage ;
75 fill Page enlarged 10pt withcolor \MPcolor{pagecolor} ;
76 fill Page enlarged 10pt leftenlarged (CutSpace bbwidth(Page) 10pt) withcolor \MPcolor{edgecolor} ;
77
78
79 StopPage ;
80\stopuseMPgraphic
81
82\setupbackgrounds
83 [page]
84 [background=pagegraphic]
85
86\setupbackgrounds
87 [text]
88 [rightedge]
89 [background=edge]
90
91\definelayer
92 [edge]
93 [width=\rightedgewidth,
94 state=repeat]
95
96\setuphead
97 [chapter]
98 [style=\bfc,
99 color=edgecolor]
100
101\setupcolors
102 [textcolor=edgecolor]
103
104\newcounter\MyCounter
105
106\def\StartRemark#1
107 {\doglobal\increment\MyCounter
108 \title[topic:\MyCounter]{#1}
109 \setlayer[edge][preset=middletop,y=\thelayerheight{edge}]{\strut\color[pagecolor]{\bf\goto{#1}[topic:\MyCounter]}}
110 \StartSteps}
111
112\def\StopRemark
113 {\StopSteps
114 \page}
115
116\def\StartRemark#1
117 {\doglobal\increment\MyCounter
118 \title[topic:\MyCounter]{#1}
119 \StartSteps
120 \def\StopRemark
121 {\StopSteps
122 \page
123 \setlayer[edge][preset=middletop,y=\thelayerheight{edge}]{\strut\color[pagecolor]{\bf\goto{#1}[topic:\MyCounter]}}}}
124
125\def\StartTitlePage
126 {\startstandardmakeup[top=\vss,bottom=\vss\vss]
127 \definedfont[Bold sa 4]
128 \raggedcenter
129 \setupinterlinespace
130 \baselineskip=1\baselineskip plus 1fil minus 1fil\relax}
131
132\def\StopTitlePage
133 {\stopstandardmakeup}
134
135\doifnotmode{demo} {\endinput}
136
137\starttext
138
139\StartTitlePage x\\y\\z \StopTitlePage
140
141\StartRemark{a}
142 a \FlushStep
143 a \FlushStep
144\StopRemark
145
146\StartRemark{b}
147 b \FlushStep
148 b \FlushStep
149 b \FlushStep
150\StopRemark
151
152\StartRemark{c}
153 c \FlushStep
154 c \FlushStep
155 c \FlushStep
156 c \FlushStep
157\StopRemark
158
159\stoptext
160
161
162 |