\version "1.4.8"
\include "paper16.ly"

Algemeen = {\notes {\key c\minor \time 8/8}}
StemI ={\notes \relative c'' {
    \repeat volta 2 {
    g4 b\trill \grace {[a!16 b]} c4. d8-.
    [es f g] c,-. [b a g] f-.
    [es f g] c,-. [b a g] d''-.
    [es f g] c,-. [b a g] d'

    [es g,] [d' g,] [c b16 a] b [g b d]
    [es8 g,] [d' g,] [c b16 a] b [g b d]
    [f8 g,] [es' g,] [d' c16 b] c [g c es]
    [f8 g,] [es' g,] [d' c16 b] c [b c d]

    [es d c b] [c bes a g] [a g fis e] [fis d e fis]
    [g d g bes] d8 <c-. a> [bes16 c32 bes c bes a g] [a16 bes32 a bes a g fis]
    g16 [d g bes] d8 c-. [bes16 c32 bes c bes a g] [a16 bes32 a bes a g fis]
    d'16 [g, bes d] g8 c,-. [bes16 c32 bes c bes a g] [a16 bes32 a bes a g fis]

    g16 [g' f! es] [d c bes a] g [g f es] [d c bes a]
    }

    \alternative {
        {g16 r r8 <g'4-. bes d> <bes d g> r}
        {g16 r r8 <g'4 b d> <g b d g> r}
    }
    \bar "||"

    b'4 c\trill \grace {[b16 c]} d4. es8
    <d f> <c4 es> <b8 d-.> [es32 f es f es16 d32 es] c8 g-.
    [as f] [g es] [f d] [es16 d c8]
    b-. g-. c4 g4. g''8

    [f16 es d8] [es16 d c8] [d16 c b8] [c16 d es8]
    [d32 es f8.] [es16 f32 es f es d es] d4. es8-.
    [f8 g,] [es' g,] [d' c16 b] c [g c es]
    [f8 g,] [es' g,] [d' c16 b] [c bes as! g]

    [as! g f es] [f es d c] [d c b c] [b g as b]
    c [g c es] g8 f-. [es16 f32 es f es d c] [d16 es32 d es d c b]
    c'16-. [g c es] g8 f-. [es16 f32 es f es d c] [d16 es32 d es d c b]
    g'16 [es g c] c8 f,-. [es16 f32 es f es d c] [d16 es32 d es d c b]

    c16 [c' bes as!] [g f es d] c [c bes as!] [g f es d]
    c r r8 <c'4 es g-.> <c' es g c-.> r
    \bar "|."
    }}
StemII ={\notes \relative c' {
    <c4 es> <d f> [<es8 g> <d f> <c es>] <b-. d>
    <\context Voice=Boven{\voiceOne\stemUp{<es4 g> s8 f-. g4 s8 \clef bass \stemDown g,-. \stemUp c4 s4 g4 s8 \clef violin d'-. <es4 g> s8 f-. g4 r}}
     \context Voice=Onder{\voiceTwo\stemDown{[c,8 d es] s8 [g, a b] s8 [c, d es] f-. [g, a b] b' [c d es] s8 g,4 s4}}>

    g'8-. r f-. r es-. r d-. r
    g8-. r f-. r es-. r d-. r
    as'-. r g-. r f-. r es-. r
    as-. r g-. r f-. r es-. r

    [c'-. bes!-. a-. g-.] [fis-. es!-. d-. c-.]
    <bes8 d> r r c,-. d4 c
    bes4. es8 d4 c
    bes4. \clef bass <c8 es-.> <d,4 d'> d,

    g4 r r2

    %alternative
        r16 [d' e fis] g [bes, c d] g,4 r
        r16 [d' e fis] g [b, c d] g,4 r


    <g'4 d'> <a d> <b8 d> g-. <c4 es>
    <d8 f> r <g,4 d' g> <c g'> r
    \clef violin f'8-. r es-. r d-. r c-. r
    f4 [es16 d c8] [g'8-. g,-. g-.] \clef bass <g,8 g'-.>

    <as4 f'> <g es'> <f d'> <es c'>
    <d f g b> <c g' c> <g' b> r
    \clef violin as''!8-. r g-. r f-. r es-. r
    as-. r g-. r f-. r es-. r

    [f-. es-. d-. c-.] [b-. as-. g-. f-.]
    es r r \clef bass f,-. g4 f
    <es4. c'> <f8 d'-.> <g4 es'> <f d'>
    <es4. c'> <f8 d> <g4 c> g,

    c r r2
    r16 [g' a b] c [es, f g] c,,4-. r
    }}

\score {\notes {
\context PianoStaff <
  \property PianoStaff.midiInstrument = "harpsichord"
  \context Staff = "up" <\Algemeen \clef violin \context Voice=Een{\StemI}>
  \context Staff = "down" <\Algemeen \clef violin \property Staff.VoltaBracket = \turnOff \context Voice=Twee{\StemII}>
>
}
\paper {}
\midi {\tempo 4=120}
}
\header {
  title             = "Sonatensatz"
  subtitle          = "Joh. Kuhnau's neue Klavierübung benebst einer Sonata, denen Liebhaberen zu besönderem Vergnügen aufgesetzt."
  opus              = ""
  composer          = "Johann Kuhnau (1660-1722)"
  meter             = "Allegro (Maestoso)"

  %mutopiatitle      = "Sonatensatz"
  %mutopiacomposer   = "J. Kuhnau (1660-1722)"
  mutopiatitle      = "Sonata XI from the Essercizi per Gravicembalo"
  mutopiacomposer   = "ScarlattiD"
  mutopiaopus       = "K 11"
  mutopiainstrument = "Harpsichord, Piano"
  moreInfo          = "This sonata was previously thought to be 'Sonatensatz' by J. Kuhnau."

  source            = "P.J. Tonger Musik Verlag, 19th century"
  style             = "Baroque"
  copyright         = "Public Domain"
  maintainer        = "Bas Wassink"
  maintainerEmail   = "basvanlola@hotmail.com"
  lastupdated       = "2001/Dec/22"
 
  footer = "Mutopia-2001/12/27-141"
  tagline = "\\parbox{\hsize}{\\thefooter\\quad\\small \\\\This music is part of the Mutopia project, \\texttt{http://www.mutopiaproject.org/}\\\\It has been typeset and placed in the public domain by " + \maintainer + ".\\\\Unrestricted modification and redistribution is permitted and encouraged---copy this music and share it!}"
}
