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