mutopia/D.Scarlatti/sonata-k3-l378.ly

   1  \header {
   2  composer =  "Domenico Scarlatti";
   3  title="Sonata K.3";
   4  opus="L.378";
   5  movement="Presto";
   6  copyright = "General Public License";
   7 }
   8
   9 tolower = \translator Staff = lower
  10 toupper = \translator Staff = upper
  11
  12 RHtoL = { \tolower \stemdown }
  13 RHtoR = { \toupper \stemup }
  14 LHtoR = { \toupper \stemup }
  15 LHtoL = { \tolower \stemdown }
  16
  17 \score {
  18  \notes
  19    \context PianoStaff  <
  20     \context Staff = upper <\context Voice = mainV <{
  21     % 1
  22         \stemup s1
  23         s4 [e'16 d' c' b] a4 s |
  24         s4 a' e' c'' |
  25         b'4 a'2 gis'4 |
  26         s4 c'' a' e'' |
  27     % 5
  28         d''4 c''2 b'4 |
  29         s4 c'' g' f'' |
  30         e''4 d''2 cis''4 |
  31         s4 d'' a' g'' |
  32         fis''4 e''2 dis''4 |
  33         % 10
  34         [e''8 d''] c''2 b'4~b'
  35         a'2 g'4~g'
  36         fis'2 e'4~e'
  37         d'2 c'4~c'
  38         b2 a4 |
  39         % 15
  40         s4 c' dis' fis' |
  41         a'4 c'' dis'' fis'' |
  42         a''4 c'''2 [b''8 a''] |
  43         g''4 f'' e'' d''^\fermata |
  44         s1
  45         % 20
  46         s
  47         s4 \RHtoL a, b, cis |
  48         d4 e f2 |
  49         \RHtoR f4 aes b d' |
  50         f'4 aes' b' d'' |
  51         % 25
  52         f''4 aes''2 [g''8 f''] |
  53         ees''4 d'' c'' d'' |
  54         g'4 b' c'' \RHtoL f |
  55         e4 e'2 \RHtoR d''4 |
  56         e'4 b' c'' \RHtoL b, |
  57         % 30
  58         a,4 a \RHtoR c'' d'' |
  59         a4 b c' d' |
  60         e'4 f' g' a' |
  61         b'4 [a'8 g'] g''4 c'' |
  62         c''4~[c''16 b' c'' d''] d''4.^\prall c''8 |
  63         % 35
  64         c''4 c''' b'' bes''
  65         a'' aes''2 g''4~g''
  66         f''2 dis''4~dis''
  67         d''2 c''4~c''
  68         b'4 c'' d'' |
  69         % 40
  70         e'4 f' g' a' |
  71         b'4 [a'8 g'] g''4 c'' |
  72         c''4~[c''16 b' c'' d''] d''4.^\prall c''8 |
  73         c''4 [g''16 f'' e'' d''] c''4 s |
  74         s4 [g16 f e d] c4 s |
  75         s4 c'' g'
  76         <
  77           { f''4 e'' c'' d'' b' c''2. }
  78           \context Voice = anotherV { a'4 g'2 f'2 e'2. }
  79         > s4 |
  80
  81
  82         s4 [g'16 f' e' d'] c'4 s |
  83         s4 c'' g' ees'' ~
  84         < { ees'' d''2 c''4 }
  85           \context Voice = anotherV { \stemdown g'2 fis'2 }
  86         >
  87           |
  88         bes'4 s2 [d'16 c' bes a] |
  89         g4 s2 <bes'4 g''>  |
  90         <a' g''> <d'' f''> <d'' f''>  <cis'' e''> |
  91         d''4 [a''16 g'' f'' e''] d''4 s |
  92         s4 [a16 g f e] d4 s |
  93         s4 d'' a' f'' |
  94         <
  95            { f''4 e'' e'' d'' }
  96            \context Voice = anotherV { \stemdown bes'2 bes'2 }
  97         > |
  98         < a'4 cis''> s2. |
  99         \RHtoL s4 a' gis' g' |
 100         fis'4 f' e'2 |
 101         dis'4 d' cis' c' |
 102         b4 bes a2 |
 103         gis4 g fis f |
 104         \RHtoR s4 e gis b |
 105         d'4 f' gis' b' |
 106         d''4 f''2 e''8 d'' |
 107         c''4 b' a' g'^\fermata |
 108         s1 s
 109         \RHtoL s4 d e fis |
 110         g4 a bes2 |
 111         \RHtoR e'4 g' bes' e'' |
 112         bes''2. [a''8 gis''] |
 113         a''4 g''2 [f''8 e''] |
 114         f''4 e''2 [d''8 cis''] |
 115         d''4 c''2 [b'8 a'] |
 116         gis'4 gis'' a'' \RHtoL d |
 117         c4 c'2 \RHtoR b''4 |
 118         c''4 gis'' a'' \RHtoL g, |
 119         f,4 f2 \RHtoR b''4 |
 120         f'4 gis' a' b' |
 121         c''4 d'' e'' f'' |
 122         gis'4 [a'8 b'] e'4 d'' |
 123         < \context Voice = mainV { c''4 d'' s2 }
 124           \context Voice = anotherV { \stemdown a'2 <b'2 gis'> }
 125         >
 126         a'4 a'' gis'' g'' |
 127         fis''4 f''2 e''4~e''
 128         d''2 c''4~c''
 129         b'2 a'4~a'
 130         gis'4 a' d'' |
 131         < \context Voice = mainV { c''4 d'' s2 }
 132           \context Voice = anotherV { \stemdown <a'2 e'> <gis' b'> }  |
 133         >
 134         a'4 s2 [e'16 d' c' b] |
 135         a4 s2 <f'4 a' d''4> | %% added some chording.
 136         <e'2 a' c''> <e' gis' b'> |
 137         a'2.  |
 138         }>>
 139
 140
 141      \context Staff = lower <{
 142
 143         \stemdown s2.  [e''16 d'' c'' b'] |
 144
 145         a'4
 146              s2
 147              \clef bass;        % HWN
 148              [e16 d c b,] |
 149         a,4 s2 a4 |
 150         e4 c' b2 |
 151         a4 s2 c'4 |
 152         g4 e' d'2 |
 153         c'4 s2 d'4 |
 154         a4 f' e'2 |
 155         d'4 s2 e'4 |
 156         b4 g' fis'2 |
 157         e'2 dis'4 d' |
 158         cis'4 c' b2 |
 159         bes4 a gis g |
 160         fis4 f e2 |
 161         dis4 d cis c |
 162         b,2  s |
 163         s1
 164         s4 b, cis dis |
 165         e4 f g2 |
 166         \LHtoR g4 bes cis' e' |
 167         g'4 bes' cis'' e'' |
 168         g''4 bes''2 [a''8 g''] |
 169         f''4 e'' d'' c''^\fermata |
 170         s1 s
 171         \LHtoL s4 g, a, b, |
 172         c4 d dis f |
 173         g4 g'2 \LHtoR d''4 |
 174         g'4 b' c'' \LHtoL d |
 175         c4 c'2 \LHtoR d''4 |
 176         c'4 b'2 \LHtoL g,4 |
 177         f,4 f e d |
 178         c4 d e f |
 179         g,4 g e f |
 180         g4 f g g, |
 181         c2 s
 182           \LHtoR   %% added. HWN
 183         s4 c'' b' bes' |
 184         a'4 gis' g'2 |
 185         fis'4 f' e' dis'
 186           \LHtoL
 187           |
 188         d4 d' c' b |
 189         c4 d e f |
 190         g,4 g e f |
 191         g4 f g g, |
 192         c2 s4 [g'16 f' e' d'] |
 193         c'4 s2 [g,16 f, e, d,] |
 194         c,4 c s f |
 195         g2 g, |
 196         c2. \LHtoR [g''16 f'' e'' d''] |
 197
 198         c''4 \LHtoL
 199            s2 [g16 f e d] |
 200         c4 s2 c'4 |
 201         d'2 d |
 202         g4
 203           \LHtoR
 204         [d''16 c'' bes' a'] g'4  \LHtoL s2
 205         [d16 c bes, a,] g,4 g |
 206         a2 a, |
 207         d2 s4 \LHtoR [a'16 g' f' e'] |
 208         d'4 \LHtoL s2 [a,16 g, f, e,] |
 209         d,4 s2 d'4 |
 210         g2 g, |
 211         a,4 \LHtoR a'' gis'' g'' |
 212         fis''4 f''2 e''4~e''
 213         d''2 c''4~c''
 214         b'2 a'4~a'
 215         g'2 f'4~f'
 216         e'2 d'4 |
 217         \LHtoL e,2^\fermata s |
 218         s1
 219         s4 e fis gis |
 220         a4 b c'2 |
 221         \LHtoR fis4 a c' ees' |
 222         fis'4 a' c'' ees'' |
 223         c'''2.  [bes''8 a''] |
 224         bes''4 a'' g'' f'' |
 225         s1
 226         \LHtoL s4 c d e |
 227         f2 e |
 228         d2 c |
 229         b,2 a, |
 230         e4 e'2 \LHtoR b''4 |
 231         e''4 gis'' a'' \LHtoL b, |
 232         a,4 a2 \LHtoR b''4 |
 233         a'4 gis'' a'' \LHtoL e, |
 234         d,4 d' c' b |
 235         a4 b c' d' |
 236         e4 d' c' d' |
 237         e'4 d' e' e |
 238         a2 s |
 239         s4 a' gis' g' |
 240         fis'4 f' e'2 |
 241         dis'4 d' cis' c' |
 242         <d'2 b>  <c'4 a> d |
 243         e4 d e e, |
 244         a,4 \LHtoR [e''16 d'' c'' b'] a'4 \LHtoL s2
 245         [e16 d c b,] a,4 d |
 246         e2 e, |
 247         a,2.
 248         }
 249      > >
 250
 251
 252
 253 }
 254 \version "1.0.16";