%Continuo, 1st movement

continuo_1a_main = \notes \relative c' {
    e,4-. e,-. e'-. r8 e, |
    e' gis16 fis e8 gis16 fis e8 gis16 fis e8 dis |
    [cis dis e e,] b'4 r |
    gis16 a b cis dis e fis gis cis,4 r |
    fis,16 gis a b cis dis e fis b,4 r |
    e,16 fis gis a b cis dis e cis8 cis'4 b8 |
    a a,4 gis8 fis fis'4 e8 |
    dis2 ~ dis16 e fis dis b8 dis |
    [e gis a b] cis gis16 gis a a b b |
    cis cis gis gis a a b b cis cis b b cis cis dis dis |
    [e8 cis a b] e,4 r |
    r2 e4-.-\p gis-. |
    a-. r16 gis fis e a4 r8 gis |
    [fis dis e e,] b'4 r |
    e4-.-\f e,-. e'-. r8 e, |
    e' gis16 fis e8 gis16 fis e8 gis16 fis e8 dis |
    cis dis e e, b'4-\p r8 b' |
    b b, r b' b b, r b' |
    b b, r b' b b, r4 |
    r r8 b-\f b' dis16 cis b8 dis16 cis |
    b8 dis16 cis b8 b, b'-\p dis16 cis b8 fis |
    b dis16 cis b8 fis gis cis16 b ais8 gis |
    [fis gis ais fis] b r ais r |
    gis r cis, r fis4 r |
    dis16-\f e fis gis ais b cis dis gis,4 r |
    cis,16 dis e fis gis ais b cis fis,4 r |
    b,16 cis dis e fis gis ais b gis8 gis,4 fis8 |
    e e'4 dis8 cis cis'4 b8 |
    ais2 ~ [ais8 fis gis ais] |
    b [dis,16 dis] e e fis fis b,8 [dis-\p e fis] |
    gis8 [dis16-\p dis] e e fis fis b,4 r |
    R1 |
    r8 dis16-\p dis e e fis fis gis gis fis fis gis gis ais-\f ais |
    [b8 gis e fis] b,4 r |

    e-.-\f e,-. e'-. r8 e-\p |
    e e, r e' e e, r e' |
    e e, r e' e e, r4 |
    r r8 e-\f e' gis16 fis e8 gis16 fis |
    e8 gis16 fis e8 e, e' gis16 fis e8 b |
    e gis16 fis e8 b cis fis16 e dis8 cis |
    [b cis dis b] e r dis r |
    cis r fis, r b4 r |
    gis16-\f a b cis dis e fis gis cis,4 r |
    fis,16 gis a b cis dis e fis b,4 r |
    e,16 fis gis a b cis dis e cis8 cis'4 b8 |
    a a,4 gis8 fis fis'4 e8 |
    dis2 ~ [dis8 cis dis b] |
    e gis,16 gis a a b b e,8 [gis'-\p a b |
    cis] gis,16 gis a a b b e,4 r |
    R1 |
    r8 gis16 gis a a b b cis cis b b cis cis dis-\f dis |
}
continuo_1a_lastbar1 = \notes \relative c' {
    [e,8 cis a b] e,^"Fine" [gis'16-\p fis] e8 dis |  
}
continuo_1a_lastbar2 = \notes \relative c' { % for midi version
    e,8 cis a b e,4 r |
}

continuo_1b = \notes \relative c' {
    cis,8 gis'4 fis8 [e cis e a] |
    b, dis'4 cis8 [b gis b e] |
    a,,8 a'4 gis8 [fis e dis fis] |
    gis, bis'4 cis8 [dis cis bis gis] |
    [cis cis b! b] [ais ais gis gis] |
    [fisis fisis dis dis] [gis gis gis, gis] |
    [gis' gis a! a] [gis gis fis fis] |
    [eis eis cis cis] [fis fis fis, fis] |
    [fis' fis gis gis] [fis fis e e] |
    [dis dis e e] [dis dis cis cis] |
    [bis bis dis dis] [bis bis gis gis] |
    [cis cis dis dis] [e e fis fis] |
    [gis gis cis, cis] [fis fis a a] |
    [b b b, b] [e e gis gis] |
    [a a gis gis] [a a fis fis] |
    [gis gis gis gis] [gis gis gis gis] |
    [gis gis gis gis] [gis, gis gis gis] |
    cis4-.-\f cis,-. cis'-. r8 cis |
    cis' e16 dis cis8 e16 dis cis8 e16 dis cis8 cis, |
    fis-\p fis, r fis' fis fis, r fis' |
    b4-.-\f b,-. b'-. r8 b, |
    b' dis16 cis b8 dis16 cis b8 dis16 cis b8 b, |
    e-\p e, r e' e e, r e' |
    a4-.-\f a,-. a'-. r8 a, |
    a' cis16 b a8 cis16 b a8 cis16 b a8 a, |
    fis gis a4 e r |
    cis'16 d e fis gis a b cis fis,4 r |
    b,16 cis d e fis gis a b e,4 r |
    a,16 b cis d e fis gis a fis,8 fis'4 e8 |
    [d b cis d] e-\p e, r e' |
    e e,16 fis gis8 b [e b e gis] |
    [b gis e gis] a,4-. cis-. |
    e-. r8 cis16 d e8 cis16 d e8 a |
    e e16 d cis8 b16 a ais4 r8 fis' |
    fis fis,16 gis ais8 cis [fis cis fis ais] |
    [cis ais fis ais] b,4-. d-. |
    fis-. r8 d16 e fis8 d16 e fis8 b |
    fis fis16 e d8 cis16 b eis,4 r8 cis' |
    cis cis,16 dis eis8 gis [cis gis cis eis] |
    [gis eis cis eis] [fis-\f d b cis] |
    a-\p ais r fis' b a! gis fis |
    [eis gis16 fis eis8] cis-\f [fis d b cis] |
    fis,4-.-\p a-. cis-. r8 cis |
    fis,4-. b-. e-. r8 fis |
    b,4-. e-. ais-. r8 cis16 b |
    ais8 cis16 b ais8 fis b b, b' b16 a |
    gis8 b16 a gis8 e [a gis fis a] |
    [dis, fis b, b'] [e, b e, e'] |
    [a gis a fis] dis4 r8 b-\f |
    e e'4 dis8 cis cis,4 b8 |
    a gis16 gis a a b b cis cis gis gis a a b b |
    cis cis b b cis cis dis dis e e b b cis cis dis dis |
    e e gis gis cis cis a a b2-\p ~ |
    b ~ b8 [b, ais gis] |
    [fisis fisis fisis fisis] [fisis fisis fisis fisis] |
    [gis gis gis gis] [gis gis gis gis] |
    [cis cis cis cis] [cis cis cis cis] |
    dis4-. fisis-. ais-. r |
    dis, gis-. b-. r |
    dis, fisis8 ais cis4 r |
    dis, gis8 b dis4 r |
    fisis,,1 ~ |
    fisis2 ~ fisis4 r8 fisis' |
    [gis e cis dis] gis, r r4 |
    r2 r8 gis16-\p gis ais ais bis bis |
    [cis8 cis cis cis] [cis cis cis cis] |
    [cis cis cis cis] [ais ais ais ais] |
    [fisis fisis fisis fisis] dis2 |
}

continuo_1c_lower = \context Staff \notes \relative c' {
    R1 |
    R1 |
}
continuo_1c_upper = \context Staff \notes \relative c' {
    \property Staff.fontSize = -1
    r2 r8 \stemup ais b gis |
    cisis, r dis dis, gis4 r^"D.C. al fine" |
}

continuo_1 = \notes {
    \$continuo_1a_main
    \$continuo_1a_lastbar1
    \bar "||";
    \$continuo_1b
    < \$continuo_1c_lower \$continuo_1c_upper >
    \bar "|.";
}

continuo_1_midi = \notes {
    \$continuo_1a_main
    \$continuo_1a_lastbar1

    \$continuo_1b
    < \$continuo_1c_lower \$continuo_1c_upper >

    \$continuo_1a_main
    \$continuo_1a_lastbar2
}
