\version "2.11.54"

\include "deutsch.ly"
\header {
  title = "Prelude "
  subtitle = "aus dem \"Te Deum\""
  instrument = "für Blockflötenquartett"
  composer = "M. A. Charpentier"
  arranger = "arr. by Franz-Rudof Kuhnen"
  copyright = "2008 by Franz-Rudolf Kuhnen - Vers. 20080802"
}

\paper {
  #(set-paper-size "a4")

  myStaffSize = #20
  #(define fonts
  (make-pango-font-tree "Times New Roman"
  "Times New Roman"
  "Helvetica"
  (/ myStaffSize 20)))
  line-width = 18\cm
  ragged-last-bottom = ##f
   
}
#(set-global-staff-size 18)
#(ly:set-option 'point-and-click #f)

global = {
  \key c \major
  \override Staff.TimeSignature #'style = #'()
  \time 2/2
  \partial 4
}

sopranoRecordera = \relative c''' {
  \global 

  \set Staff.instrumentName = \markup { \column { "SBlfl" } }
  % Music follows here.

  \repeat volta 2 {
  g4 |
  c c8 d e4 c |
  g'2 e4. e8 |
  f4 g8 f e f g4 |
  d8 c d e d4 g, |
  
  % 5
  c4 c8 d e4 c |
  g'2 e4. e8 |
  f8 g e f d4. c8 |
  c2. }
  
  g'8 f |
  e4 c f f8 e |
  
%   10
  d4. c8 h4 e |
  d4 c8 d h4 e |
  c4. h8 a4 a' |
  a4 g g4. f8 |
  e4. d8 c d e fis |
  
  %   15
  g4. a8 fis4. g8 | 
  g2. \bar "||"
  
  g,4 |
  c c8 d e4 c |
  g'2 e4. e8 |
  f4 g8 f e f g4 |
  
%   20
  d8 c d e d4 g, |c4 c8 d e4 c |
  g'2 e4. e8 |
  f8 g e f d4. c8 |
  c2. \bar "||" \break
  
  e4 |
  e f8 e d4. e8 |
  
  %   25
  f2 f4. g8 |
  e4. f8 d4. e8 |
  e2 ~ e8 f e d |
  cis4 a a'4. g8 |
  fis4. e8 d4 e8 fis |
  
  %   30
  g4 h, c4. d8 |
  h4. a8 g4 \bar "||"
  
  g |
  c c8 d e4 c |
  g'2 e4. e8 |
  f4 g8 f e f g4 |
  
  %   35
  d8 c d e d4 g, |c4 c8 d e4 c |
  g'2 e4. e8 |
  f8 g e f d4. c8 |
  \partial 4*3 c2.  \bar "|."
}


sopranoRecorderb = \relative c''' {
  \global 

  \set Staff.instrumentName = \markup { \column { "ABlfl " } }
  % Music follows here.
  g4 |
  g g c c |
  d h c4. c8 |
  c4 c c g8 a |
  h a h c h4 c8 d |
  
  %   5
  g,4 g c c |
  d h c4. c8 |
  a4 g g4. g8 |
  g2. 
  
  g4 |
  g g a a |
  
  %   10
  h4. a8 g4 g |
  f f e e |
  e2 e4 f |
  f e d g |
  g2 g4. g8 |
  
  %   15
  h4 a a h8 c |
  h4. a8 g[ d] e[ f]|
  g4 g c c |
  d h c4. c8 |
  c4 c c g8 a |
  
  %   20
  h a h c h4 c8 d |
  g,4 g c c |
  d h c4. c8 |
  a4 g g4. g8 |
  g2. 
  c4 |
  
  %   25
  c d8 c h4. c8 |
  d2 a4. h8 |
  c4 h a4. h8 |
  gis4. a8 h4 gis |
  e4 e' cis4. cis8 |
  
  %   30
  d2 a4. a8 |
  a4 g g fis |
  g d e8[ d] e[ f] |
  g4 g c c |
  d h c4. c8 |
  
  %   35
  c4 c c g8 a |
  h a h c h4 c8 d |
  g,4 g c c |
  d h c4. c8 |
  a4 g g4. g8 
  g2. 
  
  
  
}

altoRecorder = \relative c'' {
  \global 

  \set Staff.instrumentName = \markup { \column { "TBlfl " } }
  % Music follows here.
  c4 |
  e e8 f g4 e |
  d4 g g4. g8 |
  a4 a g8 f e a |
  g2 g4. h,8 |
  
%   5
  e4 e8 f g4 e |
  d g g8 f e d |
  c4 c h c8 d |
  e2. 
  d4 |
  c e f a |
  
  %   10
  g2 d4 c h a a4. gis8 |
  a4. h8 c4 d |
  h4 h8 c d4 h |
  c4. d8 e4 c |
  d4 e d4. d8 |
  
  %   15
  d2 c4 ~ c8 d8 |
  e4 e8 f g4 e |
  d4 g g4. g8 |
  a4 a g8 f e a |
  g2 g4. h,8 |
  
  %   20
  e4 e8 f g4 e |
  d g g8 f e d |
  c4 c h c8 d |
  e2. g4 |
  a a g4. g8 |
  
  %   30
  a4 f d a' |
  a e f a, |
  h h'8 a gis4 gis |
  a cis,8 d e4 a |
  a4. g8 fis4 g8 a |
  
  %   35
  d,4 d e c |
  d2 c4 ~ c8 d8 |
  e4 e8 f g4 e |
  d4 g g4. g8 |
  a4 a g8 f e a |
  
%   40
  g2 g4. h,8 |
  e4 e8 f g4 e |
  d g g8 f e d |
  c4 c h c8[ d] 
  e2. 
  
  
  
}

bassRecorder = \relative c' {
  \global 

  \set Staff.instrumentName = \markup { \column { "BBlfl" } }
  % Music follows here.
  c4 |
  c2 c4 c |
  h g c4. c8 |
  f,4 f c'8 d e f |
  g2 g8 f e d |
  
%   5
  c2 c4 c |
  h g c4. c8 |
  f4 c g' g, |
  c2.
  h4
  c c'8 h a4 f |
  
  %   10
  g2 g4 c, |
  d4 d e e |
  a,2 a4 f |
  g4 g8 a h4 g |
  c2 c4 c |
  
  %   15
  h c d d |
  g, g'8 f e[ f] e[ d] |
  c2 c4 c |
  h g c4. c8 |
  f,4 f c'8 d e f |
  
%   20
  g2 g8 f e d |
  c2 c4 c |
  h g c4. c8 |
  f4 c g' g, |
  c2. c'4 |
  
  %   25
  a f g f8 e |
  d2 d4 d |
  a'4 g f2 |
  e2. e4 |
  a2. a,4 |
  
  %   30
  d2 d4 c |
  h2 a |
  g4 g'8 f e[ f] e d |
  c2 c4 c |
  h g c4. c8 |
  f,4 f c'8 d e f |
  g2 g8 f e d |
  c2 c4 c |
  h g c4. c8 |
  f4 c g' g, 
  c2.
  
  
}

\score {
  \new ChoirStaff
  <<
    \new Staff \with {
      midiInstrument = "recorder" } 
      { \clef "G^8" \sopranoRecordera } 
    
    \new Staff    \with {
      midiInstrument = "recorder" }
      { \clef "G" \sopranoRecorderb}
    
    \new Staff \with {
      midiInstrument = "recorder"
    }  { \clef "G"  \altoRecorder}
    
    \new Staff \with {
      midiInstrument = "recorder"
    } { \clef "bass^8" \bassRecorder  }
    
  >>
  \layout {
    indent = 1.6\cm }
    \midi {
      \context {
        \Score
        tempoWholesPerMinute = #(ly:make-moment 120 4)
      } }
}