]> git.donarmstrong.com Git - lilypond.git/blob - Documentation/snippets/creating-text-spanners.ly
ee587e14efe2e1d5ec33c194e5ec835a4fc2cee3
[lilypond.git] / Documentation / snippets / creating-text-spanners.ly
1 %% DO NOT EDIT this file manually; it is automatically
2 %% generated from LSR http://lsr.dsi.unimi.it
3 %% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
4 %% and then run scripts/auxiliar/makelsr.py
5 %%
6 %% This file is in the public domain.
7 \version "2.16.0"
8
9 \header {
10   lsrtags = "expressive-marks, text, tweaks-and-overrides"
11
12   texidoc = "
13 The @code{\\startTextSpan} and @code{\\stopTextSpan} commands allow the
14 creation of text spanners as easily as pedal indications or
15 octavations. Override some properties of the @code{TextSpanner} object
16 to modify its output.
17
18 "
19   doctitle = "Creating text spanners"
20 } % begin verbatim
21
22
23 \paper { ragged-right = ##f }
24
25 \relative c'' {
26   \override TextSpanner #'(bound-details left text) = #"bla"
27   \override TextSpanner #'(bound-details right text) = #"blu"
28   a4 \startTextSpan
29   b4 c
30   a4 \stopTextSpan
31
32   \override TextSpanner #'style = #'line
33   \once \override TextSpanner
34     #'(bound-details left stencil-align-dir-y) = #CENTER
35   a4 \startTextSpan
36   b4 c
37   a4 \stopTextSpan
38
39   \override TextSpanner #'style = #'dashed-line
40   \override TextSpanner #'(bound-details left text) =
41     \markup { \draw-line #'(0 . 1) }
42   \override TextSpanner #'(bound-details right text) =
43     \markup { \draw-line #'(0 . -2) }
44   \once \override TextSpanner #'(bound-details right padding) = #-2
45
46   a4 \startTextSpan
47   b4 c
48   a4 \stopTextSpan
49
50   \set Staff.middleCPosition = #-13
51   \override TextSpanner #'dash-period = #10
52   \override TextSpanner #'dash-fraction = #0.5
53   \override TextSpanner #'thickness = #10
54   a4 \startTextSpan
55   b4 c
56   a4 \stopTextSpan
57 }