]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/markup-note.ly
Merge branch 'translation' into staging
[lilypond.git] / input / regression / markup-note.ly
1 \header {
2
3   texidoc = "The note markup function may be used to make metronome
4  markings. It works for a variety of flag, dot and duration settings."
5 }
6 \version "2.17.12"
7
8 mrkp =
9 \markup {
10    \note #"1" #1
11    \note #"2" #1
12    \note #"4" #1
13    \note #"8" #1
14    \note #"16" #1
15    \note #"32" #1
16    \note #"64" #1
17
18    \note #"1" #-1
19    \note #"2" #-1
20    \note #"4" #-1
21    \note #"8" #-1
22    \note #"16" #-1
23    \note #"32" #-1
24    \note #"64" #-1
25
26    \note #"1." #-1
27    \note #"2." #-1
28    \note #"4." #-1
29    \note #"8." #-1
30    \note #"16." #-1
31    \note #"32." #-1
32    \note #"64." #-1
33
34    \note #"1." #1
35    \note #"2." #1
36    \note #"4." #1
37    \note #"8." #1
38    \note #"16." #1
39    \note #"32." #1
40    \note #"64." #1
41
42    \override #'(style . cross)
43    { \note-by-number #2 #1 #1
44      \note-by-number #2 #1 #-1
45    }
46    \override #'(style . triangle)
47    { \note-by-number #2 #1 #1
48      \note-by-number #2 #1 #-1
49    }
50 }
51
52 \score {
53   \relative c''
54   {
55     c4^\markup {
56             \column {
57                     \mrkp
58                     \override #'(style . mensural) \mrkp
59                     \override #'(flag-style . modern-straight-flag) \mrkp
60                     \override #'(flag-style . old-straight-flag) \mrkp
61                     \override #'(flag-style . flat-flag) \mrkp
62             }
63     }
64     \override NoteHead.style = #'triangle
65     c4 a
66   }
67   \layout {
68     \context {
69       \Score
70       \override PaperColumn.keep-inside-line = ##f
71     }
72   }
73 }