1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21\startmodule [ present luatex ]
22
23\useMPlibrary [ lua ]
24
25\setupbodyfont
26 [ dejavu , 1 7 . 3 pt ]
27
28\startuseMPgraphic { page }
29 StartPage ;
30 luaorbitcolor : = white ;
31 fill Page withcolor ( .5 white luaplanetcolor ) ;
32 draw anchored . urt ( image ( drawluapagenumbergoround ) xsized 150 pt , urcorner Page shifted ( -15 pt , -10 pt ) ) ;
33 if RealPageNumber > 1 :
34 begingroup ;
35 save p , q ; picture p , q ;
36 p : = textext ( " \ssbf\setstrut\strut \documentvariable{mp:title} " ) xsized 150 pt ;
37 q : = textext ( " \ssbf\setstrut\strut \documentvariable{mp:subtitle} " ) xsized 150 pt ;
38 setbounds q to boundingbox ( p ) ;
39 draw anchored . lrt ( p , lrcorner Page shifted ( -15 pt , 90 pt ) ) withcolor luaplanetcolor ;
40 draw anchored . lrt ( q , lrcorner Page shifted ( -15 pt , 55 pt ) ) withcolor luaholecolor ;
41 endgroup ;
42 fi ;
43 fill Field [ Text ] [ Text ] enlarged 10 pt withcolor ( .5 white luaplanetcolor ) 1.5 ;
44 StopPage ;
45\stopuseMPgraphic
46
47\defineoverlay
48 [ page ]
49 [ \useMPgraphic { page } ]
50
51\setupbackgrounds
52 [ page ]
53 [ background = page ]
54
55\setuppapersize
56 [ S 6 ]
57
58\setuplayout
59 [ backspace = 5 0 pt ,
60 cutspace = 2 0 0 pt ,
61 topspace = 4 0 pt ,
62 bottomspace = 4 0 pt ,
63 margin = 0 pt ,
64 footer = 0 pt ,
65 header = 0 pt ,
66 width = middle ,
67 height = middle ]
68
69\setupmakeup
70 [ standard ]
71 [ top = \vfil ,
72 bottom = \vfilll ,
73 setups = standardmakeup ,
74 align = middle ,
75 color = white ]
76
77\setupcolors
78 [ textcolor = white ]
79
80\startsetups standardmakeup
81 \setupwhitespace
82 [ big ]
83\stopsetups
84
85\setupdocument
86 [ title = Title ,
87 subtitle = Subtitle ,
88 location = \currentdate ,
89 mp : title = title ,
90 mp : subtitle = subtitle ]
91
92\startsetups document : start
93
94 \startstandardmakeup [ bottom = , top = ]
95
96 \raggedcenter
97
98 \vfil \vfil
99 \dontleavehmode \scale [ width = 1 . 0 0 \textwidth ] { \ssbf \documentvariable { title } }
100 \vfil
101 \dontleavehmode \scale [ width = 0 . 7 5 \textwidth ] { \ssbf \documentvariable { subtitle } }
102 \vfil
103 \dontleavehmode \scale [ width = 0 . 6 5 \textwidth ] { \ssbf \documentvariable { location } }
104 \vfil
105 \dontleavehmode \scale [ width = 0 . 4 5 \textwidth ] { \ssbf \documentvariable { author } }
106 \vfil \vfil \vfil
107
108 \stopstandardmakeup
109
110\stopsetups
111
112\stopmodule
113
114\continueifinputfile { s present luatex . mkiv }
115
116\usemodule [ present common ]
117
118\inputpresentationfile { context 2 0 1 6 context 2 0 1 6 luatex . tex }
119 |