]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/creating-text-spanners.ly
Merge branch 'master' into nested-bookparts
[lilypond.git] / input / lsr / creating-text-spanners.ly
1 %% Do not edit this file; it is auto-generated from input/new
2 %% This file is in the public domain.
3 \version "2.11.62"
4
5 \header {
6   texidoces = "
7 Las instrucciones @code{\\startTextSpan} y @code{\\stopTextSpan}
8 permiten la creación de elementos de extensión textuales tan
9 fácilmente como indicaciones de pedal u
10 octavaciones. Sobreescribimos ciertas propiedades del objeto
11 @code{TextSpanner} para modificar su salida.
12
13 "
14   doctitlees = "Crear elementos de extensión textuales"
15
16   lsrtags = "expressive-marks, text, tweaks-and-overrides"
17   texidoc = "The @code{\\startTextSpan} and @code{\\stopTextSpan}
18 commands allow the creation of text spanners as easily as pedal
19 indications or octavations.  Override some properties of the
20 @code{TextSpanner} object to modify its output."
21
22   doctitle = "Creating text spanners"
23 } % begin verbatim
24
25
26 \paper { ragged-right = ##f }
27
28 \relative c'' {
29   \override TextSpanner #'bound-details #'left #'text = #"bla"
30   \override TextSpanner #'bound-details #'right #'text = #"blu"
31   a4 \startTextSpan
32   b4 c
33   a4 \stopTextSpan
34   
35   \override TextSpanner #'style = #'line
36   \once \override TextSpanner #'bound-details
37     #'left #'stencil-align-dir-y = #CENTER
38   a4 \startTextSpan
39   b4 c
40   a4 \stopTextSpan
41   
42   \override TextSpanner #'style = #'dashed-line
43   \override TextSpanner #'bound-details #'left #'text =
44     \markup { \draw-line #'(0 . 1) }
45   \override TextSpanner #'bound-details #'right #'text =
46     \markup { \draw-line #'(0 . -2) }
47   \once \override TextSpanner #'bound-details #'right #'padding = #-2
48
49   a4 \startTextSpan
50   b4 c
51   a4 \stopTextSpan
52   
53   \set Staff.middleCPosition = #-13
54   \override TextSpanner #'dash-period = #10
55   \override TextSpanner #'dash-fraction = #0.5
56   \override TextSpanner #'thickness = #10
57   a4 \startTextSpan
58   b4 c
59   a4 \stopTextSpan
60 }