]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/expressive/creating-text-spanners.ly
Clean up input/new, second step
[lilypond.git] / input / lsr / expressive / creating-text-spanners.ly
1 %%  Do not edit this file; it is auto-generated from LSR!
2 \version "2.11.35"
3
4 \header { texidoc = "
5 The \\startTextSpan and \\stopTextSpan commands give you the ability to
6 create text spanners as easily as pedals indications or octavations.
7 Override some properties of the TextSpanner object to modify its
8 output.
9 " }
10
11 \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 \override TextSpanner #'bound-details #'left #'text = \markup { \draw-line #'(0 . 1) }
25  \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'(0 . -2) }
26
27     a \startTextSpan
28     b c 
29     a \stopTextSpan
30
31
32     \set Staff.middleCPosition = #-13
33
34     \override TextSpanner  #'dash-period = #10
35     \override TextSpanner  #'dash-fraction = #.5
36     \override TextSpanner  #'thickness = #10
37     a \startTextSpan
38     b c 
39     a \stopTextSpan
40     \set Staff.middleCPosition = #-6    
41 }
42