1 %K000.ly LilyPond 1.2.16
5 \include "scarlatti-properties.ly"
6 \include "scarlatti-paper.ly"
7 %sonata-specific settings
9 \translator{\VoiceContext
12 autoBeamSettings \override #'(end 1 8 * *) = #(make-moment 3 8)
13 autoBeamSettings \override #'(end 1 16 * *) = #(make-moment 3 8)
14 autoBeamSettings \override #'(end 1 24 * *) = #(make-moment 1 8)
15 autoBeamSettings \override #'(end 1 32 * *) = #(make-moment 1 8)
20 %standard properties list
21 rh={\property Thread.noteHeadStyle=""}
22 lh={\property Thread.noteHeadStyle="diamond"}
23 n={\property Thread.fontSize="0"}
24 sm={\property Thread.fontSize="-1"}
25 su={\property Voice.verticalDirection="1"}
26 sd={\property Voice.verticalDirection="-1"}
27 zs={\property Voice.forceHorizontalShift="0.0"}
28 ls={\property Voice.forceHorizontalShift="-0.6"}
29 sls={\property Voice.forceHorizontalShift="-0.22"}
30 rs={\property Voice.forceHorizontalShift="0.6"}
31 srs={\property Voice.forceHorizontalShift="0.22"}
32 ab={\property Voice.noAutoBeaming=##f}
33 xb={\property Voice.noAutoBeaming=##t}
38 \context PianoStaff \notes<
44 \context Voice=va< \zs
46 \context Thread=ta{ \n
47 \rh \sm[\times 2/3{a'32_"John's Scarlatti quotes" d'' fis''}\n a''16]a'8 g'~
49 g'8 _"1 Aug 2000" \times 2/3{a'16 b' cis'' d'' fis'' g''}|
57 a''32 s fis'' s d'' s a' s d' s a s \bar "||";
66 d'16 g' e'8. cis'16 \bar "||";
75 d''16 cis'' a'8. fis''16~
77 \sd fis''16 e''8 cis'' a'16~
81 \lh \sd r16 e''8 cis'' a'16~
95 gis'8_\prall f''32 d'' ais' b' e'' c'' gis' a'|
97 d''32 b' fis' gis' c'' a' dis' e' b' gis' dis' e'|
99 a'8~a'32 gis' a' b' c'' gis' a' b'|
115 \times 12/15{a''16 \sm gis''32 fis'' e'' d'' cis'' b' a' gis' fis' e' d' cis' b \n}
117 s32 e' cis' a s a' e' cis' s cis'' a' e'|
119 \lh a'32 \rh[e'' cis'' a']\lh cis'' \rh[a'' e'' cis'']\lh a' \rh[a cis' e']\bar "||";
122 gis''8 a'' gis'' a'' gis'' a''|
124 \context Thread=tb{ \n
163 \context Thread=tc{ \n
175 \context Voice=vb< \zs
177 \context Thread=td{ \n
178 \lh \sm[\times 2/3{d32 fis a}\n d'16]a8 a|
184 r32[d fis a][d' fis' a' d'']r \rh[d fis a]
186 [d'32 fis' a' d'']r32 \lh[d fis a][d' fis' a' d'']
188 s a''32 s fis'' s d'' s a' s d' s a|
213 \times 2/3{a'16 c'' b' a' c'' d'' e'' c'' b'}|
215 \ls c''8^\prall \zs b'4|
217 \times 2/3{s16 c'' b' s b' c''}dis''32 c'' b' a'|
219 b'32 gis' dis' e' d''8 cis''|
221 b'32 gis' dis' e' s4|
227 a32 d' c' b c' \rs f' \zs e' d' c' e' fis' gis'|
241 gis'8 \sd e'' \su gis'|
247 \rh \su \srs e''16 dis'' e'' dis'' e'' dis'' \lh \sd \sls e''16 dis'' e'' dis'' e'' dis'' \zs|
249 \context Thread=te{ \n
264 \context Voice=vc< \zs
266 \context Thread=tf{ \n
319 \context Thread=tg{ \n
328 \context Voice=vd< \zs
330 \context Thread=th{ \n