\version "2.13.40"
#(ly:set-option 'point-and-click #f)
\include "deutsch.ly"

%%%%%%%%%%%%%%       MAKROS        %%%%%%%%%%%%%%%%%%%%%%%%%%%%%
tr = ^\markup { \bold {+}}
st = ^\staccatissimo

%  Unterbalken geändert: statt 3 * 2 16-tel nun 2 * 3 16-tel
qbeam = {
  \set subdivideBeams = ##t
  \set Staff.beatLength = #(ly:make-moment 3 16)
  \set Staff.beatLength = #(ly:make-moment 3 8)
}
% Unterbalken gemäß Standard
nbeam = {
  \set Staff.beatLength = #(ly:make-moment 1 8)
  \set subdivideBeams = ##f
}
% Linien im Generalbass ein und ausschalten
lj = \set useBassFigureExtenders = ##t
ln = \set useBassFigureExtenders = ##f

%%%%%%%%%%%%%       ENDE MAKRO     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



\header {
  title = \markup
    {"Sonate F-Dur TWV 41:F 2"}
  subtitle = \markup 
    { "aus / from / de  \"Der getreue Musikmeister\" (1728 - 1729)"}
  subsubtitle = \markup
    {"für Altblockflöte und B.c. / pour flûte à bec alto et b.c / for treble recorder and b.c"}
  composer = \markup  \override #'(baseline-skip . 2) 
    {\center-column     { "Georg Philipp Telemann" 
                        \tiny "(1681 - 1767)" 
                        \tiny "Figured bass arrangement and"
                        \tiny "Published by Franz-Rudolf Kuhnen" } 
		    }
  copyright = \markup {  \tiny
    "© Copyright 2010 by Franz-Rudolf Kuhnen - http://noten.kuhnen-musik.de (Rev.: 08-20101126)"} 
}


\paper {
  myStaffSize = #18
  #(define fonts
    (make-pango-font-tree "Times New Roman"
                          "Arial"
                          "Luxi Mono"
                           (/ myStaffSize 18)))
  line-width = 18\cm
  ragged-last-bottom = ##f
}

#(set-default-paper-size "a4")
#(set-global-staff-size 16)


%===================      1, Movement      ==============================
%========================================================================

\score {
 \new ChoirStaff
  \new Staff << 
    \relative c''{ 
      
    \time 4/4
    \key f \major
    \repeat volta 2 {
    c'8[ f, f d'] c4 b16 a b c |
    a4 g16 f g a f8 c f a16 g |
    f4 c'16 b a g f8 c f a16 g |
    f8 g16 a b8 a a\tr g r4 |
    %     5
    g8 f16( e) a4 g16( f) e( f) d8 e |
    f8 e16( d) g4 f16( e) d( e) c8 d |
    e8 d16 c f8 e16 d g8 f16 e a8 g16 f |
    h16 g g g c g g g d' g, g  g e' g, g g |
    h g g g c g g g d'8[ g,] f'8 r |
    %     10    
    e8 d16 c d8 c16 h c8 h16 a g8 f |
    e16 f g a d, e f g c, d e f d e f g |
    e f g a d, e f g c,8 d16 e f g a h |
    c8[ g c g] c h16 a g8 f |
    e4 d\tr c r |
    }
    
    \repeat volta 2 {
      %       15
    g'8[ e e g] cis,4 b' |
    a8 g16 f g8 f16 e f8 d r4 |
    c'8[ a a c] fis,4 es' |
    d8 c16 b c8 b16 a b8 g r a |
    b16 g fis g d g fis g b8 g r a |
    %     20
    b16 g fis g d g fis g d'8[ g, g' g,] |
    b8 a16 g a8 g16 fis g8 f16 es d8 c |
    b[ g' a, fis'] g,4 r |
    g'4 f16 e f g e c d e f g a b |
    c4 b16 a b c a f e f g a b c |
%     25
    d4 c16 b c d b4 a16 g a b |
    g f g a f e f g e c c c f c c c |
    g' c, c c a' c, c c e c c c f c c c |
    g'8[ c,] b' r a g16 f g8 f16 e |
    f8 c f a16 g f4 c'16 b a g |
    f8 c f a16 g f8 g16 a b c d e |
    f8[ c f c] f e16 d c8 b |
    a4 g\tr f r |
    }
  }


 
  
  \new Staff  \with { implicitBassFigures = #'(10) }\relative c  {         
  \override MultiMeasureRest #'expand-limit = 1
    \clef "bass"
    \time 4/4
    \key f \major
    
    \repeat volta 2 {
      f4 r8 b a[ f g c,] |
      f[ f,] b g a4 r8 c |
      a[ f] a c a4 r8 c' |
      a[ f] e f c4 c8 d  |
%       5
      e4 cis8 a d4 r8 cis |
      d4 h8 g c4 r8 h |
      c4 d e f |
      g, r g' r |
      g, r g' h,8 g |
%   10
      c[ e] f g c,[ d] e d |
      c4 h c g |
      c h c d |
      e r e8[ d] e f |
      g4 g, c r |
    }  
    
    \repeat volta 2 {
      %     15
      c'4 b a8[ a,] g g' |
      f4 e d f8 d |
      es4 c d8[ d' c c,] |
      b4 a g8[ g' fis d] |
      g4 r g,8[ g' fis d] |
      %   20
      g4 r b r8 es |
      d4 d, es b8 c |
      d4 d, <g g'>4 f'16( e f g) |
      e8[ c] d g, c4 r |
      a'8[ f] g c, f4 r |
      %   25
      b8[ g] a d, g[ e] f f, |
      b4 h c r |
      c r c r |
      c e8 c f[ a, b c] |
      a f r c' a[ f] a c |
      %   30
      a f r c'' a[ f] d' b |
      a4 r a,8[ g a b] |
      c4 c, f r |
    }
  }
  
  \new FiguredBass
  \with { implicitBassFigures = #'(10)}{
  \figuremode {
    \set figuredBassAlterationDirection = #RIGHT
    
    s2 <6>4 <6> |
    s \lj <6>8 <6>16 \ln s16 \lj <6>4. <6>8 \ln  |
    <6>4 <6>  <6>4.\lj <6>8 |\ln
    <6>4 <6 5> <6 4>8 <5 3> \lj <10>8 <10> \ln |
%     5 
    <6>4 <6>8 \lj <6> s4 s8 \ln <6> |
    s4 \lj <6>8 <6> s4 s8 <6>8 |
    s4 <7> <6> s |
    <_!>4 s <_!> s |
    <_!> s <_!> \lj <6 5>8 <6> |
%      10
    s8 \ln <6> <6> <_!> s <6!> <6> <6!> |
    s4 <6> s <_!>  |
    s4 <6> s <6!>  |
    <6> s <6>8 <6!> <6> s |
    <6 4>4 <5 _!> s s |
%      15
    s4 <4 2> <_+> <_-> |
    <6> <6\\> s <6> |
    <6 4 3> <6 5 _-> <_+> <_-> |
    <6> <6\\> s \lj <6>8 <6> \ln |
    s4 s s \lj <6>8 <6> \ln |
%      20
    s4 s <6> s8 <6> |
    <6 4>4 <5 _+> s <6>8 <_-> |
    <6 4>4 <6 _+> s <4! 2> |
    <6> \lj <6!>8 <6!> s4 s4 \ln |
    <6> <6> s s |
%      25
    s <7>8 <7 _+> s <6 5> s4 |
    <6> <6 5> s s |
    s1 |
    s4 <6 5> s8 <6> <6> s |
    <6> \lj <10> <10> <10> \ln <6>4 <6> |
%      30
    <6>8 \lj <10> <10> <10> \ln <6>4 <6> |
    <6>4 s <6>8 <6> <6> s |
    <6 4>4 <5 3> s s  |
   }
 }
 >> 
%  >>

 \layout { indent = 0 }

 \header { 
   piece=   \markup {  \override #'(font-size . 3) \italic "Vivace"}
 }
} 

%===================      2, Movement      ==============================
%========================================================================


\score {
  
 \new ChoirStaff
   \new Staff << 
    \relative c''{ 
      
    \time 3/4
    \key f \major 
    \repeat volta 2 {
     a'4 \grace b8( a4.)\tr g8 |
     f8( e) d4 r |
     b'4 g e |
     cis2\tr r4 |
     d4 \grace d8( e4.) f8 |
     e4.\tr g8[ f e] |
     f g g4.\tr a8 |
     a2 r4
    }
    
    \repeat volta 2 {
      a8( b16 c) fis,4.(\tr g16 a) |
      d,4. es'8 d4 |
      c \grace b8( a4.\tr)  d8 |
      b4.\tr a8 g4 |
      \grace f16( e8)( f16 g) cis,4.(\tr d16 e) |
      a,4. e'8 f4 ~ |
      f8 g8 e4.\tr d8 |
      d2 r4 |
    } 

  }




 
  \new Staff \relative c  {         
  \override MultiMeasureRest #'expand-limit = 1
    
    \clef "bass"
    \time 3/4
    \key f \major
    
    \repeat volta 2 {
      d4 cis a |
      d4. c8[ b a] |
      g4 b g |
      a a' g |
      f e d |
      cis a cis |
      d b2 |
      a r4 |
    } 
  
    \repeat volta 2 {
      fis'4 a c |
      b a b |
      c d d, |
      g g, a |
      b a g |
      f cis' d |
      g a a, |
      d2 r4 |
    }
  }
  
  \new FiguredBass
  \with { implicitBassFigures = #'(10)}{
  \figuremode {
    \set figuredBassAlterationDirection = #RIGHT
     s4 <6> <_+> |
     s2. |
     s4 <6> <6> |
     <_+> \lj <10> <10> \ln |
%      5
     <6> <6\\> s |
     <6> s <6>
     s <6>2 |
     <_+>2. |
     
     <6>4 <6\\> <4+ 2> |
%      10
     <6> <6\\> <6> |
     <_-> <_+> s |
     s \lj <10> <10> \ln |
     <6 4> \lj <_+> <_+> \ln |
     <6> <6> s |
     s <_+> s |
     s2. |
   }
 }
 >> 
 

 \layout { indent = 0 }

 \header { 
   piece=   \markup {  \override #'(font-size . 3) \italic "Largo"}
 }
} 

\pageTurn

%===================      3, Movement      ==============================
%========================================================================


\score {
  
 \new ChoirStaff 
  \new Staff << 
    \relative c''{ 
      
    \time 6/8
    \key f \major 
    \repeat volta 2 {
      \partial 8*1 c'8 |
      a( g) f d'4 f,8 |
      e8( d) c g'4 b,8 |
      a c f e g c |
      a f c f,4 g'8 |
%       5
      as8( g) as g( fis) g |
      fis4 d8 a'4 d,8 |
      b'8( a) b a( gis) a |
      gis4 e8 h'4 e,8  |
      c'8( h) c b( a) b |
%       10
      a( h) c g4 c8 |
      f,( a) c e,4 c'8 |
      d,( f) a a( g) f |
      f( e) d d( c) h |
      h4. f' |
%       15
      e8( d) c g4 h'8 |
      c g e c e g |
      e' g, e c e g |
      g' g, e c e g |
      << { \voiceOne  c'4  c,8  }
  \new Voice { \voiceTwo \stemNeutral c8[^( h) c]}
>> \oneVoice
         g4 h8 |
%       20
      c4. r8 r 
    }
    
    \repeat volta 2 {
      g8 |
      e( d) c c'4 a8 |
      fis( e) d d'4 g,8 |
      es' c a fis a d |
      b g d g,4 a'8 |
%       25
      b4 d,8 cis4 b'8 |
      \grace b8( a4.) \tr ~ a8( g8) a |
      b4 d,8 cis4 a'8 |
      \grace a8( g4.) \tr ~ g8( fis8) g|
      b8( a) g g( f) e |
%       30
      cis'4 a8 e'4 g,8 |
      f8( e) d a4 cis8 |
      d4. r8 r a' |
      d4 d,8 c'( h) c |
      h( c) d g,( a) h |
%       35
      c4 c,8 b'8( a) b |
      a( b) c f,( g) a |
      b( a) g a4. |
      g8( f) e f4. |
      h,8( d) f g,( g') f |
%       40
      e( d) c b'4. |
      a8( g) f c4 e8 |
      f c a f a c |
      a' c, a f a c |
      c' c, a f a c |
%       45
      f'4 f,8 c4 e8 |
      f4. r8 r
    }

  }


 
  \new Staff \relative c  {         
  \override MultiMeasureRest #'expand-limit = 1
    
    \clef "bass"
    \time 6/8
    \key f \major
  
  \repeat volta 2 {
    \partial 8*1 e8 |
    f4. b |
    c e, |
    f c |
    f, r8 r e' |
%     5
    f4. es |
    d r8 r fis |
    g4. f |
    e r8 r gis |
    a4. g |
%     10 
    f e |
    d c |
    f r |
    d4. r |
    g8( fis) g h,( d) g |
%     15
    c,4 f8 g4 g,8 |
    c4. r |
    c r |
    c r |
    e4 a8 g4 g,8 |
%     20
    c4. r8 r
  }  
  
  \repeat volta 2 {
    h8 |
    c4. a |
    d b! |
    c d |
    g, r8 r fis' |
%     25
    g4. a4 g8 |
    f8( e) f d( e) fis |
    g4. a4 a,8 |
    b( a) b b'( a) b |
    g4. b |
%     30
    a cis, |
    d4 g,8 a4 a'8 |
    d4 d,8 c'( h) c |
    h4. a |
    g r8 r f |
%     35
    e4. c |
    f r8 r es |
    d( c) b c( b) a |
    b( a) g a( g) f |
    d'4. h |
%     40
    c e8( d) c |
    f4 b8 c4 c,8 |
    f4. r |
    f r |
    f r |
%     45
    a,4 b8 c4 c,8 |
    f4. r8 r
  }
    
  }
  
  \new FiguredBass
  \with { implicitBassFigures = #'(10)}{
  \figuremode {
    \set figuredBassAlterationDirection = #RIGHT
     <6>8 |
     s4. s |
     s <6 5> |
     s s |
     s s4 <6>8 |
%      5
     <_->4. <6> |
     <_+> s4 <6>8 |
     s4. <6> |
     <_+> s8 s <6> |
     s4. <6 _-> |
%      10
     s <6> |
     <7> s |
     <6> s |
     s s |
     <_!> <6 5> |
%      15
     s s |
     s s |
     s s |
     s s |
     <6>4 <6\\>8 <_!>4. |
%      20
     s s4 
     
     <6>8 |
     s4. <5> |
     <_+> <6> |
     <_-> <_+> |
     s s4 <6>8 |
%      25
     s4. \lj <_+>4 <_+>8 \ln |
     <6>4. s4 <6>8 |
     s4. <_+> |
     <6> <6> |
     s <6> |
%      30
     <_+> <6 5> |
     s <_+> |
     s <4+ 2> |
     <6> <6> |
     <_!> s4 <4! 2>8 |
%      35
     <6>4. <7-> |
     s s4 <4 2>8 |
     <6>4. <6 4> |
     <4 2> <6> |
     <6!> <6> |
%      40
     s <6 5> |
     s s |
     s s |
     s s |
     s s |
%      45
     <6> s |
     s s4
   }
 }
 >> 
 

 \layout { indent = 0 }

 \header { 
   piece=   \markup {  \override #'(font-size . 3) \italic "Allegro"}
 }
} 

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Revision:
% 06-20100207 Blfl 3.Satz 2.Takt 4.Schlag: g' statt c'


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Revision - 07-20100223:
%  Generalbassaussetzung korrigiert in:
%       3. Satz,        T. 19, 1. Achtel: <d fis c'> statt <fis a c>
%                       T. 33, 2. punktiert Viertel:    fis statt f
%                               (Im Erstdruck steht eine einfache "6" als Ziffer, es muss aber doch eine erhöhte 6 sein!)
%                       T. 34, 2. punktierte Vierte.:   <c e b'> statt <es g b>
%                       T. 46, 1. statt 2. Umkehrung



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% Revision - 08-20100226:
% 3. Satz, T. 24, 3. Achtel: d'' statt e''




%{
convert-ly (GNU LilyPond) 2.13.12
Processing `'... 
Applying conversion: 2.12.3, 2.13.0, 2.13.1, 2.13.4, 2.13.10


%}