Docs: explain MacOS 10.3/10.4 setup

[lilypond.git] / input / lsr / center-text-below-hairpin-dynamics.ly

diff --git a/input/lsr/center-text-below-hairpin-dynamics.ly b/input/lsr/center-text-below-hairpin-dynamics.ly
index 2139970e70a5d41e325c0cd38d48512f77c8dd2b..401ca18319c93133f2d244ae045dd971dec3e56b 100644 (file)
--- a/input/lsr/center-text-below-hairpin-dynamics.ly
+++ b/input/lsr/center-text-below-hairpin-dynamics.ly
@@ -1,36 +1,46 @@
 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
 %% This file is in the public domain.
 %% 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.38"
+\version "2.11.61"

 
 \header {
   lsrtags = "expressive-marks, text"
 
 \header {
   lsrtags = "expressive-marks, text"

- texidoc = "
+
+  texidoces = "
+Este ejemplo proporciona una función para tipografiar un regulador
+con texto por debajo, como \"molto\" o \"poco\". El ejemplo
+ilustra también cómo modificar la manera en que se imprime
+normalmente un objeto, utilizando código de Scheme.
+
+"
+  doctitlees = "Centrar texto debajo de un regulador"
+
+  texidoc = "

 This example provides a function to typeset a hairpin (de)crescendo
 This example provides a function to typeset a hairpin (de)crescendo

-with some additional text below it, such as \"molto\" or \"poco\".The
+with some additional text below it, such as \"molto\" or \"poco\". The

 example also illustrates how to modify the way an object is normally
 printed, using some Scheme code.  
 example also illustrates how to modify the way an object is normally
 printed, using some Scheme code.  

-" }
-% begin verbatim
-hairpinWithCenteredText = #(define-music-function
-                          (parser location text) (markup?)
+
+"
+  doctitle = "Center text below hairpin dynamics"
+} % begin verbatim
+hairpinWithCenteredText = #(define-music-function (parser location text) (markup?)

 #{
 #{

-\override Voice.Hairpin #'stencil = #(lambda (grob)
- (ly:stencil-aligned-to
-  (ly:stencil-combine-at-edge
-   (ly:stencil-aligned-to (ly:hairpin::print grob) X CENTER)
-   Y
-   DOWN
-   (ly:stencil-aligned-to (ly:text-interface::print grob) X CENTER))
-  X LEFT))
-\override Voice.Hairpin #'text = $text
+  \override Voice.Hairpin #'stencil = #(lambda (grob)
+  (ly:stencil-aligned-to
+   (ly:stencil-combine-at-edge
+    (ly:stencil-aligned-to (ly:hairpin::print grob) X CENTER)
+    Y DOWN
+    (ly:stencil-aligned-to (ly:text-interface::print grob) X CENTER))
+   X LEFT))
+  \override Voice.Hairpin #'text = $text

 #})
 
 #})
 

+hairpinMolto = \hairpinWithCenteredText \markup { \italic molto }
+hairpinMore = \hairpinWithCenteredText \markup { \bigger moltissimo }

 
 

-hairpinMolto = \hairpinWithCenteredText \markup { \italic "molto" }
-hairpinMore  = \hairpinWithCenteredText \markup { \bigger "moltissimo" }
+\layout { ragged-right = ##f }

 
 

-\new Staff {
-   \hairpinMolto c'2\< c'2\f
-   \hairpinMore  c'2\< c'2\f
+{
+  \hairpinMolto c'2\< c'\f
+  \hairpinMore  c'2\< c'\f

 }
 }

-