]> git.donarmstrong.com Git - lilypond.git/blob - input/tutorial/sammartini.ly
''
[lilypond.git] / input / tutorial / sammartini.ly
1
2 \include "paper16.ly"
3  
4 viola = \notes \relative c'  \context Voice = viola {
5     <c4-\f-\arpeggio g' c>
6     \stemDown
7     g'8. b,16
8     s1 s2. r4
9     g
10 }
11
12 oboes = \notes \relative c'' \context Voice = oboes {
13     \stemUp
14     s4  g8. b,16 c8 r <e'8.^\p g> <f16 a>
15     \grace <e8( g> <d4 f> <c2 e>
16     \times 2/3 { <d8 \< f> <e g> <f a> }
17     <
18         { \stemUp \times 2/3 { a8 g c } \! c2 }
19         \context Voice = second { \stemDown
20             \grace {
21                 \stemDown
22                 [f,16 g]
23                 \stemBoth }
24                 f8 e e2
25             }
26     >
27
28     \grace <c,8( e> <)b8. d8.-\trill> <c16 e> | 
29     [<d ( f> < )f8. a>] <)b,8 d> r [<d16( f> <f8. )a>] <b,8 d> r  |
30     [<c16( e>  < )e8. g>] <c8 e,>
31 }
32
33 hoomPah = \repeat unfold 8 \notes
34     \transpose c' {
35         \translator Staff = down
36         \stemUp
37         c8
38         \translator Staff = up
39         \stemDown
40         c'8 }
41
42 bassvoices = \notes \relative c' {
43     c4 g8. b,16
44     \autochange Staff \context Voice \hoomPah
45     
46     \translator Staff = down
47     \stemBoth 
48     
49     [c8 c'8] r4
50     <g d'> r4
51     < { r2 <e4 c'> <c8 g'> } \\
52       { g2 ~ | g4 c8 } >
53 }
54
55 \score {
56     \context PianoStaff \notes <
57         \context Staff = up < 
58              \oboes
59              \viola
60          >
61          \context Staff = down < \time 2/2 \clef bass
62              \bassvoices
63          >
64     >
65     \midi { }
66     \paper {
67         indent = 0.0
68         linewidth = 15.0 \cm }
69 }