X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fadding-orchestral-cues-to-a-vocal-score.ly;h=a03e901d16899ffa01e5add125a12c3ac4b0c584;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=3b27a2c8d65082bfb6e4da60692ccc4a6f001f18;hpb=ff5b756b319b1a577e0ebcbe90b77feeef3eb1da;p=lilypond.git

diff --git a/Documentation/snippets/adding-orchestral-cues-to-a-vocal-score.ly b/Documentation/snippets/adding-orchestral-cues-to-a-vocal-score.ly
index 3b27a2c8d6..a03e901d16 100644
--- a/Documentation/snippets/adding-orchestral-cues-to-a-vocal-score.ly
+++ b/Documentation/snippets/adding-orchestral-cues-to-a-vocal-score.ly
@@ -1,63 +1,42 @@
-% Do not edit this file; it is automatically
-% generated from Documentation/snippets/new
-% This file is in the public domain.
-%% Note: this file works from version 2.13.34
-\version "2.13.36"
+%% DO NOT EDIT this file manually; it is automatically
+%% generated from LSR http://lsr.di.unimi.it
+%% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
+%% and then run scripts/auxiliar/makelsr.py
+%%
+%% This file is in the public domain.
+\version "2.19.22"
 
 \header {
-%% Translation of GIT committish: 5a7301fc350ffc3ab5bd3a2084c91666c9e9a549
+  lsrtags = "staff-notation, vocal-music"
 
-  texidoces = "
-   Este ejemplo muestra una forma de simplificar la adición de muchas
-notas guía orquestales a la reducción de piano en una partitura vocal.
-La función musical @code{\\cueWhile} toma cuatro argumentos: la música
-de la que se toma la cita, como viene definida por @code{\\addQuote},
-el nombre que insertar antes de las notas guía, y después @code{#UP} o
-@code{#DOWN} para especificar @code{\\voiceOne} con el nombre encima
-del pentagrama o bien @code{\\voiceTwo} con el nombre debajo del
-pentagrama, y finalmente la música de piano con la que las notas guía
-deben aparecer en paralelo.  El nombre del instrumento citado se
-posiciona a la izquierda de las notas guía.  Se pueden citar muchos
-pasajes como guía, pero no se pueden superponer en el tiempo entre
-ellos.
+  texidoc = "
+This shows one approach to simplify adding many orchestral cues to the
+piano reduction in a vocal score.  The music function @code{\\cueWhile}
+takes four arguments: the music from which the cue is to be taken, as
+defined by @code{\\addQuote}, the name to be inserted before the cue
+notes, then either @code{#UP} or @code{#DOWN} to specify either
+@code{\\voiceOne} with the name above the staff or @code{\\voiceTwo}
+with the name below the staff, and finally the piano music in parallel
+with which the cue notes are to appear.  The name of the cued
+instrument is positioned to the left of the cued notes. Many passages
+can be cued, but they cannot overlap each other in time.
 
-"
-
- doctitlees = "Añadir notas guía orquestales a una partitura vocal"
-
-
-
-
-  lsrtags="vocal-music, staff-notation"
-  texidoc="
-  This shows one approach to simplify adding many orchestral cues to
-the piano reduction in a vocal score.  The music function
-@code{\\cueWhile} takes four arguments: the music from which the cue
-is to be taken, as defined by @code{\\addQuote}, the name to be
-inserted before the cue notes, then either @code{#UP} or @code{#DOWN}
-to specify either @code{\\voiceOne} with the name above the staff or
-@code{\\voiceTwo} with the name below the staff, and finally the piano
-music in parallel with which the cue notes are to appear.  The name
-of the cued instrument is positioned to the left of the cued notes.
-Many passages can be cued, but they cannot overlap each other in time.
 "
   doctitle = "Adding orchestral cues to a vocal score"
 } % begin verbatim
 
-
 cueWhile =
-  #(define-music-function
-    (parser location instrument name dir music)
-    (string? string? ly:dir? ly:music?)
-    #{
-      \cueDuring $instrument #$dir {
-        \once \override CueVoice.InstrumentSwitch #'self-alignment-X = #RIGHT
-        \once \override CueVoice.InstrumentSwitch #'direction = $dir
-        \set CueVoice.instrumentCueName = $name
-        { $music }
-      }
-    #}
-  )
+#(define-music-function
+   (instrument name dir music)
+   (string? string? ly:dir? ly:music?)
+   #{
+     \cueDuring $instrument #dir {
+       \once \override TextScript.self-alignment-X = #RIGHT
+       \once \override TextScript.direction = $dir
+       <>-\markup { \tiny #name }
+       $music
+     }
+   #})
 
 flute = \relative c'' {
   \transposition c'
@@ -104,4 +83,4 @@ pianoLH = \relative c { c4 <c' e> e, <g c> }
       }
     >>
   >>
-}
\ No newline at end of file
+}