]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/quote-cue-during.ly
Fix #789.
[lilypond.git] / input / regression / quote-cue-during.ly
1 \header {
2
3
4   texidoc = " The @code{cueDuring} form of quotation will set stem
5 directions on both quoted and main voice, and deliver the quoted voice
6 in the @code{cue} @code{Voice}. The music function @code{\killCues}
7 can remove all cue notes.
8
9 Spanners run to the end of a cue section, and are not started on the
10 last note."
11
12 }
13
14 \version "2.12.0"
15 \layout {
16   ragged-right = ##t
17 }
18
19 quoteMe = \relative c' { fis4 r16  a8.-> b4(-\ff~  b16 c8.  b) }
20
21 \addQuote quoteMe \quoteMe 
22
23 original = \relative c'' {
24   c8 d
25   \cueDuring #"quoteMe"  #1 { r2 }
26   es8 gis8
27   \cueDuring #"quoteMe"  #1 { r4 }
28 }
29
30 cueStaff =  \relative c'' <<
31   \set Staff.quotedEventTypes = #'(note-event articulation-event)
32   \original
33 >>
34
35 <<
36   \new Staff {
37     \set Staff.instrumentName = "quoteMe"
38     \quoteMe
39   }
40   \new Staff {
41     \set Staff.instrumentName = "orig (killCues)"
42     \killCues \original
43   }
44   \new Staff {
45     \set Staff.instrumentName = "orig+quote"    
46     \cueStaff
47   }
48 >>