]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/lsr/creating-text-spanners.ly
Imported Upstream version 2.12.3
[lilypond.git] / input / lsr / creating-text-spanners.ly
index b0cb6638b093f3d7800d30ce581d803907f7292a..feb83b55dcbf5db47d496ff91fac8dfd42b7149c 100644 (file)
@@ -1,10 +1,20 @@
 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
 %% This file is in the public domain.
-\version "2.11.48"
+\version "2.12.3"
 
 \header {
   lsrtags = "expressive-marks, text, tweaks-and-overrides"
 
+  texidoces = "
+Las instrucciones @code{\\startTextSpan} y @code{\\stopTextSpan}
+permiten la creación de elementos de extensión textuales tan
+fácilmente como indicaciones de pedal u
+octavaciones. Sobreescribimos ciertas propiedades del objeto
+@code{TextSpanner} para modificar su salida.
+
+"
+  doctitlees = "Crear elementos de extensión textuales"
+
   texidoc = "
 The @code{\\startTextSpan} and @code{\\stopTextSpan} commands allow the
 creation of text spanners as easily as pedal indications or
@@ -14,32 +24,39 @@ to modify its output.
 "
   doctitle = "Creating text spanners"
 } % begin verbatim
+
+\paper { ragged-right = ##f }
+
 \relative c'' {
-  \override TextSpanner  #'edge-text = #'("bla" . "blu")
-  a \startTextSpan
-  b c
-  a \stopTextSpan
+  \override TextSpanner #'(bound-details left text) = #"bla"
+  \override TextSpanner #'(bound-details right text) = #"blu"
+  a4 \startTextSpan
+  b4 c
+  a4 \stopTextSpan
   
-  \override TextSpanner  #'dash-period = #2
-  \override TextSpanner  #'dash-fraction = #0.0
-  a \startTextSpan
-  b c
-  a \stopTextSpan
+  \override TextSpanner #'style = #'line
+  \once \override TextSpanner
+    #'(bound-details left stencil-align-dir-y) = #CENTER
+  a4 \startTextSpan
+  b4 c
+  a4 \stopTextSpan
   
-  \revert TextSpanner #'style
-  \override TextSpanner  #'style = #'dashed-line \override TextSpanner #'bound-details #'left #'text = \markup { \draw-line #'(0 . 1) }
- \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'(0 . -2) }
+  \override TextSpanner #'style = #'dashed-line
+  \override TextSpanner #'(bound-details left text) =
+    \markup { \draw-line #'(0 . 1) }
+  \override TextSpanner #'(bound-details right text) =
+    \markup { \draw-line #'(0 . -2) }
+  \once \override TextSpanner #'(bound-details right padding) = #-2
 
-  a \startTextSpan
-  b c
-  a \stopTextSpan
+  a4 \startTextSpan
+  b4 c
+  a4 \stopTextSpan
   
   \set Staff.middleCPosition = #-13
-  \override TextSpanner  #'dash-period = #10
-  \override TextSpanner  #'dash-fraction = #0.5
-  \override TextSpanner  #'thickness = #10
-  a \startTextSpan
-  b c
-  a \stopTextSpan
-  \set Staff.middleCPosition = #-6
+  \override TextSpanner #'dash-period = #10
+  \override TextSpanner #'dash-fraction = #0.5
+  \override TextSpanner #'thickness = #10
+  a4 \startTextSpan
+  b4 c
+  a4 \stopTextSpan
 }