1
2
3\environment xmlmkivstyle
4
5\startcomponent xmlmkivtitlepage
6
7\setuplayout[page]
8
9\ifcase\contextlmtxmode
10
11 \usemodule[punk]
12
13 \usetypescript[punk]
14
15 \definefont[PunkSmall][demo@punk at 18pt]
16 \definefont[PunkLarge][demo@punk at 90pt]
17
18\else
19
20 \useMPlibrary[punk]
21
22 \definefont[PunkSmall][Serif*punkrandom @ 18pt]
23 \definefont[PunkLarge][Serif*punkrandom @ 90pt]
24
25\fi
26
27\startstandardmakeup
28 \startfontclass[none]
29 \ifcase\contextlmtxmode
30 \EnableRandomPunk
31 \else
32 \enablerandomvariants
33 \fi
34 \setlayerframed
35 [page]
36 [width=\paperwidth,height=\paperheight,
37 background=color,backgroundcolor=colorone,backgroundoffset=1ex,frame=off]
38 {}
39 \PunkSmall
40 \setbox\scratchbox\vbox {
41 \hsize\dimexpr\paperwidth2ex\relax
42 \setupinterlinespace
43 \baselineskip 1\baselineskip plus 1pt minus 1pt
44 \raggedcenter
45 \color[colortwo]{\dorecurse{1000}{XML }}
46 }
47 \setlayer
48 [page]
49 [preset=middle]
50 {\vsplit\scratchbox to \dimexpr\paperheight2ex\relax}
51 \PunkLarge
52 \setstrut
53 \setlayerframed
54 [page]
55 [preset=rightbottom,offset=10mm]
56 [foregroundcolor=colorthree,align=flushright,offset=overlay,frame=off]
57 {Dealing\\with XML in\\Con\TeX t MkIV}
58 \PunkSmall
59 \setstrut
60 \setlayerframed
61 [page]
62 [preset=righttop,offset=10mm,x=3mm,rotation=90]
63 [foregroundcolor=colorthree,align=flushright,offset=overlay,frame=off]
64 {Hans Hagen, Pragma ADE, \currentdate}
65 \tightlayer[page]
66 \stopfontclass
67\stopstandardmakeup
68
69\setuplayout
70
71\stopcomponent
72 |