Thema mit einer Variation/score

Lilypond Score

\version "2.19.52"
\language "deutsch"

tra=\markup { \dynamic p \normal-text \italic "tranquillo" }
ptran = #(make-dynamic-script tra)
at=\markup { \normal-text \italic "a tempo" }
ate=#(make-dynamic-script at)
rrit=\markup { \dynamic pp \normal-text \italic "ritenuto" }
pprit = #(make-dynamic-script rrit)
po=\markup { \normal-text \italic "poco rit." }
pori=#(make-dynamic-script po)


pplegr=\markup { \dynamic p \normal-text \italic "snd." \dynamic mf }
psndf = #(make-dynamic-script pplegr)

Dynb = {
  %\set alignBelowContext ="Discant"
  \partial 2
  s2\psndf s1*7
}

myTitel = "Thema mit einer Variation G-Dur"
mycomp="C Gurlitt"


\layout {
  \context {
    \Voice
    beamExceptions = #'()
    \override BreathingSign.text =
    \markup { \musicglyph #"scripts.lvarcomma" }
    \override Stem.neutral-direction = #down
    \override Script.outside-staff-priority = #'()
    \override Script.padding = #1
    \override Tie.thickness = #1
    \override PhrasingSlur.thickness = #3
    \override Rest.voiced-position = #0
    \override MultiMeasureRest.expand-limit = #3
  }
  \context {
    \Staff
    printPartCombineTexts = ##f
    beamExceptions = #'()
    \override BreathingSign.text =
    \markup { \musicglyph #"scripts.lvarcomma" }
    \override InstrumentName.font-features = #'("smcp")
  }
  \context {
    \PianoStaff
    \override VerticalAxisGroup.staff-staff-spacing.basic-distance = #13
  }
  \context {
    \Score
    \override VerticalAxisGroup.remove-first = ##t
    skipBars = ##f
    \override MetronomeMark.font-size = #1
    \override MetronomeMark.font-shape = #'caps
    \override BarLine.thick-thickness = 5
    barNumberVisibility = #all-bar-numbers-visible
    \override Timing.beamExceptions = #'()
    \override BarNumber.color = #(rgb-color 0.7 0.7 0.7)
    \override BarNumber.layer = #-200
    \override BarNumber.outside-staff-priority =#'()
    \override BarNumber.padding = #1
    \override BarNumber.font-size = #-1
    \override BarNumber.font-series = #'bold
    \override BarNumber.self-alignment-X = #0
    \override BarNumber.break-visibility = #end-of-line-invisible
  }
}

RHg= \relative c' {
  \time 2/4
  \key g \major
  \slurUp
  \tempo "Moderato"
  \override DynamicText.self-alignment-X = #-1
  \override DynamicText.X-offset = #-1
  < d-1 g-3 h-5 >4-. ( q-. < d-1 fis-2 a-4 >2-- )
  < e-1 a-3 c-5 >4 ( q <e-1 g-2 h-4>2 )
  < g-1 c-3 e-5>4-. ( q-. < g-1 h-2 d-4 >-. < f-1 h-3 d-5>-.
  < e-1 a-2 c-4 >-. < e-1 a-3 c-5 >4-.\pori ) < dis-1 fis!-2 h-4>2-- %\break
  < d!-1 g-3 h-5>4-.\ate ( q-. < d-1 fis-2 a-4>2 )
  < e a c >4-. ( q-. < e g h >2-- )
  < g c e>4-. ( q-. < g-1 h-2 d-4 >-. < f h d>-.
  < e-1 a-2 c-4 >-. < c-1 d-2 fis-4 >4-. < h d g >2\fermata )
  \bar "||"
}

LHg = \relative c {
  \clef bass
  \key g \major
  \set fingeringOrientations = #'(left) %% für Akkorde!
  \mergeDifferentlyHeadedOn
  \mergeDifferentlyDottedOn
  \override Fingering.direction = #DOWN  %% für Einzelnoten!
  \override Fingering.padding = #0.2
  %\override Fingering.staff-padding = #'()
  \override Fingering.avoid-slur = #'inside
  %\override Slur.direction = #UP
  g4-.-5 ( h-.-3 d2-1-- )
  a4-5-. ( c-3-. e2 )
  c4-.-5 ( e-.-3 g-1-. gis-2-. a-1-. a,-5-. ) h2-4--
  g4-.-5 ( h-.-3 d2-1-- )
  a4-5-. ( c-3-. e2 )
  c4-.-5 ( e-.-3 g-1-. gis-2-. a-1-. d,-5-. ) g2-4--
}

RHv= \relative c'' {
  \time 2/4
  \key g \major
  \override DynamicText.self-alignment-X = #-1
  \override DynamicText.X-offset = #-1
  \slurUp
  \tempo "Moderato"
  \omit TupletNumber
  \omit TupletBracket
  \tuplet 3/2 {
    h8-5\ptran g-3 d-1 h' g d
    a'-4 fis-2 d-1 a' fis d
    c'-5 a-3 e-1 c' a e
    h'-4 g-2 e-1 h' g e
    e'-5\< c-3 g e' c g\!
    d'-4 h-2 g-1 d'-5 h-3 f-1
    c'-4\> a-2 e-1 c'-5 a-3 e-1\!
    h'-5\pori fis-2 dis-1 h' fis dis
    h'8-5 g d h' g d
    a'-4 fis d a' fis d
    c'-5 a e c' a e
    h'-4 g e h' g e
    e'-5 c g e' c g
    d'-4 h g d'-5 h f
    c'-4\pprit a e fis-4 d c

  }
  < h d g >2\arpeggio\fermata
  \bar "|."
}

LHv = \relative c {
  \clef bass
  \key g \major
  \set fingeringOrientations = #'(left) %% für Akkorde!
  \mergeDifferentlyHeadedOn
  \mergeDifferentlyDottedOn
  \override Fingering.direction = #DOWN  %% für Einzelnoten!
  \override Fingering.padding = #0.2
  %\override Fingering.staff-padding = #'()
  \override Fingering.avoid-slur = #'inside
  %\override Slur.direction = #UP
  g4-5 ( h-3 d2-1 )
  a4-5 ( c-3 e2 )
  c4-5 ( e-3 g-1 gis-2 a-1 a,-5 ) h2-4
  g4-5 ( h-3 d2-1 )
  a4-5 ( c-3 e2 )
  c4-5 ( e-3 g-1 gis-2 a-1 d,-5 ) g,2\fermata
}

LHvv = \relative c {
  \clef bass
  \key g \major
  \tupletSpan 4
  \tuplet 3/2 {
    g8 h d g, h d
    \omit TupletNumber
    d fis a d, fis a
    a, c e a, c e
    e g h e, g h
    g c e g, c e
    g, h d f, h d
    e, a c e, a c
    h, dis fis h, dis fis
    d g h d, g h
    d, fis a d, fis a
    e a c e, a c
    e, g h e, g h
    g, c e g, c e
    g, h d f, h d
    e a c c, d fis
    h, d g
  }
  < h, d g >4
}

kopf=\header {
  title = \myTitel
  subtitle = "aus Op.228"
  subsubtitle = ##f
  composer = "Cornelius Gurlitt (1820-1901)"
  poet = "Notensatz: lilypond.miraheze.org"
}

\bookpart {
  \paper {
    top-margin = 15\mm
    ragged-right = ##f
    ragged-last = ##f
    ragged-bottom = ##f
    ragged-last-bottom = ##f
    bottom-margin = 25\mm
    indent = #10
    line-width = 170\mm
    print-all-headers = ##f
    #(include-special-characters)
    print-first-page-number = ##t
    first-page-number = #1
    oddFooterMarkup = ##f
    evenFooterMarkup = ##f
    oddHeaderMarkup = #oddFooterMarkup
    evenHeaderMarkup = #evenFooterMarkup
    markup-system-spacing.padding = #6
    system-system-spacing.padding = #0
    markup-markup-spacing.padding = #2
    score-system-spacing = #system-system-spacing
  }
  \kopf
  \score
  {
    \new PianoStaff
    <<
      \new Staff
      \new Voice
      {
        \set PianoStaff.instrumentName = "Thema"
        \RHg
      }
      \new Staff
      <<
        \new Voice \LHg
      >>
    >>
  }
  \score
  {
    \new PianoStaff
    <<
      \new Staff
      {
        \set PianoStaff.instrumentName = "Var I"
        \RHv
      }
      \new Staff
      <<
        \new Voice \LHv
      >>
    >>

  }
  \score
  {
    \new PianoStaff
    <<
      \new Staff
      {
        \set PianoStaff.instrumentName = "Var II"
        \override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/1)
        <<
          \new Voice \RHg
          \new NullVoice
          {
            %s2 * 6 \break
          }
        >>
      }
      \new Staff
      <<
        \new Voice \LHvv
      >>
    >>
  }
  {
    \new PianoStaff
    <<
      \new Staff
      \new Voice
      {
        \set PianoStaff.instrumentName = "Thema"
        <<
          \new Voice \RHg
          \new NullVoice
          {
            s2 * 8 \break
          }
        >>
      }
      \new Staff
      <<
        \new Voice \LHg
      >>
    >>
  }
}