\version "2.4.0"
% $Revision: 1.2 $

\header {
     title = "28 melodische Übungsstücke"
     subtitle = "27."
     composer = "Anton Diabelli"
     opus = "Op 149"

     mutopiatitle = "28 melodische Übungsstücke"
     mutopiacomposer = "Anton Diabelli"
     mutopiaopus = "Opus 149-27"
     mutopiainstrument = "Piano, Piano"
     source = "If I could know..."
     style = "Classical"
     copyright = "Creative Commons Attribution-ShareAlike 2.0"
     maintainer = "Alberto Simões"
     maintainerEmail = "ambs@cpan.org"
     maintainerWeb = "http://alfarrabio.di.uminho.pt/~albie"
     lastupdated = "2005/May/15"

footer = "Mutopia-2005/05/15-560"
tagline = "\\raisebox{5mm}{\\parbox{188mm}{\\thefooter\\quad\\small\\noindent " + \footer + " \\hspace{\\stretch{1}} This music is part of the Mutopia project: \\hspace{\\stretch{1}} \\texttt{http://www.MutopiaProject.org/}\\\\ \\makebox[188mm][c]{It has been typeset by " + \maintainer + ". Copyright \\copyright \\ The Mutopia Project \\& "+ \maintainer + " 2005.} \\makebox[188mm][c]{\\footnotesize This work is licensed under the Creative Commons Attribution-ShareAlike License. To view a copy of that license visit} \\makebox[188mm][c]{\\texttt{http://creativecommons.org/licenses/by-sa/2.0/} \\footnotesize or write to Creative Commons, 559 Nathan Abbott Way, Stanford, California 94305, USA.}}}"
}

primoDynamics =  {
     s8\p s8-\markup\italic{dolce} s4 s2 s1 s1 s1
     s4..\f s16\p s2 s1 s8\< s4 s4 s4 s8\! s8\> s4 s4 s8\! s4
     s1\p s1\f s1 s1
     s4..\f s16\p s2 s1 s8\< s4 s4 s4 s8\! s8\> s4 s4 s8\! s4
}

primoUp =  {
     \time 4/4
     \clef treble
     \key e \major
     \relative c''' {
         \override Score.OttavaBracket   #'padding = #2
	#(set-accidental-style 'modern)
	\set fingeringOrientations = #'(left)
	\repeat volta 2 {
	    b4..(-5-> gis16-3 e4)-1 r8. gis16
	    b4..(-> a16-4 fis4)-2 r8. fis16
	    gis4-3 gis( b4-> a8[) r16 gis]
	    fis4.(-2 a16-4 gis fis4) r

	    \acciaccatura{ gis16[-3 a]-5} b4..(->-5 gis16-3 e4) r8. gis16
             b4(~->-5 b16 a gis a fis4)-2 r8. fis16
	    gis8(-3-> b16) r fis8(-2-> a16) r e8(->-1 gis16) r fis8(-2-> b16)-5 r
	    b2( e,4) r
	}
	\repeat volta 2 {
	    fis4..-2-> fis16( a4)-4 r8. a16
	    gis4..(-3-> fis16 e4) r8. e16-1
	    fis4(-2 gis8.) gis16 b8(-5 a gis fis)
	    e4(-1 gis8.-3 b16)-5 fis4-2 r

	    \acciaccatura{ gis16[-3 a]-5} b4..(->-5 gis16-3 e4) r8. gis16
             b4(~->-5 b16 a gis a fis4)-2 r8. fis16
	    gis8(-3-> b16) r fis8(-2-> a16) r e8(->-1 gis16) r fis8(-2-> b16)-5 r
	    b2( e,4) r
	}
     }
}

primoDown =  {
     \time 4/4
     \clef treble
     \key e \major
     \relative c'' {
	#(set-accidental-style 'modern)
	\set fingeringOrientations = #'(left)
	\repeat volta 2 {
	    <gis-3 b-1>2 r8 <gis b>8(-. <gis b>-. <gis b>)-.
	    <a-2 b-1>2 r8 <a b>8(-. <a b>-. <a b>)-.
	    gis4-3 gis( b-> a8[) r16 gis]
	    fis4.(-4 a16-2 gis fis4) r

	    <gis-3 b-1>2 r8 <gis b>(-. <gis b> <gis b>)-.
	    <a-2 b-1>2 r8 <a b>(-. <a b>-. <a b>)-.
	    gis8(-3-> b16) r fis8(-4-> a16) r e8(->-5 gis16) r fis8(-4-> b16)-1 r
	    r8 <a-2 b-1>(-. <a b>-. <a b>)-. <gis-3 b-1>4 r
	}
	\repeat volta 2 {
	    fis4..->-4 fis16( a4)-2 r8. a16
	    gis4..(->-3 fis16 e4) r8. e16-5
	    fis4( gis8.) gis16 b8(-1 a gis fis)
	    e4(-5 gis8.-3 b16)-1 fis4-4 r


	    <gis-3 b-1>2 r8 <gis b>(-. <gis b> <gis b>)-.
	    <a-2 b-1>2 r8 <a b>(-. <a b>-. <a b>)-.
	    gis8(-3-> b16) r fis8(-4-> a16) r e8(->-5 gis16) r fis8(-4-> b16)-1 r
	    r8 <a-2 b-1>(-. <a b>-. <a b>)-. <gis-3 b-1>4 r
	}
     }
}

secondoDynamics =  {
     s1\p s1
     s1 s1 s16\f s16\p s8 s4 s2
     s1 s8\< s4 s4 s4 s8\! s8\> s4 s4 s8\! s4

     s1\p s1\f
     s1 s1 s16\f s16\p s8 s4 s2
     s1 s8\< s4 s4 s4 s8\! s8\> s4 s4 s4 s8\!
}

secondoUp =  {
     \time 4/4
     \clef bass
     \key e \major
     \relative c' {
	#(set-accidental-style 'modern)
	\set fingeringOrientations = #'(left)
	\repeat volta 2 {
	    r16 gis(-2 b-3 e-5 b-3 gis b e) r gis,( b e b gis b e)
	    r16 a,(-1 b-2 fis'-5 b,-2 a b fis') r a,( b fis' b, a b fis')

	    r16 e(-5 b-3 gis-2 e-1 b' gis e) r cis(-2 fis-4 a-5 fis-4 cis fis a)
	    r16 dis,(-2 fis-3 b-5 fis-3 dis fis b) r dis,( fis b a-4 gis fis b)
	    r16 gis(-2 b-3 e-5 b-3 gis b e) r gis,( b e b gis b e)

	    r16 a,(-1 b-2 fis'-5 b,-2 a b fis') r a,( b fis' b, a b fis')
	    r16 e(-5 b-3 gis)-3 r cis(-5 a-3 fis)-2 r gis(-3 e-1 b')-5 r a(-2 fis-1 dis')-5
	    r16 a(-1 b-2 dis-4 b-2 a b dis) <gis,-1 b-2 e-5>4 r
	}
	\repeat volta 2 {
	    r16 fis(-1 b-3 dis-5 b-3 fis b dis,) r fis(-1 a-2 cis-4 a-2 fis a cis)
	    r16 dis,(-1 gis-3 bis-5 gis-3 dis gis bis) r e,(-1 gis-2 cis-5 gis-2 e gis cis)

	    r16 fis,(-2 a-3 cis-5 eis,-2 b'-4 cis b) r fis(-2 a-3 cis-5 a-3 fis a cis)
	    r16 gis(-3 b-5 gis e-1 gis-3 b gis) r (dis-2 fis-3 b-5 a-4 gis fis b)-5
	    r16 gis(-2 b-3 e-5 b-3 gis b e) r gis,( b e b gis b e)

	    r16 a,(-1 b-2 fis'-5 b,-2 a b fis') r a,( b fis' b, a b fis')
	    r16 e(-5 b-3 gis-2) r cis(-5 a-3 fis)-2 r gis(-3 e b')-5 r a(-2 fis dis')-5
	    r16 a(-1 b-2 dis-4 b-2 a b dis) <gis,-1 b-2 e-5>4 r
	}
     }	
}	

secondoDown =  {
     \time 4/4
     \clef bass
     \key e \major
     \relative c, {
	#(set-accidental-style 'modern)
	\set fingeringOrientations = #'(left)
	\repeat volta 2 {
	    <e e'>4 r e8 r e' r
	    <dis,-4 dis'>4 r dis8 r dis' r

	    <e, e'>4 r <a, a'> r
	    <b b'> r <b b'> r
	    <e e'> r e8 r e' r

	    <dis,-4 dis'>4 r dis8 r dis' r
	    <e, e'>8 r a-3 r b-2 r b-1 r
	    b,4 b' <e,-5 b'-2 e-1> r
	}
	\repeat volta 2 {
	    b'4-1 r  fis-2 r
	    <gis, gis'>2 <cis cis'>4 r

	    a'4-2-> gis-> fis-> a-2->
	    b(-1 b, b') r
	    <e, e'>4 r e8 r e'8 r

	    <dis,-4 dis'>4 r dis8 r dis' r
	    <e, e'>8 r a-3 r b-2 r b-1 r
	    << { b,4 b' } \\ {b,2 } >> <e-4 b'-2 e-1>4 r
	}
     }
}

\score{
     \context PianoStaff  <<
	\set PianoStaff.instrument = "Secondo     "
	\context Staff = "up"   \secondoUp
	\context Dynamics = "dynamics" \secondoDynamics
	\context Staff = "down" \secondoDown
>>
     \layout {
	\context {
	    \type "Engraver_group_engraver"
	    \name Dynamics
	    \consists "Output_property_engraver"

	    minimumVerticalExtent = #'(-1 . 1)

	    \consists "Script_engraver"
	    \consists "Dynamic_engraver"
	    \consists "Text_engraver"
	
	    \override TextScript #'font-size = #2
	    \override TextScript #'font-shape = #'italic
	    \override DynamicText #'extra-offset = #'(0 . 2.0)
	    \override Hairpin #'extra-offset = #'(0 . 2.0)
	
	    \consists "Skip_event_swallow_translator"
	
	    \consists "Axis_group_engraver"
	}
	\context {
	    \PianoStaff
	    \accepts Dynamics
	    \override VerticalAlignment #'forced-distance = #7
	}
     }
     \header { piece = "Andante." }
}


\score{
     \context PianoStaff <<
	\set PianoStaff.instrument = "Primo     "
	\context Staff = "up"   \primoUp
	\context Dynamics = "dynamics" \primoDynamics
	\context Staff = "down" \primoDown
>>

     \layout {
	\context {
	    \type "Engraver_group_engraver"
	    \name Dynamics
	    \consists "Output_property_engraver"

	    minimumVerticalExtent = #'(-1 . 1)

	    \consists "Script_engraver"
	    \consists "Dynamic_engraver"
	    \consists "Text_engraver"
	
	    \override TextScript #'font-size = #2
	    \override TextScript #'font-shape = #'italic
	    \override DynamicText #'extra-offset = #'(0 . 2.0)
	    \override Hairpin #'extra-offset = #'(0 . 2.0)
	
	    \consists "Skip_event_swallow_translator"
	
	    \consists "Axis_group_engraver"
	}
	\context {
	    \PianoStaff
	    \accepts Dynamics
	    \override VerticalAlignment #'forced-distance = #7
	}
     }
     \header { piece = "Andante."}
}



\score{
     \context PianoStaff  <<
	\context Staff = "up"   <<
	    \applymusic #unfold-repeats \primoUp
	    \applymusic #unfold-repeats \secondoUp
	>>
	\context Staff = "down" <<
	    \applymusic #unfold-repeats \primoDown
	    \applymusic #unfold-repeats \secondoDown
	>>
>>
     \midi { \tempo 4 = 70 }
}


