Cz op840 nr 16/score

Zur Navigation springen Zur Suche springen
\version "2.20.0"
\language "deutsch"

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

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 6/8
  \key b \major
  \partial 8
  \repeat volta 2
  {
    d8-1 (
    b'-4 ) r b( a-3 ) r a (
    g-2 ) r g( d-1 ) r d (
    es ) r es ( g-4 f es )
    d4.~ d4 d8-2
    c4
    c8( a'4_> c,8-1 b4-2)
    b8 ( g'4_> b,8  a-. )
    r8 es'-5 ( d-4-. ) r
    fis,-2_(
    g4.~ ) g8 r
  }
  \repeat volta 2
  {
    d-1 < fis-2~ a-4~ >4. q8 q q
    < g-1~ b-3~ >4. q8 q q
    < a-2 c-4 > ( d-. ) q ( < g,-1 b-3 > d'^. ) q (
    < fis,-2 a-3 > d'-5-. ) d-. d d d-1
    < fis-2~ a-4~ >4. q8 q q
    < g-1~ b-3~ >4. q8 q < g-2 b-4 >

    < a-3 c-5 > ( d, ) q ( < g-2 b-4 > d ) < g-3 b-5 > (
    < fis-2 a-4 >-. ) d-. e-. fis-3-. g-1-. a-.
    b-.  r b ( a ) r a (
    g ) r g-3 ( d-1 ) r d (
    es ) r es ( g f es )
    d4.~ d8 es d
    c4 ( a'8 ) a4 ( c,8-1 )
    b4-2 ( g'8 ) a,4 ( es'8 )
    d r g, ( b4 a8 g ) r r r4^\markup { "Fine." }
  }
  \key g \major
  \tag #'Moll
  {
    \repeat volta 2
    {
      d8-1  r < g-1 h-3 > ( < a c > < h-3 d-5 >-. ) q-. q-.
      r < d-1 h'-5 > q q ( < c a' > < h g' > )
      r < a fis'-4 >-. q-. < a fis'-4 > ( < h g'-5 >-. ) < c a'>-.
      r < h g' >-. q-. q-. < h-1 d-2 >-. q-.
      e-3 ( g-. ) g-.
      d-2 ( g-. ) g-.
      c,-1-. d'-5-. d-. h,-. d'-. d-.
      a,-. a'-. a-. a,-1-. cis-4-. cis-.
      d-. a-. fis-. d-. r
    }
    \repeat volta 2
    {
      d'-. d-1-. fis'-4-. fis-. d,-. fis'-. fis-.
      d,-1-. g'-5-. g-. g( h,-1 d-3 )
      \myott #1
      c-1-. d'-5-. d-. h,-. d'-. d-.
      c,-. a' ( fis d-. ) d-. d-.
      \ottava #0
      d,-. fis'-. fis-. d,-. fis'-. fis-.
      d, g' g
      \myott #1
      g, h' h
      fis, a' a e,-1 cis'-4 cis
      \ottava #0
      d ( a fis d-1-. ) d[-5 ( c!]-4 )
      h-3-. < g h > ( < a c > < h d >-. ) q-. q-.
      < h-1 d-2 >-. < d-1 h'-5>-. q-. q ( < c a'>-. ) < h g'>-.
      < a fis'-4 >-. q-. q-. q ( < h g'>-. ) < c a' >-.
      q ( <h g' > ) q-. q-. d-2-. d-2-.
      e-1-. g'-5-. g-. c,,-. e'-. e-.
      h,-. d'-. d-. g,,-. h'-. h-.
      a,-. c'-. c-. fis,,-1-. a'-5-. a-.
      g-5-. d-. h-. g-. r
    }
  }
}

LH = \relative c' {
  \clef bass
  \key b \major
  \repeat volta 2
  {
    r8
    g ( b d fis, c' d g, b d g, b d )
    g, ( c es g, c es g, b d g, b d )
    gis, a d fis, a d g, b d g, b d
    c, es a d, a' c g b d g, r
  }
  \repeat volta 2
  {
    r d ( fis a d ) r r
    d, ( g b d ) r r
    < fis, d' >4 r8 < g d'>4 r8
    d4 r8 r4 r8
    d'8 ( a fis d ) r r
    d' ( b g d ) r r
    < fis d' >4 r8 < g d'>4 r8
    d4 r8 r4 r8
    g b d fis, c' d
    g, b d g, b d
    g, c es g, c es
    g, b d g, b d
    fis, a d fis, a d
    g, b d c, es a
    d, g b d, fis c'
    < g b > ( d' b g ) r
  }
  \key g \major
  \tag #'Moll
  {
    \repeat volta 2
    {
      r g, r r < g' d' > r r
      g, r r < g' d' > r r
      d r r d' r r
      g, r r g' r r
      \clef treble
      < c g' > r r < h g' > r r
      \clef bass
      < fis, d'> r r < g d'> r r
      \clef treble
      < a d fis > r r < a e' g > r r
      < d fis > r r r4
    }
    \repeat volta 2
    {
      \clef bass
      r8 < d, a' c> r r q r r
      < g h >2.
      < fis a d >8 r r < g h d > r r
      < d fis >4 r8 r4 r8 < d a' c >4 r8 q4 r8
      < g h >4 r8 < g h d >4.
      \clef treble
      < a d fis>  < a e' g >
      < d fis>8 r r r4 r8
      \clef bass
      g,, r r < g' d' > r r
      g, r r < g' d' > r r
      d, r r d' r r
      g, r r g' r r
      < c, g'>4. q
      < d g h > q
      < d fis a > < d a' c > <g h>
      r4
    }
  }
}

dynamics = {
  \override Score.RehearsalMark.self-alignment-X = #-1
  \mark \markup { \center-align "Allegro vivace" }
  s8\p
  s2. * 7 s2 s8
  s\p s2. * 4
  s2.-\markup { \italic cresc. } s s
  s4. s\< s2.\f
  s2. * 6 s2 s8
  \mark \markup \fontsize #-1.5 { \bold \molde \italic \molfr }
  s\p s2. * 7 s2 s8
  s\mf s2. s s s
  s\f s s
  s2-\markup { \italic dim. } s4\p s2. s s s
  s\f s s
  \override Score.RehearsalMark.direction = #DOWN
  \mark \markup "D.C. sino al fine."
}

#(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
  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
      >>
    >>
    \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 {
  {
    <<
      \new Staff {
        \set Staff.midiInstrument = "pan flute"
        \unfoldRepeats \RH
        \removeWithTag #'Moll \RH
      }
      \new Staff {
        \set Staff.midiInstrument = #"vibraphone"
        \unfoldRepeats \LH
        \removeWithTag #'Moll \LH
      }
    >>
  }
  \midi {
    \tempo 4=120
  }
}