lessons/LeftHandFingerExercises: Puhol035.ly

\version "2.12.1"

% European system (A B H C D E F G)
\include "deutsch.ly"

% Short alias for \rightHandFinger
#(define RH rightHandFinger)

\header{
  title="УпражМеМОе №35"
  composer="Э.ПухПль"
}

music = \relative c' {
  % Normal position of pauses
  \override Rest #'staff-position = #0
  \stemDown
  <f-1-\RH #2 >\startTextSpan <g-3-\RH #3 > <f-1-\RH #2 > <g-3-\RH #3 >
  <as-4-\RH #2 > <g-3-\RH #3 > <as-4-\RH #2 > <g-3-\RH #3 >
  f-1 as-4 f-1 as-4
  g-3 as-4 g-3 as-4
  f-1 as-4 f-1 g-3
  f-1 g-3 as-4 f-1
  as-4 g-3 f-1 g-3
  f2-1\stopTextSpan r
  as4-4 g-3 as-4\startTextSpan f-1
  as-4 f-1 as-4 g-3
  as-4 f-1 g-3 as-4
  f-1 as-4 g-3 as-4
  f-1 g-3 as-4 g-3
  f-1 as-4 g-3 f-1
  g-3 f-1 g-3 as-4
  f2-1\stopTextSpan r
}

duplicate = \relative c' {
  % Normal position of pauses
  \override Rest #'staff-position = #0
  \stemDown
  \textSpannerDown
  f4 g f g\startTextSpan
  as g as g\stopTextSpan
  f as f as
  g\startTextSpan as g as\stopTextSpan
  f as f g
  f g\startTextSpan as\stopTextSpan f
  as g f g
  f2 r
  % Small upright font
  \override TextSpanner #'font-size = #-2
  \override TextSpanner #'font-shape = #'upright
  % Vertical alignment of line to center
  \override TextSpanner #'(bound-details left stencil-align-dir-y) = #CENTER
  % The text
  \override TextSpanner #'style = #'line
  \override TextSpanner #'(bound-details left text) = "3 "
  as4\startTextSpan g\stopTextSpan as f
  as f as\startTextSpan g\stopTextSpan
  as f g\startTextSpan as\stopTextSpan
  % The text
  \override TextSpanner #'style = #'dashed-line
  \override TextSpanner #'(bound-details left text) = " "
  f as g\startTextSpan as\stopTextSpan
  f g\startTextSpan as g\stopTextSpan
  % The text
  \override TextSpanner #'style = #'line
  \override TextSpanner #'(bound-details left text) = "3 "
  f as\startTextSpan g\stopTextSpan f
  % The text
  \override TextSpanner #'style = #'dashed-line
  \override TextSpanner #'(bound-details left text) = " "
  g f g\startTextSpan as\stopTextSpan
  f2 r
}

\score {
  <<
    \new Staff {
      \clef "G_8"
      << {
        \textSpannerDown
        % Tweaking text spanner mutual vertical position
        \override TextSpanner #'Y-extent = #'( 0 . 1)
        % Nice style of the dashed line
        \override TextSpanner #'dash-fraction = #0.4
        \override TextSpanner #'dash-period = #2.0
        \music
      } \\ {
        % Overrides line ending 
        \override TextSpanner #'bound-details #'right #'text = \markup { \draw-line #'( 0 . .5) }
        % Tweaking text spanner mutual vertical position
        \override TextSpanner #'Y-extent = #'(-2.0 . -1.5)
        % Nice style of the dashed line
        \override TextSpanner #'dash-fraction = #0.4
        \override TextSpanner #'dash-period = #2.0
        \duplicate
      } >>
    }
    \new TabStaff {
      \override TextSpanner #'dash-period = #-1
      \music
    }
  >>
  \layout{}
  \midi{}
}