2 %K000.ly LilyPond 1.2.16
6 \include "scarlatti-properties.ly"
7 \include "scarlatti-paper.ly"
8 %sonata-specific settings
10 \translator{\VoiceContext
13 autoBeamSettings \override #'(end 1 8 * *) = #(make-moment 3 8)
14 autoBeamSettings \override #'(end 1 16 * *) = #(make-moment 3 8)
15 autoBeamSettings \override #'(end 1 24 * *) = #(make-moment 1 8)
16 autoBeamSettings \override #'(end 1 32 * *) = #(make-moment 1 8)
21 %standard properties list
22 rh={\property Thread.noteHeadStyle=""}
23 lh={\property Thread.noteHeadStyle = #'diamond}
24 n={\property Thread.fontSize="0"}
25 sm={\property Thread.fontSize="-1"}
26 su={\property Voice.verticalDirection="1"}
27 sd={\property Voice.verticalDirection="-1"}
28 zs={\property Voice.forceHorizontalShift="0.0"}
29 ls={\property Voice.forceHorizontalShift="-0.6"}
30 sls={\property Voice.forceHorizontalShift="-0.22"}
31 rs={\property Voice.forceHorizontalShift="0.6"}
32 srs={\property Voice.forceHorizontalShift="0.22"}
33 ab={\property Voice.noAutoBeaming=##f}
34 xb={\property Voice.noAutoBeaming=##t}
39 \context PianoStaff \notes<
45 \context Voice=va< \zs
47 \context Thread=ta{ \n
48 \rh \sm[\times 2/3{a'32_"John's Scarlatti quotes" d'' fis''}\n a''16]a'8 g'~
50 g'8 _"1 Aug 2000" \times 2/3{a'16 b' cis'' d'' fis'' g''}|
58 a''32 s fis'' s d'' s a' s d' s a s \bar "||"
67 d'16 g' e'8. cis'16 \bar "||"
76 d''16 cis'' a'8. fis''16~
78 \sd fis''16 e''8 cis'' a'16~
82 \lh \sd r16 e''8 cis'' a'16~
96 gis'8_\prall f''32 d'' ais' b' e'' c'' gis' a'|
98 d''32 b' fis' gis' c'' a' dis' e' b' gis' dis' e'|
100 a'8~a'32 gis' a' b' c'' gis' a' b'|
116 \times 12/15{a''16 \sm gis''32 fis'' e'' d'' cis'' b' a' gis' fis' e' d' cis' b \n}
118 s32 e' cis' a s a' e' cis' s cis'' a' e'|
120 \lh a'32 \rh[e'' cis'' a']\lh cis'' \rh[a'' e'' cis'']\lh a' \rh[a cis' e']\bar "||"
123 gis''8 a'' gis'' a'' gis'' a''|
125 \context Thread=tb{ \n
164 \context Thread=tc{ \n
176 \context Voice=vb< \zs
178 \context Thread=td{ \n
179 \lh \sm[\times 2/3{d32 fis a}\n d'16]a8 a|
185 r32[d fis a][d' fis' a' d'']r \rh[d fis a]
187 [d'32 fis' a' d'']r32 \lh[d fis a][d' fis' a' d'']
189 s a''32 s fis'' s d'' s a' s d' s a|
214 \times 2/3{a'16 c'' b' a' c'' d'' e'' c'' b'}|
216 \ls c''8^\prall \zs b'4|
218 \times 2/3{s16 c'' b' s b' c''}dis''32 c'' b' a'|
220 b'32 gis' dis' e' d''8 cis''|
222 b'32 gis' dis' e' s4|
228 a32 d' c' b c' \rs f' \zs e' d' c' e' fis' gis'|
242 gis'8 \sd e'' \su gis'|
248 \rh \su \srs e''16 dis'' e'' dis'' e'' dis'' \lh \sd \sls e''16 dis'' e'' dis'' e'' dis'' \zs|
250 \context Thread=te{ \n
265 \context Voice=vc< \zs
267 \context Thread=tf{ \n
320 \context Thread=tg{ \n
329 \context Voice=vd< \zs
331 \context Thread=th{ \n