]> git.donarmstrong.com Git - lilypond.git/blob - input/test/cue-notes.ly
Minor fixes.
[lilypond.git] / input / test / cue-notes.ly
1 \version "1.7.18"
2 % TODO: check to see if this example can be simplified using \small
3 % or \tiny.
4 \header { texidoc = "@cindex Cue Notes
5 Cue notes should be set in smaller type. "
6 %  Cue clefs are usually not restored explicitly. "
7 }
8
9
10 \score {
11   \notes
12    {
13        \property Staff.instrument = #"Horn in F"
14        \property Score.skipBars = ##t
15        R1*21
16     <
17         {
18             \property Staff.MultiMeasureRest \override #'staff-position = #-6
19             R1
20             \property Voice.MultiMeasureRest \revert #'staff-position
21         }
22      \context Voice = cue { s2
23        \clef tenor
24
25         %% this should probably be put into an identifier.
26        \property Staff.fontSize = #-1
27         \property Voice.Stem \override #'length = #5.5
28         \property Voice.Beam \override #'thickness = #0.384
29         \property Voice.Beam \override #'space-function =
30            #(lambda (beam mult) (* 0.8 (Beam::space_function beam mult)))
31
32         r8^"Bsn." c'8  f'8-[ f'8]
33
34 % note: the clef should be cancelled from the cue.  
35 %  this is under debate; I don't think it should.  - Graham
36
37 % if you want to cancel it in the main part, uncomment the following:
38 %       \property Staff.Clef = \turnOff
39                             
40        \property Staff.fontSize\unset
41
42        \clef treble
43      } >
44    c'8^"Horn" cis'
45    \property Staff.Clef \unset
46    eis'4 fis'4
47  }
48  \paper { raggedright = ##t}
49 }