]> git.donarmstrong.com Git - lilypond.git/blob - input/test/title-markup.ly
Do header and footer.
[lilypond.git] / input / test / title-markup.ly
1 \version "2.1.29"
2 %{
3    \markup in titles is WIP.
4
5    only available in direct PostScript output:
6
7    export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
8    lilypond-bin -fps input/title/title-markup.ly
9
10 %}
11
12 latinTest = \markup { \latin-i "Hellö" }
13     
14 sizeTest = \markup {
15         \column <
16             { \normalsize "normalsize"
17               \hspace #5
18               \smaller "smaller"
19               \hspace #5
20               \smaller \smaller "smaller"
21               \hspace #5
22               \smaller \smaller \smaller "smaller"
23             }
24             " " 
25             { \normalsize "normalsize"
26               \hspace #5
27               \bigger "bigger"
28               \hspace #5
29               \bigger \bigger "bigger"
30               \hspace #5
31               \bigger \bigger \bigger "bigger"
32             }
33        >
34 }
35
36 spaceTest = \markup { "two space chars" }
37 \header {
38     texidoc = "Make titles using markup (WIP)."
39
40     tagline = "my tagline for v \version"
41     copyright = "copyright by me"
42     
43     %dedication = "För my dør Lily"
44     % ugh: encoding char-size
45     dedication = "For my öòóôõø so dear Lily"
46     title = "Title"
47     subtitle = "(and (the) subtitle)"
48     subsubtitle = "Sub sub title"
49     poet = "Poet"
50     composer = "Composer"
51     texttranslator = "Text Translator"
52     opus = "opus 0"
53     meter = "Meter (huh?)"
54     arranger = "Arranger"
55     instrument = "Instrument"
56     piece = "piece"
57
58     %% this overrides automatic book title
59     xxbookTitle = \markup {
60         \column <
61             %\fill-line #linewidth < \huge \bigger \bold \title >
62             \override #'(baseline-skip . 4) \column <
63                 \fill-line < \latin-i \dedication >
64                 \fill-line < \huge\bigger\bigger\bigger\bigger \bold \title >
65                 \override #'(baseline-skip . 3) \column <
66                     \fill-line < \large\bigger\bigger \bold \subtitle >
67                     \fill-line < \bigger\bigger \bold \subsubtitle >
68                 >
69                 \override #'(baseline-skip . 5) \column <
70                 " "
71                 >
72                 \override #'(baseline-skip . 2.5) \column <
73                     \fill-line < \bigger \poet
74                                  \large\bigger \caps \composer >
75                     \fill-line < \bigger \texttranslator
76                                  \bigger \opus >
77                     \fill-line < \bigger \meter
78                                  \bigger \arranger >
79                     " "
80                     \fill-line < \large\bigger \instrument >
81                     " "
82                     \fill-line < \large\bigger \caps \piece  " ">
83                 >
84             >
85         >    
86     }
87
88 %{
89      foe = \sizeTest
90      baar = \spaceTest
91 %}
92 }
93
94 \score {
95     \context Staff \notes \relative c' {
96         c2-\sizeTest c2-\spaceTest
97     }
98 }
99
100 \header {
101     %% override automatic score title
102     xxscoreTitle = \markup { "Tweetje" }
103     opus = "opus 1"
104     piece = "Second"
105 }
106
107 \score {
108     \context Staff \notes \relative c' {
109         \repeat unfold 1 { a b c d \break }
110         c1
111     }
112 }