Source Browser ?

1% language=us runpath=texruns:manuals/spacing
2
3\environment spacing-style
4
5\startcomponent spacing-titlepage
6
7% This titlepage demonstrates once again how well designed the computer modern monospaced
8% font is, especially when we look at the consistent grayness.
9
10\startMPpage
11
12    fill Page enlarged 4mm withcolor \MPcolor{maincolor} ;
13
14    draw image (
15        for i=1 upto 20 :
16            draw bottomboundary Page shifted (0,100*log(i)) ;
17        endfor ;
18    )
19        xysized (PaperWidth-6mm,PaperHeight-6mm)
20        shifted (3mm,3mm)
21        withcolor \MPcolor{extracolor}
22        withpen pencircle scaled 1mm ;
23
24    numeric a ; a := log(1)*PaperHeight/(log(20)) ;
25    numeric b ; b := log(2)*PaperHeight/(log(20)) ;
26
27    picture p ; p := textext.lrt("\ttbf Spacing in Con\TeX t") xsized(.9PaperWidth) ;
28
29    draw p
30        shifted (.05PaperWidth,(b+a)/2 - ypart center p)
31        withcolor \MPcolor{extracolor} ;
32
33    setbounds currentpicture to Page ;
34
35\stopMPpage
36
37\page[right] \setuppagenumber[number=1]
38
39\stopcomponent
40