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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
% language=us runpath=texruns:manuals/xml
\environment xml-mkiv-style
\startcomponent xml-mkiv-titlepage
\setuplayout[page]
\ifcase\contextlmtxmode
\usemodule[punk]
\usetypescript[punk]
\definefont[PunkSmall][demo@punk at 18pt]
\definefont[PunkLarge][demo@punk at 90pt]
\else
\useMPlibrary[punk]
\definefont[PunkSmall][Serif*punkrandom @ 18pt]
\definefont[PunkLarge][Serif*punkrandom @ 90pt]
\fi
\startstandardmakeup
\startfontclass[none] % nil the current fontclass since it may append its features
\ifcase\contextlmtxmode
\EnableRandomPunk
\else
\enablerandomvariants
\fi
\setlayerframed
[page]
[width=\paperwidth,height=\paperheight,
background=color,backgroundcolor=colorone,backgroundoffset=1ex,frame=off]
{}
\PunkSmall
\setbox\scratchbox\vbox {
\hsize\dimexpr\paperwidth+2ex\relax
\setupinterlinespace
\baselineskip 1\baselineskip plus 1pt minus 1pt
\raggedcenter
\color[colortwo]{\dorecurse{1000}{XML }}
}
\setlayer
[page]
[preset=middle]
{\vsplit\scratchbox to \dimexpr\paperheight+2ex\relax}
\PunkLarge
\setstrut
\setlayerframed
[page]
[preset=rightbottom,offset=10mm]
[foregroundcolor=colorthree,align=flushright,offset=overlay,frame=off]
{Dealing\\with XML in\\Con\TeX t MkIV}
\PunkSmall
\setstrut
\setlayerframed
[page]
[preset=righttop,offset=10mm,x=3mm,rotation=90]
[foregroundcolor=colorthree,align=flushright,offset=overlay,frame=off]
{Hans Hagen, Pragma ADE, \currentdate}
\tightlayer[page]
\stopfontclass
\stopstandardmakeup
\setuplayout
\stopcomponent
|