mutopia/J.S.Bach/Cembalo-Partitas/Partita_II_Capriccio.ly

   1 \header{
   2         enteredby = "Tom Cato Amundsen";
   3         copyright = "Public Domain";
   4         piece = "Capriccio";
   5 }
   6
   7 %% I takt 22 foretar jeg et stemmekryss mellom stemme en og to, pga at den
   8 %% stemmen som tidligere har vært andre stemme, kommeri resten av stykket
   9 %% ligge øverst og følgelig er første stemme.
  10 %%
  11 %% Noe liknende skjer også i mellom andre og tredje stemme i takt 28
  12
  13 \version "1.0.19";
  14
  15 global = \notes{
  16         \time 2/4;
  17         \key es;
  18         s2*48
  19         \bar ":|:";
  20         s2*48
  21         \bar "|.";
  22 }
  23
  24 vOne = \context Voice = voiceOne \notes\relative c''{
  25         r8 g c4~ |
  26         [c8 d16 c][b a g f] |
  27         [es8 g' d, f'] |
  28         [es16 d c d][e fis g a] |
  29 %5
  30         [bes g fis g][d g fis g] |
  31         [c g fis g][a g fis e] |
  32         d8 g4 fis8 |
  33         g r r4 |
  34 %9
  35         r16 [c, fis, g][a bes c8~] |
  36         [c16 bes a bes][c d e fis] |
  37         [g8 fis16 g~] g4~ |
  38         [g8 e16 g~] g4~ |
  39         [g8 e16 f~] f4~ |
  40         [f8~ d16 f~] f4~ |
  41         [f16 es d f][es d c b] |
  42         [c b c d][es f g8~]
  43 %17
  44         [g16 f es g ][f es d c] |
  45         [b a b c][d es f8~] |
  46         [f16 as g f][es d c bes!] |
  47         [as c f es][d c b d] |
  48 %21
  49         [g f es g][f es d f] |
  50 %stemmekryss ugh
  51         r16 [c b c][g c b c] |
  52         [es c a' es][c' es, d c] |
  53         [d bes a bes][f bes a bes] |
  54 %25
  55         [d bes g' d][bes' d, c bes] |
  56         [c a g a][fis a g a] |
  57         [c a fis' c][a' c, bes a] |
  58         [bes8 d] g4~ |
  59 %29
  60         [g8 a16 g][fis e d c] |
  61         [bes8 d' a, c'] |
  62         [g, bes'16 a][g8 bes] |
  63         [e, g bes, e] |
  64 %33
  65         [f, as'16 g][f8 as] |
  66         [d, f as, d] |
  67         es,4 r8 c' |
  68         as4 r |
  69 %37
  70         r8 g c4~ |
  71         [c8 d16 c][b a g f] |
  72         [es8 g' d, f'~] |
  73         [f16 es d f][es d c bes] |
  74 %41
  75         [as g as bes][c d es8~] |
  76         [es16 d c es][d c bes as] |
  77         [g f g as][bes c des8~] |
  78         [des16 c bes des][c bes as g] |
  79 %45
  80         as2~ |
  81         [as8 g] g4~ |
  82         [g8 as16 g][f es d c] |
  83         g'2 |
  84 %49
  85         r8 d' g,4~|
  86         [g8 f16 g][a b c d] |
  87         [es8 c, f' d,]
  88         [g'16 as g f][es d c bes] |
  89 %53
  90         [as8 f' g, e'] |
  91         [f16 c' e, f] r [c' e, f~] |
  92         f4 r |
  93         r8 [f16 g][as bes c d,] |
  94 %57
  95         es8 r r4 |
  96         r8 [es16 f][g as bes! g] |
  97         as8 r r4 |
  98         r16 [g f es][d c b a] |
  99 %61
 100         [b c d es] f4~ |
 101         [f16 es b c] r [es b c] |
 102         r [d b c] r [c b c~] |
 103         [c8 g' d f~] |
 104 %65
 105         [f es16 f] g4~ |
 106         [g8 f c es~] |
 107         [es d16 es] f4~ |
 108         [f8 es16 d][c bes a g] |
 109         c2~ |
 110         c4. c8 |
 111         bes4 a |
 112         r16 [a' fis g] r16 [a fis g] |
 113 %73
 114         r8 g es4~ |
 115         es8 d4 c8~ |
 116         [c es d c] |
 117         [bes g'][a, fis'] |
 118 %77
 119         g4 r8 f! |
 120         b,4 r |
 121         r8 g' c,4~ |
 122         [c8 bes16 c][d e f g] |
 123 %81
 124         [as16 c8.][as16 c bes c] |
 125         [as c8.][as16 bes as bes] |
 126         [g bes8.][g16 bes as bes] |
 127         [g bes8.][g16 as g as] |
 128 %85
 129         [f as8.][f16 as g as] |
 130         [f as8.][f16 g f g] |
 131         [es g d g][c, f bes, es] |
 132         [as, c f es] f4 |
 133 %89
 134         r8 c g'4~ |
 135         [g8 as16 g][f es d c] |
 136         b4 r8 es |
 137         c4 r |
 138 %93
 139         r8 g f'4~ |
 140         [f8 d g <f as,>] |
 141         <es4 g,> <d f,> |
 142         <c2 g es>
 143 }
 144
 145 vTwo = \context Voice = voiceTwo \notes\relative c{
 146         es4 r8 es |
 147         f4 r8 bes |
 148         c4. b8 |
 149         c r r4 |
 150 %5
 151         r8 d g4~ |
 152         [g8 a16 g][fis e d c] |
 153         [bes8 d' a, c'~] |
 154         [c16 bes a c][bes a g f!] |
 155 %9
 156         [es8 c] r8 fis! |
 157         g r r a! |
 158         [bes16 d8.][bes16 des c des] |
 159         [bes16 des8.][bes16 c bes c] |
 160 %13
 161         [as c8.][as16 c bes c] |
 162         [as bes8.][as16 bes as bes] |
 163         g8 r r4 |
 164         r8 [es16 f][g a b! c] |
 165 %17
 166         d8 r r4 |
 167         r8 [d,16 es][f g a! b!] |
 168         c8 r r4 |
 169         r2 |
 170 %21
 171         r8 c4 b8 |
 172         es4 r |
 173         s2*5 |
 174         r16 [g,, fis g][d g fis g]
 175 %29
 176         [c, g' fis g][a g fis e] |
 177         d8 g4 fis8 |
 178         r16 [g fis g][d g fis g] |
 179         [bes g e' bes][g' bes, as g] |
 180 %33
 181         [as f e f][c f e f] |
 182         [as f d' as][f' as, g f] |
 183         [g8 bes] es4~
 184         [es8 f16 es][d c bes as] |
 185 %37
 186         g4 r8 c |
 187         f4 r |
 188         r8 [es, f g~] |
 189         [g g] c4~ |
 190 %41
 191         [c8 c16 d][es f g as] |
 192         bes8 f, bes4~ | % HACK vil bruke [...] her
 193         [bes8 bes16 c][des es f g] |
 194         as8 [g, f e] |  % HACK vil bruke [...] her
 195 %45
 196         [f16 f' e g][f es d! c] |
 197         b4 r8 es |
 198         c2 |
 199         b2 |
 200 %49
 201         b4 r8 d |
 202         g, c4 b8 |
 203         r16 [g as g] r [f g f] |
 204         es8 g' c,4~ | % HACK vil egentlig bruke [...]
 205 %53
 206         [c8 bes16 c][d e f g] |
 207         [as8 f,][bes' g,] |
 208         [c'16 des c bes][as g f es!] |
 209         [d!16 c d es][f g as8~] |
 210 %57
 211         [as16 c bes as][g f es d] |
 212         [c b c d][es f g8~] |
 213         [g16 bes as g][f es d c] |
 214         b8 r r4 |
 215 %61
 216         r4 r8 d'8 |
 217         g,4 f |
 218         es d |
 219         [es8 es' b d~] |
 220 %65
 221         d4. [c16 bes] |
 222         a4. c8 |
 223         c4. [bes16 as] |
 224         g4 r |
 225 %69
 226         r8 [bes as g] |
 227         [fis a] d,4~ |
 228         [d8 c16 d][e fis g a!] |
 229         [bes8 g,][c' a,]
 230 %73
 231         d'4. c8 |
 232         fis, bes4 a8~ |
 233         [a fis g a] |
 234         d, r r16 [es' d c] |
 235 %77
 236         [b8 d] g,4~ |
 237         [g8 f16 g][a b! c d] |
 238         [es b, c d][es f g as!] |
 239         [bes! as g as][bes c d e!] |
 240 %81
 241         [f8 e16 f~] f4~ |
 242         [f8 e16 f~] f4~ |
 243         [f8 d16 es!~] es4~ |
 244         [es8 d16 es~] es4~ |
 245 %85
 246         [es8 c16 d~] d4~ |
 247         [d8 c16 d~] d4 |
 248         [c8 bes! as g] |
 249         f4 r16 [c' b d] |
 250 %89
 251         g,4 r8 es' |
 252         c4 r |
 253         r8 d, g4~ |
 254         [g8 as16 g][f es d c] |
 255 %93
 256         b4 r8 d' |
 257         [g, b c d~] |
 258 % ???
 259 % What have i misunderstood? I want the note_head not to collide with
 260 % i hotehead i vOne
 261         \property Voice.hshift = -1
 262         d
 263         \property Voice.hshift = 0
 264         c4 b8 |
 265 }
 266 vThree = \context Voice = voiceThree \notes\relative c{
 267         \stemdown
 268         c4 r8 c |
 269         d4 r |
 270         r8 [es f g] |
 271         [c, c' bes! a] |
 272 %5
 273         g4 r8 g |
 274         a4 r |
 275         r8 [bes, c d] |
 276         [g, d'] g4~ |
 277 %9
 278         [g8 a16 g][fis e d c] |
 279         [bes8 d' a, c'] |
 280         [g, bes' f,! as'!] |
 281         [e, g' c,, e']
 282 %13
 283         [f, as' es,! g'] |
 284         [d, f' bes,, d'] |
 285         [es, es' f g] |
 286         as r8 r4 |
 287 %17
 288         r8 [d, es f] |
 289         g r8 r4 |
 290         r8 g c4~ |
 291         [c8 d16 c][b a g f] |
 292 %21
 293         [es8 g' d, f'] |
 294         [c, es'16 d][c8 es] |
 295         [a, c f, a] |
 296         [bes, d'16 c][bes8 d] |
 297 %25
 298         [g, bes es, g] |
 299         [a, c'16 bes][a8 c] |
 300         [fis, a d, fis] |
 301         g,8 r bes r |
 302 %29
 303         a r c r |
 304         r [bes c d] |
 305         g, r bes r |
 306         r4 c8 r |
 307 %33
 308         f r as, r |
 309         r4 bes8 r |
 310         r16 [f'16 es d][c bes as g] |
 311         [f es' d c][bes as g f] |
 312 %37
 313         [es d' c bes][as g f es] |
 314         [d c' b a][g f es d] |
 315         c8 c'4 b8 |
 316         c4 r16 [c d es] |
 317 %41
 318         f8 r r4 |
 319         bes,4 r16 [bes c d] |
 320         es8 r r4 |
 321         r8 [as, bes c] |
 322 %45
 323         [f, c'] f4~ |
 324         [f16 es d f][es d c bes] |
 325         [as8 g] as4^\mordent |
 326         g2
 327 %49
 328         g'4 r8 f |
 329         es4 d |
 330         c8 r d r |
 331         es4 r8 e |
 332 %53
 333         f4 [bes8 c] |
 334         f8 r g r |
 335         [as f,g as] |
 336         bes r r4 |
 337 %57
 338         r8 [es, f g] |
 339         as r r4 |
 340         r8 [d, es f] |
 341         [g d] g,4~ |
 342 %61
 343         [g8 f16 g][a b c d] |
 344         [es8 c, f' d,] |
 345         [g' es, as' f,] |
 346         [g'16 g, g' as][g f es d] |
 347 %65
 348         [c g' c d][c bes a g] |
 349         [f f, f' g][f es d c] |
 350         [bes f' bes c][bes as! g f] |
 351         [es es, es' f][es d c bes] |
 352 %69
 353         [a g a bes][c d es c] |
 354         [d c d e][fis g a fis] |
 355         [g8 es c d] |
 356         g, r es' r |
 357 %73
 358         [bes16 g' fis g][c, a' fis g] |
 359         [d bes' fis g][es c' fis, g] |
 360         [fis, es' d c][bes a g fis] |
 361         [g f! es d][c8 d] |
 362 %77
 363         [g16 fis g a][b c d es] |
 364         [f es d es][f g a b] |
 365         c8 r r c |
 366         e, r r c' |
 367 %81
 368         [f, as' es, g'] |
 369         [d, f' bes,, d'] |
 370         [es, g' d, f'] |
 371         [c, es' as,, c'] |
 372 %85
 373         [d,8 f' c, es'] |
 374         [b, d' g,, b'] |
 375         [c, g'] c4~ |
 376         [c8 d16 c][b a g f] |
 377 %89
 378         [es d c d][es f g es] |
 379         [as g f g] as4~ |
 380         [as16 as g f][es d c bes!] |
 381         [as g' f es][d c b a] |
 382 %93
 383         [g es' d c][b a g f] |
 384         [es as g f][es d es f] |
 385         [g c es fis][g8 g,] |
 386         <c2 c,>
 387 }
 388
 389 vOneSwitch = \context Voice = voiceOne \notes{
 390         s2*4
 391 %5
 392         \stemup s2*17
 393 %22
 394         \stemdown s16*1
 395         \stemboth s16*7
 396 %23
 397         s2*12
 398 %35
 399         s4 \stemup s4
 400         s2*3
 401 %39
 402         \stemboth s2*2
 403 %41
 404         \stemup s2*8
 405 %49
 406         \stemboth s2*3
 407 %52
 408         \stemup s2*8
 409 %60
 410         \stemboth s2
 411 %61
 412         \stemup s2*35
 413 %96
 414         \stemboth
 415 }
 416
 417 vTwoSwitch = \context Voice = voiceTwo \notes{
 418         \stemup s2*4
 419 %5
 420         \stemdown \translator Staff = treble s2*17
 421 %22
 422         \stemup
 423         s2*6
 424 %28
 425         \translator Staff = bass s2*7
 426 %35
 427         s4 \translator Staff = treble \stemdown s4
 428         s2*3
 429 %39
 430         \translator Staff = bass \stemup s2*2
 431 %41
 432         s4 \translator Staff = treble \stemdown s4
 433 %42
 434         s8 \translator Staff = bass \stemup s8*3
 435 %43
 436         s4 \translator Staff = treble \stemdown s4
 437 %44
 438         s8 \translator Staff = bass \stemup s8*3
 439 %45
 440         \translator Staff = treble \stemdown s2*4
 441 %49
 442         \stemup \translator Staff = bass s2*3
 443 %52
 444         s8*1 \stemdown \translator Staff = treble \stemdown s8*3
 445         s2*7
 446 %60
 447         \stemup \translator Staff = bass s2
 448 %61
 449         \translator Staff = treble \stemdown s2*35
 450 }
 451
 452 vThreeSwitch = \context Voice = voiceThree \notes{
 453         \stemdown s2*6
 454 %7
 455         \stemboth s2*21
 456 %28
 457         \stemdown s2*7
 458 %35
 459         s4 \stemboth s4
 460 %36
 461         s2*3
 462 %39
 463         \stemdown s2*7
 464 %46
 465         \stemboth s2*3
 466 %49
 467         \stemdown s2*3
 468 %52
 469         s4 \stemboth s4
 470         s2
 471 %54
 472         s2*2 %HACK evt endre her, sammenlikne med Henle
 473 %56
 474         s2*4
 475 %60
 476         \stemdown
 477 }
 478
 479 \score{
 480         \context GrandStaff<
 481                 \context Staff = treble <
 482                         \global
 483                         \vOneSwitch
 484                         \vOne
 485                 >
 486                 \context Staff = bass <
 487                         \clef bass;
 488                         \global
 489                         \vTwoSwitch
 490                         \vTwo
 491                         \vThreeSwitch
 492                         \vThree
 493                 >
 494         >
 495         \paper{
 496         }
 497         \midi{\tempo=60;}
 498 }