]> git.donarmstrong.com Git - lilypond.git/blob - input/test/cue-notes.ly
* lily/stem.cc (get_default_stem_end_position): use beam_count - 1
[lilypond.git] / input / test / cue-notes.ly
1 \version "1.5.68"
2 \header {
3
4     texidoc = "Cue notes should be set in smaller type. Cue clefs are
5 usually not restored explicitly."
6
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        \property Staff.fontSize\unset
34        \property Staff . Clef = \turnOff
35        \clef treble
36      } >
37    c'8^"Horn" cis'
38    \property Staff.Clef \unset
39    eis'4 fis'4
40  }
41  \paper { linewidth = -1 }
42 }