Carl Czerny, Op.840 Nr.13

Zur Navigation springen Zur Suche springen

\version "2.20.0"
\language "deutsch"

\include "defn.ily"
exercise ="13"

durde = \markup "D moll."
durfr = \markup "Ré mineur."
molde = \markup \bold { "D Dur. " }
molfr = \markup \italic { "(Ré majeur.)" }

myTitel = #(string-append "Melodische Übung " durde)

RH= \relative c'' {
  \partial 4
  \key f \major
  \repeat volta 2
  {
    a8._1  a16 d8 r a8 r f' r d r
    e2-4 ( a, )
    e'8-3 r a, r g' r e r
    f2-3 ( d-1 )
    b'8-4 r b r b r b r
    a4. ( f8 d ) r d4
    cis4 cis d < d f >
    < cis e >2.
  }
  \repeat volta 2
  {
    a8.-1  ( cis!16-2
    e16-4 a, cis-2 a e' a, cis a e' a, cis a e' a, cis a )
    f'-5 a, d-3 a f' a, d a f' a, d a f' a, d a
    g' a, e' a, g' a, e' a, f' a, d a f' a, d a
    < cis-2 e-4 >2 r
    a'8-2  r a r d r d r
    b2-3 g
    f8-2 r a r e r a r
    d,4 r
    r^\markup "Fine."
  }
  \key d \major
  \set Timing.baseMoment = #(ly:make-moment 1/4)
  \set Staff.beatStructure = #'(2 2 )  %% abhängig vom Takt
  \tag #'Moll
  {
    \repeat volta 2
    {
      a4-1 (
      fis'4.-4 e8 d ) r a4 (
      fis'4. e8 d ) r a4
      a'-5 ( e g8-4 fis e d
      < cis-2 e-4 >2. )
      e4-1
      e'-5_> ( h8-2 ) r e4_> ( h8 ) r
      d8-4 ( cis h a gis-3 fis gis a-5
      cis,4-2 ) cis ( \slashedGrace e8 d8 cis d h
      a2 ) r4
    }
    \repeat volta 2
    {
      <<
        {
          \oneVoice
          a4 \(
          < e'-2 g!-4 > q < d fis > q
          \voiceOne
          fis-5 e-4 d-3 \) \oneVoice r8 a
          \voiceOne
          a'4-5 ( g-4 ) g-4 ( fis-3 ) e2-5
        }
        \\ {
          s4 s1
          cis2-2 d4 s4 e2-2 d-1 cis
        }
      >>
      r4 a (
      fis'4. e8 d ) r d4-1 (
      < h' d >4. < a cis >8 < g h >4 ) r
      < fis-2 a-4 > fis ( \slashedGrace a8 g fis g e d2 ) r4
    }
  }
}

LH = \relative c' {
  \mergeDifferentlyHeadedOn
  \mergeDifferentlyDottedOn
  \clef bass
  \repeat volta 2
  {
    r4
    d,16 a' f a d, a' f a c, a' f a d, a' f a
    cis, a' g a cis, a' g a cis, a' g a cis, a' g a
    cis, a' e a cis, a' e a cis, a' e a cis, a' e a
    d, a' f a d, a' f a d, a' f a d, a' f a
    g d' b d g, d' b d g, d' b d g, d' b d
    f, d' a d f, d' a d f, d' a d f, d' a d
    e, a g a e a g a d, a' f a d, a' f a
    a,8[ ( cis e a] a,4 )
  }
  \repeat volta 2
  {
    r a' a g-2 g-1
    f2 d cis4 cis d d
    a'8[ ( a, cis e] a-1[ b-2 a-3 g-4] )
    f16-5 d' a d f, d' a d f, d' a d f, d' a d
    g, d' b d g, d' b d g, d' b d g, d' b d
    a f' d f a, f' d f a, f' cis g' a, g' cis, g'
    < d-3 f-2 >8 d-1 ( a-2 f-4 ) d r
  }
  \key d \major
  \tag #'Moll
  {
    \repeat volta 2
    {
      r4
      \voiceOne
      fis8 a g a fis a fis a
      fis a g a fis a fis a
      cis,2 d
      \oneVoice
      a8-( cis e g-1 cis-2 e-1 cis-2 a-4 )
      \voiceOne
      gis2 gis a d, e e a
      \oneVoice
      a4
    }
    \repeat volta 2
    {
      r4
      cis8-3 ( a-5 cis a d a d a
      \clef treble
      g' a, g' a, fis'-1 a,-5 fis' a,- )
      cis-4 ( a' cis, a' d, a' d, a' )
      a, ( a' e cis-3
      \clef bass a-1 g fis e-4 )
      \voiceOne
      d8 a' fis a dis, a' fis a
      g, d' h d g, d' h d
      a fis' d fis a, g' cis, g'
      d fis a fis d4
    }
  }
}

LHii = \relative c {
  \repeat volta 2
  {
    s4
    s1 * 15 s2.
  }
  \voiceTwo
  \tag #'Moll
  {
    \repeat volta 2
    {
      s4
      d2 d2 d d
      cis8 a' g a d, a' fis a
      s1
      gis8 e' d e gis, e' d e
      a, e' cis e d, a' fis a
      e cis' a cis e, d' gis, d'
      a cis e cis s4
    }
    \repeat volta 2
    {
      s4
      s1 * 4
      d,2 d g, g a a d d4
    }
  }
}

dynamics = {
  \override Score.RehearsalMark.self-alignment-X = #-1
  \mark \markup { \center-align "Molto Allegro animato." }
  s4\f
  s1 * 7
  s2. s4\p s1 s s
  s-\markup { \italic cresc. } s s s s2.
  \mark \markup \fontsize #-1.5 { \bold \molde \italic \molfr }
  \once \override TextScript.X-offset = #-4
  s4-\markup { \dynamic p \italic dol. } s1 * 7 s2.
  s4\p s1 s s
  s2 s-\markup { \italic cresc. } s1
  s\sf s\p 
  \override Score.RehearsalMark.direction = #DOWN
  \mark \markup "D.C. sino al fine."
}

#(set! paper-alist (cons '("mein Format" . (cons 290 320)) paper-alist))

\paper {
  #(include-special-characters)
  #(define fonts
     (set-global-fonts
      #:music "Ross"
      #:brace "emmentaler"
      #:roman "Century Schoolbook L"
      #:sans "sans-serif"
      #:typewriter "monospace"
      ))
}

aa= \paper
{
  %#(set-paper-size "a3")
  #(set-paper-size "mein Format")
  top-markup-spacing.basic-distance = #1
  system-system-spacing.basic-distance = #16
  markup-system-spacing.basic-distance = 16
  markup-system-spacing.padding = 4
  oddHeaderMarkup = ##f
  evenHeaderMarkup = ##f
  oddFooterMarkup = ##f
  evenFooterMarkup = ##f
  ragged-right = ##f
  ragged-last = ##f
  ragged-bottom = ##t
  ragged-last-bottom = ##t
  top-margin = 0
  bottom-margin = 0
  left-margin = 15\mm
  %line-width = 260\mm
  right-margin = #left-margin
  page-breaking = #ly:one-page-breaking
  annotate-spacing = ##f

}

cc=\paper {
  line-width = 165\mm
  top-margin = 20\mm
  bottom-margin = 20\mm
  annotate-spacing = ##f
  evenFooterMarkup = ##f
  oddFooterMarkup = ##f
  evenHeaderMarkup = ##f
  oddHeaderMarkup = ##f
  page-breaking = #ly:minimal-breaking
  system-system-spacing = #'((basic-distance . 10)
                             (minimum-distance . 8)
                             (padding . 2)
                             (stretchability . 60))
}

%\aa   %% Ausgabe auf einer Seite
\cc   %% Ausgabe im A4-Format

%dd=
\bookpart {
  \header {
    title = \myTitel
    subtitle = \markup \concat { "Op.840, №" \exercise }
    subsubtitle = ##f
    poet = ##f
    composer = "Carl Czerny (1791-1857)"
    piece = ##f
    opus = ##f
  }
  \score {
    \new PianoStaff
    <<
      \new BarNumberStaff="Discant"
      <<
        \new Voice \RH
      >>
      \new Dynamics\dynamics
      \new Staff="Bass"
      <<
        \new Voice \LH
        \new Voice \LHii
      >>
    >>
    \layout {
      \context {
        \PianoStaff
        instrumentName = \markup {
          \center-column {
            \line { \bold \huge { "№" } \number { \exercise "." } }
            \line \large { \durde }
            \italic \line { \durfr }
          }
        }
        shortInstrumentName = ""
        \override VerticalAxisGroup.staff-staff-spacing.basic-distance = #10
        \override VerticalAxisGroup.staff-staff-spacing.padding = #4
      }
      \context {
        \Score
        %\override SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/10)
        \override SpacingSpanner.common-shortest-duration = #(ly:make-moment 1/8)
      }

    }
  }
}

bb=
\score {
  {
    <<
      \new Staff {
        \set Staff.midiInstrument = "pan flute"
        \unfoldRepeats \RH
        \removeWithTag #'Moll \RH
      }
      \new Staff {
        \set Staff.midiInstrument = #"vibraphone"
        \unfoldRepeats \LH
        \removeWithTag #'Moll \LH
      }
      \new Staff {
        \set Staff.midiInstrument = "fx 4 (atmosphere)"
        \clef bass \unfoldRepeats \LHii
        \removeWithTag #'Moll \LHii
      }
    >>
  }
  \midi {
    \tempo 4=120
  }
}