\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 15)
#(ly:set-option 'point-and-click #f)
%nomobile

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
mtempo={\tempo 4 = 64}
pfermata=\markup{"(" \musicglyph #"scripts.ufermata" ")"}
bon = \bassFigureExtendersOn
boff = \bassFigureExtendersOff
noados=\once \set Staff.aDueText = #""


htitle="BWV 244 - Blute nur"
hcomposer="Bach"

\header {
	title=\markup{\fontsize #3 "12. Blute nur"}
	subtitle="Matthäus-Passion"
        subsubtitle=\markup{"BWV 244" \vspace #0 }
        composer="Johann Sebastian Bach (1685-1750)"
        pdfauthor=\composer
       %opus="(-)"
	%poet=\markup{}
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={
  \compressFullBarRests
  \key b \minor \time 4/4
  \skip 1*45
  \bar "|."
  \override Score.RehearsalMark.self-alignment-X=#right
  \override Score.RehearsalMark.padding = #1.5
  \mark \markup{"Da Capo"}
}


soprano=\relative c''{
	\set autoBeaming = ##f
	R1*8
	b8( cis4) ais8 b4 r
	R1
	d8( e4) cis8 d4 r
	R1
	r8 f[ e] d c c b16[ c] a8
	g g'[ fis] e d d cis16[ d] b8
	ais cis[ d] ais b dis e b
	cis eis[ fis] cis d fis g dis
	e1 ~
	e8 b[ ais] e' d ais b d
	e,1
	r8 e'[ d] cis fis b, fis d'
	\appoggiatura cis8 b2 r
	R1*7
	r8^\fermata cis[ d] b \appoggiatura a8 gis4 r8 a
	b cis d4 ~ d8[ cis] cis4
	r8 dis[ e] cis \appoggiatura b8 ais4. b8
	cis d! e4 ~ e8[ d] d4
	r8 eis,4 fis8 gis b16[ a] b8 b
	b8[ ais16 cis] b[ d cis e] d8 cis b eis
	fis dis bis cis e4( dis)
	cis4 r r2
	r8 e4 fis8 gis,8. a16 b[ cis] d8 
	d8[ cis] cis4 r2
	r8 cis4 d8 eis,8. fis16 gis[ a] b8
	b8[ a] a4 r2
	r8 dis[ e] g! fis e16 d] e8. cis16
	b16[ gis ais8] ~ ais16[ cis d32 cis b16] eis[ fis] fis,8 e' r
	r8 dis e g \appoggiatura g16 fis8[ e16 dis] e4 ~
	e16[ fis e dis] e[ d c b] c32[ b a16 dis8] ~ dis16[ e] e,8
	g4( fis^\trill) e4 r 
}

flautauno = \relative c'' {
  b8( cis4) ais8-. b-. g'-. g( fis)
  fis,-. fis'-. fis(e) e,-. e'-. e( d)
  d8( e4) cis8-. d-. b'-. b( a)
  a,-. a'-. a( g) g,-. g'-. g( fis)
  fis8( gis4) a4 dis, e8 ~
  e8 ais4 b eis, fis8 ~
  fis8 cis-. cis( d) e-. g,-. g( fis)
  fis-. e'( d cis) fis( e) d( cis)
  b8(-\p( cis4) ais8 b-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d8( e4) cis8 d-. b'-. b( a)
  a,-. a'-. a( g) g,-. g'-. g( fis)
  fis-. f( e d) c8-. c-. b16( c a8)
  g8-. g'( fis e) d-. d-. cis16( d b8)
  ais-. cis( d) ais-. b-. dis( e) b-.
  cis-. eis( fis) cis-. d-. fis( g) dis-.
  e1 ~
  e8 b( ais) e'-. d-. ais( b) d-.
  e,1
  r8 e'( d) cis-. fis8 b, fis d'
  \appoggiatura cis8 b8-\f( cis4) ais8-. b-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d8( e4) cis8-. d-. b'-. b( a)
  a,-. a'-. a( g) g,-. g'-. g( fis)
  fis8( gis4) a4 dis, e8 ~
  e ais4 b eis, fis8 ~
  fis8 cis-. cis( d) e-. g,-. g( fis)
  fis-. e'( d cis) fis( e) d( cis)
  b8^\fermata \noBeam 
  cis(-\p d) b-. \appoggiatura a8 gis4 r8 a8
  b8-. cis-. d4.( cis8) cis4
  r8 dis( e) cis-. \appoggiatura b8 ais4. b8
  cis-. d!-. e4.( d8) d4
  r8 eis,4 fis8 gis b16( a) b8 b ~
  b ais16( cis) b( d) cis( e) d8( cis b) eis-.
  fis( dis) bis( cis) e4 dis^\trill
  cis8-. gis'-. gis( fis) fis,-. fis'-. fis( e)
  e,8 e'4( fis8) gis,8.^\trill a16 b16( cis d8)
  d8( cis) e( d) d,-. d'-. d( cis)
  cis8 cis4( d8) eis,8.^\trill fis16 gis( a b8)
  b( a) cis'( b) b,-. b'-. b( a)
  a,-. \noBeam dis( e) g-. fis8( e16 d) \appoggiatura d8 e8. cis16
  b16( gis ais8 ~ ais16 cis d32 cis b16) eis16(fis) fis,8 e'-. r
  r8 dis( e) g-. g16( fis e dis) e4 ~
  e16 fis( e dis e d c b) c32( b a16) dis8 ~ dis16( e) e,8-.
  g8 r fis4^\trill e4 r
}

flautados=\relative c''{
  b8( cis4) ais8-. b-. e-. e( d)
  fis,-. d'-. d( cis) e,-. cis'-. cis( b)
  d8( e4) cis8-. d-. g-. g( fis)
  a,-. fis'-. fis( e) g,-. e'-. e( d)
  fis8( gis4) a4 dis, e8 ~
  e8 ais4 b eis, fis8 ~
  fis8 ais,-. ais( b) cis-. e,-. e( d)
  fis-. e'( d cis) fis( e) d( cis)
  b4 r r8 e-.-\p e( d)
  fis,-. d'-. d( cis) e,-. cis'-. cis( b)
  b8 r r4 r8 g'-. g( fis)
  a,8-. fis'-. fis( e) g,-. e'-. e( d)
  d8 r r4 r2
  R1*3
  r8 a'-. a( g) g,-. g'-. g( fis)
  fis8 r r4 r2
  r8 cis-. cis( d) e-. g,-. g( fis)
  fis8 r r4 r2
  b8(-\f cis4) ais8-. b-. e-. e( d)
  fis,-. d'-. d( cis) e,-. cis'-. cis( b)
  d8( e4) cis8-. d-. g-. g( fis)
  a,-. fis'-. fis( e) g,-. e'-. e( d)
  fis8( gis4) a4 dis,4 e8 ~
  e8 ais4 b eis, fis8 ~
  
  fis ais,-. ais( b) cis-. e,-. e( d)
  d-. e'( d cis) fis( e) d( cis)
  b4^\fermata r4 r2
  R1*6
  r8 e-.-\p e( dis) fis,-. dis'-. dis( cis)
  e,4 r r2
  r8 cis'-. cis( b) d,-. b'-. b( a)
  a8 r r4 r2
  r8 a'-. a( gis) b,-. gis'-. gis( fis)
  a,4 r r2
  R1*4
}

violinuno = \relative c'' {
  b8( cis4) ais8-. b-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d8( e4) cis8-. d-. b'-. b( a)
  a,-. a'-. a( g) g,-. g'-. g( fis)
  fis8( gis4) a4 dis, e8 ~
  e8 ais4 b eis, fis8 ~
  fis8 cis-. cis( d) e-. g,-. g( fis)
  fis-. e'( d cis) fis( e) d( cis)
  b-.-\p g-. g( fis) fis-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d-. b-. b( a) a-. b'-. b( a)
  a,-. a'-. a( g) g,-. g'-. g( fis)
  fis8( gis4) a4 dis, e8 ~
  e ais4 b eis, fis8
  fis2 ~ fis8 fis( e d)
  cis2 ~ cis8 c( b a)
  g8-. a'-. a( g) g,-. g'-. g( fis)
  fis2 ~ fis4 fis,
  b8-. cis-. cis( d) e-. g,-. g( fis)
  fis8 r r4 r2
  b8(-\f cis4) ais8-. b-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d8( e4) cis8-. d-. b'-. b( a)
  a,-. a'-. a( g) g,-. g'-. g( fis)
  fis8( gis4) a4 dis, e8 ~
  e ais4 b eis, fis8 ~
  fis cis-. cis( d) e-. g,-. g( fis)
  fis-. e'( d cis) fis( e) d( cis)
  b4^\fermata r r2
  R1*6
  r8 gis'-.-\p gis( fis) fis,-. fis'-. fis( e)
  e,4 r r2
  r8 e'-. e( d) d,-. d'-. d( cis)
  cis,4 r r2
  r8 cis''-. cis( b) b,-. b'-. b( a)
  a,4 r r2
  R1*4
}

violindos=\relative c'{
  fis8( g4) e8-. fis-. e'-. e( d)
  d,-. d'-. d( cis) cis,-. cis'-. cis( b)
  b8 b4 a8-. a-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d8( b4) e4 fis, b8 ~
  b8 cis4 fis gis,4 cis8 ~
  cis8 ais-. ais( b) cis-. e,-. e( d)
  d8 b'4( ais8) b( cis) b( ais)
  fis-.-\p e-.(e-. e-.) d-. e'-. e( d)
  d,-. d'-. d( cis) cis,-. cis'-. cis( b)
  b-. e,-. g-.( g-.) fis-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d4 b c fis,
  g cis d gis,
  ais8-. e'( d cis) b2 ~
  b8 b( a g) fis-. a( g fis)
  e-. fis-. fis( g) g-. b-. b( cis)
  cis2 ~ cis4 b4 ~
  b8 ais-. ais( b) cis-. e,-. e( d) 
  d8 r r4 r2
  fis8(-\f g4) e8-. fis-. e'-. e( d)
  d,-. d'-. d( cis) cis,-. cis'-. cis( b)
  b8 b4( a8) a-. g'-. g( fis)
  fis,-. fis'-. fis( e) e,-. e'-. e( d)
  d8( b4) e4 fis, b8 ~
  b cis4 fis gis, cis8 ~
  cis ais-. ais( b) cis-. e,-. e( d)
  d-. b'4( ais8) b( cis) b( ais)
  fis4^\fermata r4 r2
  R1*6
  r8 e'-.-\p e( dis) dis,-. dis'-. dis( cis)
  cis,4 r r2
  r8 cis'-. cis( b) b,-. b'-. b( a)
  a,4 r r2
  r8 a''-. a( gis) gis,-. gis'-. gis( fis)
  fis,4 r r2
  R1*4
}

viola=\relative c'{
  d8( e4) cis8-. d4 ais
  b fis ais fis
  fis'8( g4) e8-. fis4 cis
  d a cis a
  a'8 d, e4 ~ e8 a, b4 ~
  b8 e fis4 ~ fis8 b, cis4 ~
  cis e ais, ais'
  b8 e,( fis g) fis( g) fis( e)
  d-.-\p ais-. ais-.( cis-.) d4 ais
  b fis ais fis
  b e8-.( e-.) fis4 cis
  d4 a cis a
  d e a, b
  b fis' b, cis
  cis8-. ais( fis' e) d8 b4 e8 ~
  e d( cis e) d-. dis( e b)
  e-. a,-. a( b) b-. e-. g( cis,)
  fis2 ~ fis8 e( d) fis-.
  g2 ~ g8 ais,-. ais( b)
  b8 r r4 r2
  d8(-\f e4) cis8-. d4 ais
  b fis ais fis
  fis'8( g4) e8-. fis4 cis
  d a cis a
  a'8 d, e4 ~ e8 a, b4 ~
  b8 e fis4 ~ fis8 b, cis4 ~
  cis e ais, ais'
  b8-. e,( fis g) fis( g) fis( e)
  d4^\fermata r r2
  R1*6
  cis4-\p gis bis gis
  cis r r2
  a4 e gis e
  a r r2
  fis'4 cis eis cis
  fis4 r r2
  R1*4
}

cello=\relative c'{
  b8 b,( b b) b4 r
  R1
  b'8 g e a d,4 r
  R1
  d8-. f'( e d) c-. c( b a)
  g-. g( fis e) d-. d( cis b)
  ais4 cis fis, cis'
  d8-. g,( fis e) d e fis4
  b'8 
  \once \override DynamicText.X-offset = #-2
   b,(^\p b b) b4 r
  R1
  b'8 g e a d,4 r
  R1
  r2 r4 b'
  e, r r cis'
  fis, r8 fis, g4 r8 gis
  a4 r8 ais b4 r8 b
  c-. c'-. c( b) b,-. b'-. b( ais)
  ais,4 fis b d
  g, g' ais, cis
  d,8 g'( fis) e-. d8 e fis4
  b8-\f b,( b b) b4 r
  R1
  b'8 g e a d,4 r
  R1
  d8-. f'( e d) c-. c( b a)
  g8-. g( fis e) d-. d( cis b)
  ais4 cis fis, cis'
  d8-. g,( fis e) d e fis4
  b4^\fermata r8 d^\p e e'( fis) d-.
  gis,4 r8 e a-. b( a g)
  fis-. a( g) e-. cis fis'( g) e-.
  ais,4 r8 fis b-. cis( b a)
  gis-. cis( d) fis,-. eis-. fis( gis) d-.
  cis-. cis'( d) fis,-. eis-. fis( gis) d-.
  cis-. gis'( a) fis-. gis fis gis gis,
  cis4 r r2
  r8 cis'( b a) b-. a( gis) e-.
  a4 r r2
  r8 a( gis fis) gis-. (fis eis) cis-.
  fis4 r r2
  r8 fis( g) b,-. ais-. b( cis) g!
  fis fis'( g) b, ais-. b( cis) g!
  fis-. b( c) e,-. dis-. b''( c) a(
  b) fis( g) dis( e) b( c) ais-.
  b2 e,4 r
}

cifrado=\figuremode{
s8 <7\\ 4 2>4. <5 3>4 s
s1
s8 <6>4 <7>8 s4 s
s1
s8 <6 4 2+> <_+>4 <6>8 <4 2+> <_+>4
<6>8 <4 2\+> <_+>4 <6>8 <6 4\+ 2\+> <_+>4
<6>4 <6\\> <7 _+> <6\\ 5!>
<6>8 <6> <6 4> <6 4\+ 3> <6> <6> <6 4> <5 _+>
s8 <7\\ 4 2>4. <5 3>4 s
s1
s8 <6>4 <7>8 s4 s
s1
s2. <7 _+>4
s2. <7 _+>4
s4 s8 <_+> <5>4 s8 <6>
s4 s8 <6> s4 s8 <6 _+>
<5> \bassFigureExtendersOn <6> <6> <6 4> <6\! 4\!>4 <6 4>8 <6\! 5>
\bassFigureExtendersOff
<6 5>4 <7 _+> <9> <6>
<6> <6 4 2\+> <7 5> <6\\>
<6>8 <6> <6 4> <6 4\+ 2> <6>8 s <6 4> <5 _+>
s8 <7\\ 4 2>4. <5 3>4 s
s1
s8 <6>4 <7>8 s4 s
s1
s8 <6 4 2+> <_+>4 <6>8 <4 2+> <_+>4
<6>8 <4 2\+> <_+>4 <6>8 <6 4\+ 2\+> <_+>4
<6> <6\\> <7 _+> <6\\ 5!>
<6>8 <6> <6 4> <6 4\+ 3> <6> <6> <6 4> <5 _+>
s4 s8 <6> <_+>4 <5>
<6 5> s8 <7 _+> <4>4 <3>
<5>8 <6 4\+ 2> <6> <6> <6\\> <7 _+>4 <5>8
<6 5>4 s8 <7 _+>8 <4>4 <3>
<6\\>8 <_+> <4\+ 2\+> <6 4> <6 5> <6 4> <6\\ 5> <6>
<7 _+> <6\\ _!> <6> <_+> <7 5> <5> <7> <6 4\+ 2\+>
<6 4>8 <7 _+> <6 4\+ 2\+> <7 5> <6 4>4 <5\+ _+>
s1
r8 <5>4 <6>8 \bassFigureExtendersOn <6\\> <6\\> <6 5>4
<4>4 <3> s2
r8 <6> <6> \bassFigureExtendersOff <6> <6\\>4 <6 5>
<4>4 <3> s2
r8 <6\\> <6> <6 4> <6 5>4 <7>8 <6 4 3>
<4>8 <_+> <6 4\+ 2\+> <6 4 3>
<6 5> <5 3> <7> <6 4 3>
<7 _+> <7! _+> <5> <6!> <7! 5> <_+> <5> <6 5 _!>
<6 4> <6\\ 4 3> <6> <6 5> <6! 4> <7 _+> <6 4\+ 2+> <7 5>
<6 4>4 <5 _+> s2
}

guia=\relative c'{
  s1*7
  fis8-. e'( d cis) fis( e) d( cis)
  s1
  fis,8-. fis'-. fis( e) e,-. e'-. e( d)
  s1
  s1 %a8-. a'-. a( g) g,-. g'-. g( fis)
  
  s1*15
  fis,8-. e'( d cis) fis( e) d( cis)
  b8^\fermata s8 s4 s2
  s1*16
}

textosoprano=\lyricmode{
Blu -- te nur
blu -- te nur
blu -- te nur du lie -- bes Herz,
blu -- te nur du lie -- bes Herz,
blu -- te nur du lie -- bes Herz,
blu -- te nur du lie -- bes Herz,
blu -- te nur du lie -- bes Herz
blu -- te nur du lie -- bes Herz!

Ach ein Kind
das du er -- zo -- gen
das an dei -- ner Brust ge -- so -- gen
droht den Pfle -- ger zu er -- mor -- _ _ den,
denn es ist zur Schlan -- ge wor -- den.
Ach ein Kind
das du er -- zo -- gen
das an dei -- ner Brust ge -- so -- gen
droht den Pfle -- ger zu er -- mor -- _ _ den,
denn es ist zur Schlan -- _ _ _ ge wor -- den.
}



\score {\transpose c' c'{
<<

\new StaffGroup << 
  \set StaffGroup.systemStartDelimiterHierarchy
    = #'(SystemStartBracket (SystemStartBrace a b) (SystemStartBrace c d ))
  
       \new Staff <<\global
	\new Voice="f1" {
		\set Staff.instrumentName=\markup{\smaller \center-column{"Flauto " \raise #.7 "traverso I "}}
		\clef "treble"
		\flautauno }
	>> 

       \new Staff <<\global
	\new Voice="f2" {
		\set Staff.instrumentName=\markup{\smaller \center-column{"Flauto " \raise #.7 "traverso II "}}
		\clef "treble"
		\flautados }
	>> 

       \new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName=\markup{"Violino I "}
		\clef "treble"
		\violinuno }
	>> 
	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName=\markup{"Violino II "}
		\clef "treble"
		\violindos }
	>>  
        \new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName=\markup{"Viola "}
		\clef "alto"
		\viola }
	>> 
	

>> % StaffGroup

        \new Staff <<\global
	\new Voice="v6" {
		\set Staff.instrumentName="Soprano"
		\clef "treble"
		\soprano }
	\new Lyrics \lyricsto "v6" {\textosoprano }
	>>

        \new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName=\markup{\smaller \center-column{"Organo e" "Continuo"}}
		\clef "bass"
		\cello }
	\new FiguredBass {\cifrado }
	>> 

%{      \new Staff \with{ 
      \remove Ambitus_engraver
      fontSize = #-3
      \override StaffSymbol #'staff-space = #(magstep -4)
      }<<\global
	\new Voice="g" {
		\clef "treble"
		\guia }
	>>

%}
>>

} % transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override LyricText.font-size = #1.2
		\override LyricHyphen.minimum-distance = #0.5
	}
	\context {\Score 
		tempoHideNote = ##t
		\override BarNumber.padding = #2 
	}
	\context {\Voice 
		%melismaBusyProperties = #'()
		%autoBeaming = ##f
	}
	\context {\Staff 
                \RemoveEmptyStaves %notablet
                %\override VerticalAxisGroup.remove-first = ##t
		\override VerticalAxisGroup.staff-staff-spacing =
			#'((basic-distance . 10) (minimum-distance . 0) (padding . 1))
		%\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string \htitle \hcomposer }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page \hcomposer \on-the-fly #not-first-page \htitle \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=20
	%page-count = 1
	ragged-last-bottom = ##f
	indent=1.6\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 12) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}