chopin mazurkas pt 2, monster clearer

2022-projects/06-chopin-mazurkas.ly

@@ -0,0 +1,723 @@
+\version "2.22.1"
+\language "english"
+
+#(set-global-staff-size 18)
+
+\header {
+  tagline = ""
+}
+
+\paper {
+  system-system-spacing = #'((basic-distance . 0.1) (padding . 4))
+}
+
+global = {
+  \set Staff.printKeyCancellation = ##f
+  \numericTimeSignature
+  \compressEmptyMeasures
+  \override TupletBracket #'bracket-visibility = #'if-no-beam
+  \override MultiMeasureRest.expand-limit = #3
+  \override Score.ChordName.font-name = #"Noto Serif"
+  \override Score.ChordName.font-size = #0
+  \override Score.LyricText.font-name = #"Noto Serif"
+  \override Score.LyricText.font-size = #0
+}
+
+oneR = \relative c' {
+  \time 3/4
+  \global
+  \key bf \major
+
+  \partial 4 f\f( | <d' f>4.\fz <cs e>8 \grace { <d f>16 g } <d f>8 <cs e> |
+  <d f>)-![ r16 bf]( <g ef'!>4 <f d'>) | <ef c'>4.\>( <g ef'>8\! <f d'> <ef c'> | \partial 4 <f d'>8-!) s8 |
+}
+
+oneL = \relative c, {
+  \global
+  \key bf \major
+  \clef bass
+
+  \partial 4 r4 | <bf bf'>4 <f'' bf d> q | bf, <ef bf'> <bf bf'> | <f, f'> <f'' a> r4 | \partial 4 <bf,, bf'> |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "oneR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \oneR
+      \new Staff ="oneL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \oneL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+twoR = \relative c' {
+  \time 3/4
+  \global
+  \key bf \major
+
+  <<
+    {
+      <d' f>4.( g8[ \grace { f16 g } <d f>8 <cs e>] |
+      <d f>)[ r16 bf]( \stemNeutral <\tweak Accidental.color "green" \tweak color "green" gf bf ef!>4 <f bf d>) |
+    } \\
+    {
+      \override NoteHead.color = "green" \override Accidental.color = "green" af4 af af |
+      af8[ \revert Accidental.color \revert NoteHead.color s16 bf] s2
+    }
+  >>
+
+  <<
+    { c4.( ef8 d c |\partial 4  <f, d'>8) s8 } \\
+    { \stemDown ef4 \tweak Accidental.color "green" \tweak color "green" gf <f a!>8 ef | s8 } \\
+    { \stemDown \once \override NoteColumn.force-hshift = #1.4 bf'2 s4 | s8 }
+  >>
+}
+
+twoL = \relative c, {
+  \global
+  \key bf \major
+  \clef bass
+
+  <bf bf'>4 <bf'' f'> q | <bf, bf'> <ef bf'> <f bf> |
+  <\tweak Accidental.color "green" \tweak color "green" gf bf> ef f |
+  \partial 4 <bf,, bf'> |
+}
+
+\score {
+  <<
+    \overrideProperty Score.NonMusicalPaperColumn.line-break-system-details #'((extra-offset . (0 . 2)))
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "twoR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \twoR
+      \new Staff ="twoL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \twoL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+threeR = \relative c' {
+  \time 3/4
+  \global
+  \key ef \major
+
+  c''8[(\> b] bf a af bf,\! | \partial 2 f')[ r16 g]( ef4) |
+}
+
+threeL = \relative c, {
+  \global
+  \key ef \major
+  \clef bass
+
+  ef4 \clef treble <bf'' d af'> q | \partial 2 \clef bass ef, <bf' g'> |
+  \break
+}
+
+\score {
+  <<
+
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "threeR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \threeR
+      \new Staff ="threeL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \threeL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+fourR = \relative c'' {
+  \time 12/8
+  \global
+  \key ef \major
+
+  \partial 4. \slashedGrace { ef8^( } g'8)-. f16(-. ef-. d-. c-. |
+  cf8 bf bff) bff16[( af]) af[( g]) g16.[( f32] ef2.) |
+  \break
+}
+
+fourL = \relative c {
+  \global
+  \key ef \major
+  \clef bass
+
+  \partial 4. \grace s8 a8 <f' ef'> <c' ef f> |
+  bf, <f' ef'> <bf ef af!> bf,, <f'' d'> <bf d af'> ef,, <g' ef'> <bf ef g> ef, <g ef'> <bf ef g> |
+}
+
+\score {
+  <<
+    \overrideProperty Score.NonMusicalPaperColumn.line-break-system-details #'((extra-offset . (0 . 5)))
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "fourR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \fourR
+      \new Staff ="fourL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \fourL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+sixR = \relative c'' {
+  \time 3/4
+  \global
+  \key g \major
+
+  \partial 4 <g b>8.( <a c>16 |
+  <b d>8. <as cs>16 <b d>8. <as cs>16 <b d>8.) <as cs>16 |
+  <b d>2( <c! e>8.) <gs b>16 | <a c>2( <b d>8.) <fs a>16 | \partial 2 <g b>4 r |
+}
+
+sixL = \relative c {
+  \global
+  \key g \major
+  \clef bass
+
+  \partial 4 r4 |
+  g4 b d | g g, r4 | d' d, r | \partial 4 g g, |
+}
+
+\score {
+  <<
+
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "sixR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \sixR
+      \new Staff ="sixL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \sixL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+sevenR = \relative c' {
+  \time 3/4
+  \global
+  \key e \minor
+
+  <b g'>4 <c af'> q | q <cs a'> q | q <cs as'> q | q <d b'> <ds b'> |
+  \bar "||"
+  \grace { b16(^"back to main theme" e } a!8.) g16 fs4 e |
+}
+
+sevenL = \relative c {
+  \global
+  \key g \major
+  \clef bass
+
+  <g d'> <g ef'> q | q <g e'> q | q <fs e'> q | q <b es> <b fs'> |
+  <e,! e'!> <g' b> q |
+
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "sevenR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \sevenR
+      \new Staff ="sevenL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \sevenL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+eightR = \relative c' {
+  \time 4/4
+  \global
+  \key bf \minor
+
+  \omit TupletBracket
+  \omit TupletNumber
+  \tuplet 3/2 2 {
+    s4 <c g' c>4 q( q^> <c af' c>) q( |
+    q^> q) q( q^> q) q( | <c gs' c>^> <c a' c>) q( q^> <cs a' cs>) q( |
+    q^> q) q( q^> <cs gs' cs> <df! g df'!> |
+  }
+  \partial 4 <df af'! df>) |
+}
+
+eightL = \relative c, {
+  \global
+  \key bf \minor
+  \clef bass
+
+  \omit TupletBracket
+  \omit TupletNumber
+  \tuplet 3/2 2 {
+    s4 <e e'> q q q q | <ff ff'>(-> <ef! ef'!>) q( q-> <ff ff'>) q( |
+    <e e'> q) q( q q) q( | q-> <ds ds'>) q( q-> <e e'> q |
+  }
+  \partial 4 <f f'>)-> |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "eightR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \eightR
+      \new Staff ="eightL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \eightL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+
+nineR = \relative c'' {
+  \time 3/4
+  \global
+  \key e \minor
+
+  \slashedGrace { g8 } <g c>2->\arpeggio( \tweak color "green" b4) ~ |
+  \tweak color "green" b8\fz-![\< r16
+  <\tweak color "green" b c>-.( <\tweak color "green" b cs>8-. <\tweak color "green" b d>\!] <\tweak color "green" b _~ ds>4)(\>  |
+  \partial 4 <\tweak color "green" b e>8)-!\! r8 |
+}
+
+nineL = \relative c {
+  \global
+  \key e \minor
+  \clef bass
+
+  \grace s8 g4 <g' d'> r4 | b,-. \clef treble <b' fs' a> q | \partial 4 \clef bass e,-. |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "nineR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \nineR
+      \new Staff ="nineL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \nineL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+
+tenR = \relative c'' {
+  \time 3/4
+  \global
+  \key af \major
+
+  \partial 4 c\p-> ~ |
+  c8.( bf16 af8 bf c4) ~ | \bar "||" c8.( bf16 af8 f'! ef4) | c8.( bf16 af8 bf c4 | ef,2.->) |
+}
+
+tenL = \relative c' {
+  \global
+  \key af \major
+  \clef bass
+
+  \partial 4 r4 |
+  \repeat unfold 2 {
+     <<
+       { s4 <c ef>2 } \\
+       { <g df' ff>4->^( af4 ef) }
+     >> |
+  }
+
+  <<
+    { s4 <c' ef>2 | df2. } \\
+    { <g, df' ff>4->^( af4) ef( | af8. g16 f8 g ef4) }
+  >>
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "tenR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \tenR
+      \new Staff ="tenL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \tenL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+elevenR = \relative c' {
+  \time 3/4
+  \global
+  \key af \major
+
+  \partial 8 ef8 |
+  \tuplet 3/2 { af\f bf af } g( af bf c) | \tuplet 3/2 { df( ef df) } c\<( df ef4\!)( | \partial 8 af8\fz)-! |
+
+}
+
+elevenL = \relative c' {
+  \global
+  \key af \major
+  \clef bass
+
+  \partial 8 r8 |
+  <af c ef>4( <af df ff>-> q | <g df' ff>-> <af c ef> <g bf ef> | \partial 8 <f! af df f!>8) |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "elevenR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \elevenR
+      \new Staff ="elevenL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \elevenL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+twelveR = \relative c' {
+  \time 3/4
+  \global
+  \key a \minor
+
+  R1*3/4\pp R1*3/4*2 | \tuplet 3/2 { d8( e d) } r4 r | \bar "||"
+  b'8.( c16 d4 a | \partial 2 \acciaccatura a8 c2) |
+}
+
+twelveL = \relative c' {
+  \global
+  \key a \minor
+  \clef bass
+
+  r4 <a b f'>( <a c f> | <a d f> <a b f'> <a c f> | <a d f> <a b f'> <a c f>) | r4 <a ~ c f ~>2 |
+  <a d f>4 q4 q4 |
+  \partial 2 \grace s8 <a c f>4 q |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "twelveR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \twelveR
+      \new Staff ="\twelveL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \twelveL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+thirteenR = \relative c'' {
+  \time 3/4
+  \global
+  \key a \minor
+
+  fs4\p( ds2) | f!4( d!2) | e!16( b8.)\> ~ b2\! | c16( gs8.)\> ~ gs2\! | \tuplet 3/2 4 { b8( c b a b c e8. d16 a8 } |
+  \partial 2 \acciaccatura a8 c2)-> |
+}
+
+thirteenL = \relative c {
+  \global
+  \key a \minor
+  \clef bass
+
+  <fs as e'>4 <fs as ds> q | <f! a! ef'> <f a d!> q | <e! gs d'> q q | <e a d> <e b' d> q | a, <a' d f> q |
+  \partial 2 \grace s8 <a c f>4 q |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "thirteenR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \thirteenR
+      \new Staff ="thirteenL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \thirteenL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+fourteenR = \relative c' {
+  \time 3/4
+  \global
+  \key a \major
+
+  <<
+    {
+      \override NoteHead.color = "green" \override Accidental.color = "green" e8(\< fs gs4 a |
+      b8 cs d4 e\! | f8)[ \revert NoteHead.color \revert Accidental.color r16 e\ff]( \acciaccatura g8 \stemNeutral f4.\> e8\! |
+      \stemUp \acciaccatura g8 \stemNeutral f8. e16 f4.\> b,8\!) ~ |
+      \key a \minor \bar "||"
+      b8. c16( d4 a | \partial 2 \acciaccatura a8 c2) |
+    } \\
+    { d,4 <d e> q | <d e gs> q q | <d gs>8 s8 s2 | s2. | s2. | \partial 2 \grace s8 s2 | }
+  >>
+}
+
+fourteenL = \relative c {
+  \global
+  \key a \major
+  \clef bass
+
+  <a e' b'>4 q q | q q q | q8 r16
+
+  <<
+    {
+      \stemNeutral e''16( \stemUp \acciaccatura g8 \stemNeutral f4. e8 |
+      \stemUp \acciaccatura g8 \stemNeutral f8. e16 f2) ~ |
+      \key a \minor
+      \stemUp f2. ~ |
+      \partial 2 \grace s8 f2 |
+    } \\
+    { s16 s2 | \grace s8 s2. | <a, d>4 q q | \partial 2 \grace s8 <a c>4 q | }
+  >>
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "fourteenR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \fourteenR
+      \new Staff ="fourteenL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \fourteenL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+fifteenR = \relative c'' {
+  \time 3/4
+  \global
+  \key a \minor
+
+  \acciaccatura a8 c2( b8 c |
+  \override NoteHead.font-size = #-3 \tuplet 15/6 {
+    d[ e d cs d b' f a e g d f a, g d']
+  } |
+  \stemNeutral \revert NoteHead.font-size
+  e2.->) |
+}
+
+fifteenL = \relative c' {
+  \global
+  \key a \minor
+  \clef bass
+
+  \grace s8 <a c f>4 q <af c f> |
+  <g c f> <g b f'> q | <g b e> q q |
+}
+
+\score {
+  <<
+    \new PianoStaff <<
+      \set PianoStaff.connectArpeggios = ##t
+      \new Staff = "fifteenR" \with {
+        midiInstrument = "acoustic grand"
+      } \relative c'' \fifteenR
+      \new Staff ="fifteenL" \with {
+        midiInstrument = "acoustic grand"
+      } { \relative c' \fifteenL }
+    >>
+  >>
+  \layout {
+    indent = 0
+    \context {
+      \Score \omit BarNumber
+    }
+    \context {
+      \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}

2022-projects/07-monster-clearer.ly

@@ -0,0 +1,178 @@
+\version "2.22.1"
+\language "english"
+
+#(set-global-staff-size 18)
+
+\header {
+  title = "Background"
+  subtitle = "from the game \"Monster Clearer\""
+  composer = "adventale"
+  arranger = "transcribed by Tommy Montgomery (https://tmont.com)"
+  tagline = ""
+}
+
+\paper {
+  % system-system-spacing = #'((basic-distance . 0.1) (padding . 4))
+}
+
+global = {
+  \set Staff.printKeyCancellation = ##f
+  \numericTimeSignature
+  \compressEmptyMeasures
+  \override TupletBracket #'bracket-visibility = #'if-no-beam
+  \override MultiMeasureRest.expand-limit = #3
+  \override Score.ChordName.font-name = #"Noto Serif"
+  \override Score.ChordName.font-size = #0
+  \override Score.LyricText.font-name = #"Noto Serif"
+  \override Score.LyricText.font-size = #0
+  \tempo 4 = 114
+  \key f \major
+}
+
+lute = \relative c' {
+  \time 4/4
+  \global
+
+
+  a'2 f | c'8 bf a f c4 f | g2 e ~ | e4 e8 c g4 c |
+  a'2 f | c'8 f e c a4 f | g2 e | c g'8 c e, g |
+
+  a8 g a c d4 c | c8 bf a f c4 f |
+  g4 a8 c d4 e ~ | e e,8 c g4 c |
+  a'8 g a c d4 c | c8 f e c a4 f |
+  g2 e | e'8 d c g e c' e g |
+
+  R1 |
+  a,4 c d8 c a' g |
+  R1 |
+  e4 d ~ d8 c e g |
+  R1 |
+  c,4 d c8 e g a |
+  R1 |
+  e4 d c r |
+
+  r8 a4 f8 ~ f c4 a8 ~ | a f'4 c8 ~ c a4 c8 ~ |
+  c g'4 e8 ~ e c4 g8 ~ | g e'4 c8 ~ c g4 c8 ~ |
+
+  \repeat unfold 2 {
+    c8 a'4 f8 ~ f c4 a8 ~ | a f'4 c8 ~ c a4 c8 ~ |
+    c g'4 e8 ~ e c4 g8 ~ | g e'4 c8 ~ c g4 c8 ~ |
+  }
+
+  c8 a'4 f8 ~ f c4 a8 ~ | a f'4 c8 ~ c a4 c8 ~ |
+  c g'4 e8 ~ e c4 g8 ~ | g e'4 c8 ~ c g4 c8 |
+
+  a'4 c d c | R1 | g4 c d e | R1 |
+  a,4 c d c | R1 | g4 c d e | d4 c8 a ~ a4 f8 g |
+
+
+}
+
+piano = \relative c {
+  \global
+  \clef bass
+
+  \repeat unfold 2 {
+    c4 f a f | c f <c f a> c' |
+    c,4 e g e | c e <c e g> c' |
+    c,4 f a f | c f <c f a> <a' c>  |
+    c,4 e g e | c e <c e g>2 |
+  }
+
+  \repeat unfold 2 {
+    c4 f a f | c f a c |
+    c, e g e | c e g c |
+  }
+
+  \repeat unfold 4 {
+    c, f a f | c f a c |
+    c, e g e | c e g c |
+  }
+
+  <<
+    { c,4 f8 c a' c, f a | c,4 f8 c' a c, c' c, | c4 e8 e g c, e c' | c,4 e8 c' g c, c' g | } \\
+    { c,4 f a f | c f a c | c, e g e | c e g c | }
+  >>
+
+  <<
+    { c,4 f8 c' a c, f c' | c,4 f8 c' a c, c' g | c,4 e8 c' g c, e c' | c,4 e8 c' a c, f4 | } \\
+    { c4 f a f | c f a c | c, e g e | c e a f | }
+  >>
+
+  \bar "|."
+}
+
+flute = \relative c'' {
+  \global
+
+  R1*16 |
+  a8 g a c, c'4 a8 g | a4 r4 r2 |
+  f8 e4 c8 ~ c e a g | r1 |
+  a8 g a c, c'4 d8 a | c4 d8 a ~ a4 r4 |
+  f8 e4 c8 ~ c e a g | e'4 d r8 d e g |
+
+  a4 a g r | f1 | e | c |
+  f, | d'8 c ~ c2. | a1 | a8 g a4 a8 c d f |
+
+  <<
+    { a4 a g r | } \\
+    { r4 f, a c }
+  >> |
+  f2. c4 | g'2 f4 e | c1 |
+  f,2 a4 c | d8 c ~ c2. |
+  g2 bf4 c | a8 g4 c,8 e a c e |
+
+  a8 g r4 r2 | a,4 c8 d r e8 r4 |
+  g,4 r4 r2 | e'4 d8 c r g8 r4 |
+  R1 | a4 c8 d r e8 r8 g, |
+  g4 r4 r2 | R1 |
+
+}
+
+luteMelody = \new Staff \with {
+  midiInstrument = "acoustic guitar (nylon)"
+  instrumentName = "Lute"
+  midiMinimumVolume = #.6
+  midiMaximumVolume = #.6
+} \lute
+luteBass = \new Staff \with {
+  midiInstrument = "acoustic grand"
+  instrumentName = "Piano"
+  midiMinimumVolume = #.7
+  midiMaximumVolume = #.7
+} \piano
+fluteStaff = \new Staff \with {
+  midiInstrument = "flute"
+  instrumentName = "Flute"
+  midiMinimumVolume = #.85
+  midiMaximumVolume = #.85
+} \flute
+
+\score {
+  <<
+    \fluteStaff
+    \luteMelody
+    \luteBass
+  >>
+  \layout {
+    \context {
+      % \Staff \RemoveEmptyStaves
+      \override Glissando.minimum-length = #4
+      \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
+      \override Glissando.thickness = #2
+      \override VerticalAxisGroup.remove-first = ##t
+    }
+  }
+}
+
+\score {
+  \unfoldRepeats {
+    <<
+      \fluteStaff
+      \luteMelody
+      \luteBass
+    >>
+  }
+
+  \midi {}
+}