]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/creating-text-spanners.ly
Merge branch 'master' of git://git.sv.gnu.org/lilypond
[lilypond.git] / input / lsr / creating-text-spanners.ly
1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
2 %% This file is in the public domain.
3 %% Tags: expressive-marks, text, tweaks-and-overrides
4 \version "2.11.35"
5
6 \header { texidoc = "
7 The \\startTextSpan and \\stopTextSpan commands give you the ability to
8 create text spanners as easily as pedals indications or octavations.
9 Override some properties of the TextSpanner object to modify its
10 output.
11 " }
12 % begin verbatim
13 \relative c''{
14     \override TextSpanner  #'edge-text = #'("bla" . "blu")
15     a \startTextSpan
16     b c 
17     a \stopTextSpan
18
19     \override TextSpanner  #'dash-period = #2
20     \override TextSpanner  #'dash-fraction = #0.0
21     a \startTextSpan
22     b c 
23     a \stopTextSpan
24
25     \revert TextSpanner #'style
26     \override TextSpanner  #'style = #'dashed-line \override TextSpanner #'bound-details #'left #'text = \markup { \draw-line #'(0 . 1) }
27  \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'(0 . -2) }
28
29     a \startTextSpan
30     b c 
31     a \stopTextSpan
32
33
34     \set Staff.middleCPosition = #-13
35
36     \override TextSpanner  #'dash-period = #10
37     \override TextSpanner  #'dash-fraction = #.5
38     \override TextSpanner  #'thickness = #10
39     a \startTextSpan
40     b c 
41     a \stopTextSpan
42     \set Staff.middleCPosition = #-6    
43 }
44