]> git.donarmstrong.com Git - lilypond.git/blob - input/test/text-spanner.ly
* input/test/[t-v]*.ly: finish rewriting texidocs.
[lilypond.git] / input / test / text-spanner.ly
1
2 \version "2.1.26"
3
4 \header { texidoc = "@cindex text spanner
5 Text spanners can be used in the similar manner than markings for pedals
6 or octavation.
7 "
8 }
9
10 \score{
11     \notes\relative c''{
12         \override TextSpanner  #'edge-text = #'("bla" . "blu")
13         a \startTextSpan
14         b c 
15         a \stopTextSpan
16
17         \override TextSpanner  #'dash-period = #2
18         \override TextSpanner  #'dash-fraction = #0.0
19         a \startTextSpan
20         b c 
21         a \stopTextSpan
22
23         \revert TextSpanner #'style
24         \override TextSpanner  #'style = #'dashed-line
25         \override TextSpanner  #'edge-height = #'(1 . -2)
26         a \startTextSpan
27         b c 
28         a \stopTextSpan
29
30
31         \set Staff.centralCPosition = #-13
32
33         \override TextSpanner  #'dash-period = #10
34         \override TextSpanner  #'dash-fraction = #.5
35         \override TextSpanner  #'thickness = #10
36         a \startTextSpan
37         b c 
38         a \stopTextSpan
39         \set Staff.centralCPosition = #-6       
40     }
41         \paper{ raggedright = ##t}
42 }
43