1\environment texitstyle
2
3\startcomponent texittitlepage
4
5\startMPpage
6
7fill Page
8 withcolor "darkyellow"
9 withtransparency (1,.75) ;
10
11draw image (
12 for i=1 upto 500 :
13 draw (((1,-2) ... origin ... (-1,2)) randomized 0.2)
14 scaled 1cm
15 rotated (0 randomized 15)
16 shifted (origin randomized (PaperWidth,PaperHeight))
17 withpen pencircle yscaled 5mm xscaled 2mm rotated 45
18 withcolor "darkmagenta"
19 withtransparency (1,.5)
20 ;
21 endfor ;
22) shifted center Page ;
23
24clip currentpicture to Page ;
25
26draw textext.ulft ("\TeX it") ysized 5cm
27 shifted lrcorner Page shifted (-1cm,1cm)
28 withcolor white ;
29
30draw textext.llft ("Hans Hagen") ysized 1cm
31 rotated 90
32 shifted urcorner Page shifted (-15mm,-1cm)
33 withcolor white ;
34
35\stopMPpage
36
37\startstandardmakeup[doublesided=no,page=no]
38\stopstandardmakeup
39
40\stopcomponent
41 |