summaryrefslogtreecommitdiff
path: root/tex/context/modules/mkiv/s-present-bars.mkiv
blob: 13c09ff3b80340f21d38d7495662df04704a676d (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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
%D \module
%D   [      file=s-present-bars,
%D        version=2012.07.10,
%D          title=\CONTEXT\ Style File,
%D       subtitle=Presentation Environment bars,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details.

%D Okay, this one makes me a bit ashamed as it's probably too simple and unattractive but
%D as it was used for a whole bunch of presentations it made it into a module anyway.

\startmodule[present-bars]

\setupbodyfont
  [dejavu]

\setuppapersize
  [S6]

\setuplayout
  [backspace=12pt,
   width=middle,
   height=middle,
   topspace=12pt,
   header=36pt,
   footer=36pt,
   headerdistance=12pt,
   footerdistance=12pt]

\definecolor
  [maincolor]
  [darkblue]

\startreusableMPgraphic{page}
    StartPage ;
        fill
            Page
            withcolor \MPcolor{maincolor} ;
        fill
            Field[Text][Header]
                leftenlarged BackSpace
                rightenlarged CutSpace
            withcolor darkgray ;
        fill
            Field[Text][Footer]
                leftenlarged BackSpace
                rightenlarged CutSpace
            withcolor darkgray ;
    StopPage ;
\stopreusableMPgraphic

\setupheader
  [color=maincolor,
   style=bold,
   before=\vss,
   after=\vss]

\setupheader
  [color=maincolor,
   style=bold,
   before=\vss,
   after=\vss]

\setupheadertexts
  [Breskens 2012]
  [\getvariable{document}{title}]

\setupbackgrounds
  [page]
  [background=page]

\defineoverlay
  [page]
  [\reuseMPgraphic{page}]

\setupbackgrounds
  [footer][text]
  [background=goback]

\defineoverlay
  [goback]
  [\overlaybutton{PreviousPage}]

\setuppagenumbering
  [location=]

\setupcolors
  [textcolor=white]

\setvariables
  [document]
  [maincolor=darkblue,
   set=\setups{document:setup}]

\startsetups document:setup

    \doifsomething {\getvariable{document}{color}} {

       \definecolor[maincolor][\getvariable{document}{color}]

    }

\stopsetups

\setupinteraction
  [state=start,
   click=no]

\usemodule[abr-01]
\usemodule[pre-60]

\stopmodule

\continueifinputfile{s-present-bars.mkiv}

\usemodule[present-common]

%\inputpresentationfile{context/2012/context-2012-after-the-cleanup.tex}
%\inputpresentationfile{context/2012/context-2012-the-script.tex}
%\inputpresentationfile{context/2012/context-2012-lexing-sources.tex}
%\inputpresentationfile{context/2012/context-2012-mixed-columns.tex}
%\inputpresentationfile{context/2012/context-2012-visual-debugging.tex}
\inputpresentationfile{context/2012/context-2012-xml-news.tex}