blob: 74c42d77ce0208840d7784af27b2eded903ce5ab (
plain)
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
|
% language=us runpath=texruns:manuals/spacing
\environment spacing-style
\startcomponent spacing-titlepage
% This titlepage demonstrates once again how well designed the computer modern monospaced
% font is, especially when we look at the consistent grayness.
\startMPpage
fill Page enlarged 4mm withcolor \MPcolor{maincolor} ;
draw image (
for i=1 upto 20 :
draw bottomboundary Page shifted (0,100*log(i)) ;
endfor ;
)
xysized (PaperWidth-6mm,PaperHeight-6mm)
shifted (3mm,3mm)
withcolor \MPcolor{extracolor}
withpen pencircle scaled 1mm ;
numeric a ; a := log(1)*PaperHeight/(log(20)) ;
numeric b ; b := log(2)*PaperHeight/(log(20)) ;
picture p ; p := textext.lrt("\ttbf Spacing in Con\TeX t") xsized(.9PaperWidth) ;
draw p
shifted (.05PaperWidth,(b+a)/2 - ypart center p)
withcolor \MPcolor{extracolor} ;
setbounds currentpicture to Page ;
\stopMPpage
\page[right] \setuppagenumber[number=1]
\stopcomponent
|
