texit-titlepage.tex /size: 945 b    last modification: 2020-07-01 14:35
1\environment texit-style
2
3\startcomponent texit-titlepage
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 % indeed, no space after \TeX !
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