]> git.donarmstrong.com Git - lilypond.git/blob - input/test/text-spanner.ly
0f645c5eddbf79909e51bcaa500b761046227fb7
[lilypond.git] / input / test / text-spanner.ly
1
2 \version "2.1.7"
3 % TODO: check about other ottava functions.
4
5 \header { texidoc = "@cindex text spanner
6 You can make LilyPond print text spanners. "
7 }
8
9 \score{
10     \notes\relative c''{
11         \property Voice.TextSpanner \override #'edge-text = #'("bla" . "blu")
12         a \startTextSpan
13         b c 
14         a \stopTextSpan
15
16         \property Voice.TextSpanner \revert #'style
17         \property Voice.TextSpanner \override #'style = #'dotted-line
18         a \startTextSpan
19         b c 
20         a \stopTextSpan
21
22         \property Voice.TextSpanner \revert #'style
23         \property Voice.TextSpanner \override #'style = #'dashed-line
24         \property Voice.TextSpanner \override #'edge-height = #'(1 . -2)
25         a \startTextSpan
26         b c 
27         a \stopTextSpan
28
29
30         \property Staff.centralCPosition = #-13
31
32         \property Voice.TextSpanner \override #'dash-period = #10
33         \property Voice.TextSpanner \override #'dash-fraction = #.5
34         \property Voice.TextSpanner \override #'thickness = #10
35         a \startTextSpan
36         b c 
37         a \stopTextSpan
38         \property Staff.centralCPosition = #-6  
39     }
40         \paper{ raggedright = ##t}
41 }
42