Source Browser ?

1% language=us runpath=texruns:manuals/xml
2
3\environment xml-mkiv-style
4
5\startcomponent xml-mkiv-titlepage
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] % nil the current fontclass since it may append its features
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\paperwidth+2ex\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\paperheight+2ex\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