]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/note-line.ly
release: 1.3.129
[lilypond.git] / input / regression / note-line.ly
1 \header {
2 texidoc = "Note head lines (eg glissando)
3 run between centers of the note heads.";
4 }
5
6 \include "paper20.ly"
7 \include "norsk.ly"
8
9 su = \notes{ \translator Staff = up}
10 sd = \notes{ \translator Staff = down}
11
12 \score {
13     \context PianoStaff
14         \notes <
15         \context Staff = up   {
16             \property PianoStaff.connectArpeggios = ##t
17             \showStaffSwitch
18             \clef F;
19             c4 d \sd h a g8 f16 e32 d \su g2 \glissando a,4 \sd \break a2. \su g4 \glissando f1
20         }
21         \context Staff = down {
22             \clef F; s1*4
23         }
24     >
25 \paper {
26     linewidth = 8.0 \cm;
27 }
28 }
29