Carl Czerny, Op.840 Nr.4

(Weitergeleitet von Cz op840 nr 4)
Zur Navigation springen Zur Suche springen
\version "2.20.0"
\language "deutsch"

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

durde = \markup "G moll."
durfr = \markup "Sol mineur."
molde = \markup \bold { "G Dur. " }
molfr = \markup \italic { "(Sol majeur.)" }

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

RH= \relative c'' {
  \time 3/4
  \key b \major \partial 4
  \set Timing.beamExceptions = #'()
  \set Timing.baseMoment = #(ly:make-moment 1/4)
  \set Staff.beatStructure = #'(2 1 ) % abhängig vom Takt
  \override Fingering.staff-padding = #'()
  \set fingeringOrientations = #'(left) %% für Akkorde!
  \override Fingering.direction = #UP  %% für Einzelnoten!
  \override Voice.Fingering.padding = #1
  \override Slur.height-limit = #4
  \repeat volta 2 {
    d4-1
    d2-1( g4-2 b2-4) b4-3 b2-3( a4 g) r r
    d'8-5( cis d b g) r
    \waacc a8^( g4-3 fis-2 g-1) < g-1 b-3 >2.( < fis^2 a^4 >4) r r
    d2( a'4 c2) c4
    \set Staff.beatStructure = #'(3 ) % abhängig vom Takt
    c2-2( a4-1 es'2.-4)  d4-5( c8 b a g-1  f!-4 es d c-1 b-2 a-1)
    d4-5( <fis,^2>-.) fis-. g r
  }
  \repeat volta 2 {
    d < fis a d > q q
    q q q < a'-4 c-5 >2( < fis-2 a-4 >4-.)
    < a c >2( < fis a >4-.)
    < g, b d > q q q q q < b'-3 d-5 >2( < g b >4-.) < b d >2( < g b >4-.)
    es'-.-3 es-. es-. es-. es-. es-.
    < d-2 >2( g4-.)
    < a,-1 >2( es'4-.)
    d( b-.) g-.
    < c^5 >( a-3-.) fis-2-.
    g-3-. d-. b'-. g r4^\markup { "Fine." }
  }
  %% Teil 2 G dur.
  \key g \major
  \tag #'Moll
  {
    \repeat volta 2 {
      d4 d( g h)-.
      < d,-1 h'-5 >2( a'8 g)
      fis4-2( a-3 c-5-.)
      c2-5(_> a8 fis)
      d4( a' < c-5 >-.) c2-4( h8 a) g4( h d-.)
      d2_>( h8-2 g-1)
      < c-2 e-4 >4-. q-. q-.
      < e g >2(_> < c e >4)
      < h-1 d-3 >4-. q-. q-.
      < h g' >2(_> < h d >4)
      < a -2 c-4 >-. q( d8 c)
      < g-1 h-3 >4-. < g-2 h-4 >( c8 h)
      < fis-2 a-3 >4 < fis a d > q q r4
    }

    \repeat volta 2 {
      d,8( e fis-3_[ g-1 a h c-1 d] e fis g-1 a h c-1
      \myott #1 d e fis g-1 a-2  h-3 )
      c4-5 ( a-3 fis-2 )
      d'8-5( c h a g-1 fis-4
      e d c-1 h-3 a g) \ottava #0
      < g-3 h-5 >2.(
      < fis a >4 ) r d d( g h ) d2-5 ( h8-3 g-1 )
      e'2-4 ( c8-2 g-1 g'2.-5 )
      h,4-. h ( d8 h ) a4-1-. a-2 ( c8 a )
      g4-1-. < h, d g >-. q-. q-. r
    }
  }
}

LH = \relative c' {
  \clef bass
  \key b \major
  \set fingeringOrientations = #'(left)  %% Akkorde
  \override Fingering.direction = #DOWN  %% Einzelnoten
  \override Fingering.staff-padding = #'()
  \repeat volta 2 {
    r4
    \voiceOne
    g4 < b d > q
    g q q
    d < fis c' > q
    g < b d > q
    g q q
    g q q
    s2. s
    d4 < fis a > q
    d q q
    c < es fis a > q
    c q q b < d g > q
    c < es a > q d < a' c > q
    b4 \oneVoice r4
  }
  \repeat volta 2 {
    r
    d,,( fis a
    d a fis)
    d d' d
    d d d
    d,( fis a d a fis)
    d d' d
    d d d
    \voiceOne
    c < fis a > q c q q b < d g > q c < es a > q d < g b > q d < a' c > q
    \oneVoice
    < g b >4 q q q r4
  }
  \key g \major
  \tag #'Moll
  {
    \repeat volta 2 {
      r4 \clef treble
      < g'-3 h-1 >4_. q_. q_. q_. q_. q_.
      < d a' c > q q q q q < d fis c' > q q q q q
      < g h > q q q q q
      \voiceOne
      c,4 < e g > q c q q
      \clef bass
      g < h d > q g q q fis < a d > q g < h d > q
      \oneVoice
      d4( a' fis d) r4
    }
    \repeat volta 2 {
      r4
      \voiceOne
      d, < a' c > q
      d, q q
      d q q
      d q q
      d < g h > q
      d q q
      \oneVoice
      d4 d' d
      d-1( c-2 a-4 ) < g h > q q q q q
      < c, e g > q q q q q
      \voiceOne
      d4 < g h > q d < fis c' > q
      \oneVoice
      < g-4 h-2 >4( d' h g ) r4
    }
  }
}

LHii = \relative c' {
  \voiceTwo
  \set fingeringOrientations = #'(left)
  \override Fingering.direction = #LEFT
  \override Fingering.staff-padding = #'()
  \repeat volta 2 {
    s4
    g2.-4 g d g g g d4 d'4 d d^( a fis)
    d2. d c c b c d g4 s4
  }
  \repeat volta 2 {
    s4 s2. * 8
    c,2. c b c d d
    s2. s2
  }
  \tag #'Moll
  {
    \repeat volta 2 {
      s4 s2. * 8
      c'2. c g g fis g
      s2. s2
    }
    \repeat volta 2 {
      s4
      d2. d d d d d
      s2. * 6
      d2. d s2.
      s2
    }
  }
}

dynamics = {
  \override Score.RehearsalMark.self-alignment-X = #-1
  \mark \markup { \center-align "Allegro vivace" }
  s4\p
  s2. * 8
  s2 \once \override TextScript.self-alignment-X = #0.8 s4-\markup { \italic cresc. }
  s2. s
  s\sf s\f s s
  s2 s4\f
  s2. s
  s\p s
  s\f s
  s\p s
  s2 s4\<
  s2. s\>
  s4 s2\!
  s2.\p s s s2 \pageBreak
  \mark \markup \fontsize #0 { \bold "G Dur." \italic "(Sol majeur)" }
  s4-\markup { \dynamic p \italic \whiteout dol. }
  s2. * 8
  \once \override TextScript.self-alignment-X = #1.5
  s2.-\markup { \italic cresc. }
  s s s
  s\f s s s2
  s4\p s2. s
  s\< s s\sf\> s\!
  s s2 s4\p
  s2.
  s2 \once \override TextScript.self-alignment-X = #0 s4-\markup { \italic cresc. } s2.
  s\sf s\p
}

#(set! paper-alist (cons '("mein Format" . (cons 290 330)) 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
  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/7)
      }

    }
  }
}

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