LSR: Update.
[lilypond.git] / input / new / creating-text-spanners.ly
blob9d46ae3b80262a86a3e259c08dd28eee8bc64f07
1 \version "2.11.62"
3 \header {
4 lsrtags = "expressive-marks, text, tweaks-and-overrides"
5 texidoc = "The @code{\\startTextSpan} and @code{\\stopTextSpan}
6 commands allow the creation of text spanners as easily as pedal
7 indications or octavations. Override some properties of the
8 @code{TextSpanner} object to modify its output."
10 doctitle = "Creating text spanners"
13 \paper { ragged-right = ##f }
15 \relative c'' {
16 \override TextSpanner #'bound-details #'left #'text = #"bla"
17 \override TextSpanner #'bound-details #'right #'text = #"blu"
18 a4 \startTextSpan
19 b4 c
20 a4 \stopTextSpan
22 \override TextSpanner #'style = #'line
23 \once \override TextSpanner #'bound-details
24 #'left #'stencil-align-dir-y = #CENTER
25 a4 \startTextSpan
26 b4 c
27 a4 \stopTextSpan
29 \override TextSpanner #'style = #'dashed-line
30 \override TextSpanner #'bound-details #'left #'text =
31 \markup { \draw-line #'(0 . 1) }
32 \override TextSpanner #'bound-details #'right #'text =
33 \markup { \draw-line #'(0 . -2) }
34 \once \override TextSpanner #'bound-details #'right #'padding = #-2
36 a4 \startTextSpan
37 b4 c
38 a4 \stopTextSpan
40 \set Staff.middleCPosition = #-13
41 \override TextSpanner #'dash-period = #10
42 \override TextSpanner #'dash-fraction = #0.5
43 \override TextSpanner #'thickness = #10
44 a4 \startTextSpan
45 b4 c
46 a4 \stopTextSpan