New feature: untainted text
[opus_libre.git] / share / themes / default / paper.ily
blob6d9bc6d28da61bfd110dd19ddbe8926af8c4c17f
1 %------------------------------------------------------------------%
2 % opus_libre -- paper.ily                                          %
3 %                                                                  %
4 % (c) 2008-2011 Valentin Villenave <valentin@villenave.net>        %
5 %                                                                  %
6 %     opus_libre is a free framework for GNU LilyPond: you may     %
7 % redistribute it and/or modify it under the terms of the GNU      %
8 % General Public License as published by the Free Software         %
9 % Foundation, either version 3 of the License, or (at your option) %
10 % any later version.                                               %
11 %     This program is distributed WITHOUT ANY WARRANTY; without    %
12 % even the implied warranty of MERCHANTABILITY or FITNESS FOR A    %
13 % PARTICULAR PURPOSE.  You should have received a copy of the GNU  %
14 % General Public License along with this program (typically in the %
15 % share/doc/ directory).  If not, see http://www.gnu.org/licenses/ %
16 %                                                                  %
17 %------------------------------------------------------------------%
19 %% Titles and margins.
21 %% TODO: add copyright and stuff.
23 \paper {
24   left-margin = 12\mm % default is 10
25   right-margin = 12\mm % default is 10
26   top-margin-default = 10\mm % default is 5
27   bottom-margin = 12\mm % default is 6
29   tagline=\markup \fill-line {
30     ""
31     \indic \concat {
32       \fromproperty #'header:date
33       .
34     }
35   }
37   bookTitleMarkup = \markup {
38     \override #'(baseline-skip . 3.5)
39     \fill-page {
40       \rounded-box \column {
41         \vspace #1
42         \fill-line { \fromproperty #'header:dedication }
43         \override #'(baseline-skip . 3.5)
44         \column {
45           \huge \larger \bold
46           \fill-line {
47             \larger \fromproperty #'header:title
48           }
49           \fill-line {
50             \large \smaller \bold
51             \larger \fromproperty #'header:subtitle
52           }
53           \fill-line {
54             \smaller \bold
55             \fromproperty #'header:subsubtitle
56           }
57           \fill-line {
58 %             \fromproperty #'header:poet
59 %             { \large \bold \fromproperty #'header:instrument }
60             \fromproperty #'header:composer
61           }
62           \fill-line {
63             \fromproperty #'header:meter
64             \fromproperty #'header:arranger
65           }
66           \fill-line {
67             \fromproperty #'header:date
68           }
69           \vspace #1
70         }
71       }
72     }
73   }
75   scoreTitleMarkup = \markup {
76     \column {
77       \vspace #2
78       \on-the-fly #print-all-headers { \bookTitleMarkup \hspace #1 }
79       \fill-line {
80         \huge \bold % default was regular size and weight
81         \fromproperty #'header:piece
82     %      \fromproperty #'paper:papersizename
83       }
84       \vspace #1
85       \fill-line {
86         \fromproperty #'header:instrument
87         \fromproperty #'header:author
88       }
89     }
90   }
94 \pageBreak