]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/new/adding-orchestral-cues-to-a-vocal-score.ly
Run scripts/auxiliar/update-with-convert-ly.sh
[lilypond.git] / Documentation / snippets / new / adding-orchestral-cues-to-a-vocal-score.ly
index 162a9d4a28f2e1590f625615322158292f4c3262..42c4df97b052e76bc178546be7d45127d84628f3 100644 (file)
@@ -1,37 +1,38 @@
-\version "2.13.36"
+\version "2.16.0"
 
 \header {
-  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 quoted instrument is positioned to the left of the cue notes.
-Many passages can be cued, but they cannot overlap each other in time.
+  lsrtags = "staff-notation, vocal-music"
+
+  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"
 }
 
 cueWhile =
-  #(define-music-function
-    (parser location 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
-        s1*0-\markup { \tiny $name }
-        $music
-      }
-    #}
-  )
+#(define-music-function
+   (parser location 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'' { 
+flute = \relative c'' {
   \transposition c'
   s4 s4 e g
 }
@@ -76,4 +77,4 @@ pianoLH = \relative c { c4 <c' e> e, <g c> }
       }
     >>
   >>
-}
\ No newline at end of file
+}