%{
    Caprice #3 (Paganini)
    Arranged for guitar by Steve Yegge

  compile-command:
  /Applications/LilyPond.app/Contents/Resources/bin/lilypond \
       [-d fret-diagrams] --png caprice-3.ly \
    && /Users/stevey/bin/refresh-lilypond \
    && /Users/stevey/bin/midi caprice-3.midi
%}

\version "2.26.0"  % for upgrading to future LilyPond versions

\include "english.ly"
\include "../common.ly"

intro = \relative c {
  \key e \minor
  \time 4/4

  \fingerRight
  %% measure 1
  <e-1\5 e'-3\3>2 \f ^\markup { "Sostenuto." }
  <fs-1 fs'-3>4\5\3 <g-1 g'-3>\5\3
  <<
    \relative c {
      \fingerRight \stringLeft
      | %% measure 2
      <b-1\6 b'-3\4>2. _\trill r4
    } \\
    \relative c {
      \dotsOff g''2.\rest ^\trill s4
    }
  >>

  | %% measure 3
  <g-1\4 g'-4\2>2 <a-1 a'-4>4\4\2 <b-1 b'-4>\4\2

  <<
    \relative c {
      \fingerRight \stringLeft
      | %% measure 4
      <d-1\5 d'-3\3>2. _\trill r4
    } \\
    \relative c {
      \dotsOff g''2.\rest ^\trill s4
    }
  >>

  | %% measure 5
  <c-1\5 c'-3\3>4 <b b'>16\5\3 <a a'>\5\3 -> <g g'>\5\3 <fs fs'>\5\3 ->
  <e e'>\5\3 <ds ds'>\5\3 -> <c c'>\5\3
  <b\6 b'\4> -> <a a'>8\6\4 \noBeam <c'-1\5 c'-3\3>

  | %% measure 6
  <b b'>4\5\3 <a a'>16\5\3 <g g'>\5\3 -> <fs fs'>\5\3 <e e'>\5\3 ->
  <d d'>\5\3 <c c'>\5\3 -> <b\6 b'\4> <a a'>\6\4 -> <g g'>8\6\4
  \noBeam <b' b'>\5\3

  | %% measure 7
  <a a'>4\5\3 <g g'>16\5\3 <fs fs'>\5\3 -> <e e'>\5\3 <ds ds'>\5\3 ->
  <g g'>4\5\3 <fs fs'>16\5\3 <e e'>\5\3 -> <c\6 c'\4> <as as'>\6\4 ->

  <<
    \relative c {
      | %% measure 8
      \set doubleSlurs = ##t
      \appoggiatura <as as'>\6\4 <b b'>2.\6\4 _\trill r4
      \set doubleSlurs = ##f
    } \\
    \relative c {
      \dotsOff \grace s16 g''2.\rest ^\trill r4
    }
  >>

  | %% measure 9
  <e''-1\3 e'-4\1>2 <fs fs'>4 <g g'>

  <<
    \relative c {
      | %% measure 10
      \stemDown \stringLeft \fingerRight
      <b'-1\4 b'-4\2>2. _\trill r4 \stringNeutral \stemNeutral
    } \\
    \relative c {
      \dotsOff c''2.\rest ^\trill s4
    }
  >>

  | %% measure 11
  <g g'>2 <a a'>4 <b b'>

  <<
    \relative c {
      | %% measure 12
      \stemDown <d' d'>2. _\trill r4 \stemNeutral
    } \\
    \relative c {
      \dotsOff e''2.\rest ^\trill s4
    }
  >>

  | %% measure 13
  <ds,-1 ds'-4>2 <c'-1 c'-4>

  | %% measure 14
  <b b'>4 <e, e'>4. <fs fs'>16 <e e'>
  \once \override TupletNumber.font-series = #'bold
  \tuplet 5/4 { <fs fs'> <g g'> <a a'> <b b'> <c c'> }

  <<
    \relative c {
      | %% measure 15
      \appoggiatura <c'' c'> <e, e'>2
      \stemUp \appoggiatura <g g'>16 <fs fs'>2 _\trill
      \stemNeutral
    } \\ \relative c {
      \dotsOff
      % \appoggiatura s s2
      s2
      \grace s16 c'''2\rest ^\trill
    }
  >>

  | %% measure 16
  <e, e'>2 r4 <gs,,\6 gs'\4>4

  <<
    \relative c {
      | %% measure 17
      <a a'>16\6\4 <b b'>\6\4 <c c'>\6\4 <d\5 d'\3>
      <e e'>\5\3 <fs! fs'!>\5\3 <gs gs'>\5\3 <a a'>\5\3
      \set doubleSlurs = ##t
      <b b'>2\5\3 _\trill (

      | %% measure 18
      <c\5 c'\3>4 ) <a,\6 a'\4> ^>  ~
      \override TupletNumber.font-series = #'bold
      \tuplet 3/2 { <a\5 a'\3>8 <c' c'>\5\3 <b b'>\5\3 }
      \tuplet 3/2 { <c c'>\5\3 \( <a a'>\5\3 <f f'>\5\3 \) }
      \revert TupletNumber.font-series
      \set doubleSlurs = ##f
    } \\
    \relative c {
      \dotsOff s2 f''2\rest ^\trill
      s1
    }
  >>
  <<
    \relative c {
      | %% measure 19
      \set doubleSlurs = ##t
      <e e'>2\5\3 ( \appoggiatura <g g'>16\5\3 )
      <fs! fs'!>2\5\3 _\trill
    } \\
    \relative c {
      \dotsOff s2 \grace s16 c''2\rest ^\trill
    }
  >>
  <<
    \relative c {
      | %% measure 20
      \stringLeft <e e'>\5\3 <c'\4 c'\2> _\trill
    } \\
    \relative c {
      \dotsOff s2 g'''2\rest ^\trill
    }
  >>
  <<
    \relative c {
      | %% measure 21
      <a' a'> _\trill \p <b b'> _\trill
    } \\
    \relative c {
      \dotsOff e''2\rest ^\trill f\rest ^\trill
    }
  >>
  <<
    \relative c {
      | %% measure 22
      \stringLeft <e'_1\2 e-\tweak extra-offset #'(0 . 1.3)_0>\1
      <c,\6 c'\4> _\trill \pp
    } \\
    \relative c {
      \dotsOff b''2\rest ^\trill a\rest ^\trill
    }
  >>
  <<
    \relative c {
      | %% measure 23
      <a a'>\6\4 _\trill <b b'>\6\4 _\trill
    } \\
    \relative c {
      \dotsOff a''2\rest ^\trill a\rest ^\trill
    }
  >>
  <<
    \relative c {
      | %% measure 24
      \fingerRight
      <e, e'-1\5>2.\6 \fermata b''4\rest
    } \\
    \relative c {
      \once \override Staff.Script.outside-staff-priority = #-1000
      \dotsOff s2 ^\trill s2
    }
  >>
}

start = \relative c {    
  \set doubleSlurs = ##f
  \key e \major
  \time 3/8
  | %% measure 25/1
  \pOff <e-2\4>16 ^\markup { "Presto." }
  <gs-1> <b-0> <e-0> <gs-4> ( <e-0> )
  | %% measure 26/2
  \pIII <as,-1\3> ( <b-2> ) <as'-4\1> ( <b-3> )
  <fss-1> ( <a-3>
  | %% measure 27/3
  \pIV <gs-2> ) <ds-1\2> ( <fs!-4> <e-2> )
  <bs-1\3> ( <ds-4>
  | %% measure 28/4
  <cs-2> ) <gs-1\4> ( <b!-4> <a-2> )
  \pVI <es-3> ( <fs-4> )
  | %% measure 29/5
  <ds-1> ( <fs-4> )
  <c-3\6> ( <b-2> ) <ds-1\5> ( <fs-1\5> )
  | %% measure 30/6
  <a-1\4> ( <c-4> <b-3> )
  <ds-2\3> <fs-1\2> ( <gs-4> )
  | %% measure 31/7
  \pVII <b-2\1> ( <a-1>\1 )
  \pVIII <es-3\3> ( <fs-4> <ds-1> ) <c-3\4> (
  | %% measure 32/8
  <as-1> ) <cs!-3> ( <b-1> )
  \pX <gs-2\5> <ds-1\6> ( <e-2> )
  | %% measure 33/9
  <gs'-3\3> ( <fs-1>\3 ) <ds-4\4> ( <cs-2>\4 <bs-1>\4 )
  <a'-4\3> (
  | %% measure 34/10
  <fss-1> <gs-2> )
  <ds-3\4> ( <e-4>\4 ) <bs-1>\4 ( <cs-2>\4 )
  | %% measure 35/11
  \pVIII <fs!-3\3> <e-1>
  <cs-4\4> <b!-2> <as-1>
  \pVI <gs'-4\2>
  | %% measure 36/12
  <es-1> <fs-2> <css-1\3> <ds-2> <as-1\4> <b-2>
  | %% measure 37/13
  \pV <gs'-4\2> ( <e!-1> \pIV <b'-4\1> <gs-1> <fs-4\2> ) <ds,-1\5> -.
  | %% measure 38/14
  <e'-4\3> ( <cs-1> ) <gs'-4\2> ( <e-1> ) <ds-3\3> <b-0>\2 -.
  | %% measure 39/15
  \pIV <e-2\2> -> <b'-4\1> ( <gs-1> ) <fs-3\2> <es-2> -> \pV <cs'-4\1> (
  | %% measure 40/16
  <as-1> ) <gs-4\2> <fs-2> -> \pVII <ds'-4\1> ( <b-1> ) <as-3\2>
  | %% measure 41/17
  <gs-2> -> \pIX <e'-4\1> ( <cs-1> ) <b-3\2> ( <as-2> -> ) \pXI <fs'-4\1> (
  | %% measure 42/18
  <ds-1> ) <cs-4\2> ( <b-2> -> ) <b'-4> ( <as-3> <a-2> )
  | %% measure 43/19
  <fs-1>\1 ( <g-2> )
  \barre "XV" "2" <b-4> ( \startTextSpan <g-1> ) <d-1> <b-2\3> \stopTextSpan
  | %% measure 44/20
  <g-3\4> <b-2\3> <fs-1\4> <b-2\3> <es,-1\4> <b''-4> (
  | %% measure 45/21
  \pXIV <fs-4> ) <ds-2\2> \pXIII <fs,-4\4> ( <ds-1> <e-2> ) <cs-4\5>
  | %% measure 46/22
  <b-2> \pIII <b'-4\1> <as-3> ( <b-4> ) <gss-2> ( <as-3> )
  | %% measure 47/23
  <fss-1> ( <gs!-2> ) <es-3\2> ( <fs!-4> ) <ds-2> ( <e-3> )
  | %% measure 48/24
  <css-1> ( <ds-2> ) <bs-3\3> ( <cs-4> ) <as-1> ( <b-2> )
  | %% measure 49/25
  <fss-3\4> ( <gs-4> <fs-1> ) <ds-3\5> ( <e-4> <cs-1> )
  | %% measure 50/26
  <b-4\6>8 <b'-1\3> r8
}

more = \relative c {    
  | %% measure 51/1
  \barre "IV" "4" <b-4\6>16 \startTextSpan
  <ds-3> <fs> <b> <ds-4\3> ( <b-1> )
  | %% measure 52/2
  <fs'-4\2> ( <ds> ) \stopTextSpan
  \pII <b'-4\1> ( <fs-1> ) <ds-3> <b-2>
  | %% measure 53/3
  \barre "IV" "4" <b,-4> \startTextSpan <d-2> <fs> <b>
  <d-4\3> ( <b-1> ) \stopTextSpan
  | %% measure 54/4
  <fs'-4\2> ( <d-1\2> ) \pII <b'-4> ( <fs-1> ) <d-2> <b-3>
  | %% measure 55/5
  \pIV <c-1\3> <c'-4> <b,-1> <c'> <a,-3\4> <c'>
  | %% measure 56/6
  <g,-1\4> <c'> <fs,,-1> <c''> <e,,-3\5> <c''>
  | %% measure 57/7
  \pOff <d,,-0> ( <e-1> <d-0> <b-1> <c-2> <a-0>
  | %% measure 58/8
  <g-2> ) \pVII <d'''-4> -> ( <cs-3> <d-4> <b-1> ) <g-2\2>
  | %% measure 59/9
  <e-3\3> \pV <c'-4> -> ( <b-3> <c-4> <a-1> ) <fs-2\2>
  | %% measure 60/10
  <ds!-3\3> \pIII <b'-4> -> ( <as-3> <b-4> <g-1> ) <e-2\2>
  | %% measure 61/11
  <cs-3\3> \pI <a'-4> -> ( <gs!-3> <a-4> <f-1> ) <d-2\2>
  | %% measure 62/12
  <b-3> <g'-2> -> ( <fs!-1> <g-2> <f-1> <d-2> )
  | %% measure 63/13
  \pOff <c-1> <e-0> <b-0> <e> <a,-2> <e'>
  | %% measure 64/14
  <g,-0> <e'> <f,-3> <e'> <e,-2> <e'>
  | %% measure 65/15
  <a,-2> <c-1> <g-0> <c-1> <f,-4> <c'-1>
  | %% measure 66/16
  <e,-2> <c'-1> <d,-0> <c'-1> <c,!-3> <c'-1>
  | %% measure 67/17
  \pII <f,-1> -. <f'!-4\2> -> ( <e-3> <f-4> ) <c-3\3> ( <a-2> )
  | %% measure 68/18
  <fs!-2> <ef'-3\2> -> ( <d-1> <ef-3> ) <c-4\3> ( <a-1> )
  | %% measure 69/19
  \pIV <g-1\4> <g'!-4\2> -> ( <fs-3> <g-4> ) <d-3\3> ( <b-1> )
  | %% measure 70/20
  <gs!-2> <f'-4\2> -> ( <e-3> <f-4> ) <d-4\3> ( <b-1> )
  | %% measure 71/21
  \pV <a-2\4> <e'-4\3> ( <cs!-1> )
  \barre "VII" "4" <a-1\4> \startTextSpan <f'-4\3> ( <d-1> )
  | %% measure 72/22
  <a> \stopTextSpan \pV <g'-4\2> ( <e-1> ) <a,-2\4> <a'-1\1> \( <f-2\2> \)
  | %% measure 73/23
  \pIV <g,-0> <d'-4\3> ( <b-1> ) <g-0> <e'-4\3> ( <c-1> )
  | %% measure 74/24
  <g-0> <f'-4\3> ( <d-1> ) <g,-0> <g'-1\3> \( <ef-3\2> \)
  | %% measure 75/25
  \pII <f,-2\4> <c'-4\3> ( <a-1> )
  \barre "III" "4" <f-1\4> \startTextSpan <d'-4\3> ( <bf-1> ) \stopTextSpan
  | %% measure 76/26
  \pI <f-3> <ef'-4> ( <c-1> ) <a-2> <ef-1> <c-3>
  | %% measure 77/27
  \barre "II" "2" <bf-4> \startTextSpan
  <d-3> <f-1> <bf-1> <d-4\3> ( <bf-1> ) \stopTextSpan
  | %% measure 78/28
  <e,!-1> <f-2> <e'-3\2> <f!-4> <cs!-1> ( <ef-3>
  | %% measure 79/29
  <d-2> ) <a-1\3> ( <c-4> <bf-2> ) \pIV <fs!-1\4> ( <a-4>
  | %% measure 80/30
  <g-2> ) \pV <d-1\5> ( <f-4> <ef-2> ) <c-4\6> ( <bf-2>
  | %% measure 81/31
  <a-1> <c-4> ) \pVI <ef-1\5> ( <gf-4> <f-3> ) <a-1\4> (
  | %% measure 82/32
  <c-4> ) \pVIII <ef-1\3> ( <gf-4> <f-3> ) <a-2\2> <c-1\1> (
  | %% measure 83/33
  <ef-4> <c-1> ) <a-2\2> <f-3\3> ( <gf-4> <ef-1> )
  | %% measure 84/34
  \pVI <cs!-1> ( <ef-3> <d-2> ) \pVII <a-1\4> ( <c-4> <bf-2> )
  | %% measure 85/35
  \pIV <fs!-1\4> ( <a-4> <g-2> ) <b!-1\3> ( <d-4> <c-2> )
  | %% measure 86/36
  \pI <gs!-1\3> ( <bf-3> <a-2> ) <cs!-1\2> ( <ef-3> <d-2> )
  | %% measure 87/37
  <a-1\3> ( <c-4>\3 <bf-2> ) <af'-4> ( <f-1> <d-2> )
  | %% measure 88/38
  \pIII <bf'-4> ( <g-1> ) <ef-2> <bf-1> <g-3> <ef-2>
  | %% measure 89/39
  <bf''-4> ( <gf-1> ) <ef-2> <bf-1> <gf-2> <ef-3>
  | %% measure 90/40
  \barre "VII" "2" <b''-1> \startTextSpan <fs!-1> <ds!-2>
  <b!-3> \stopTextSpan <fs!-4\5> ( <ds!-1>\5 )
  | %% measure 91/41
  <b-2\6> \pOff <b'-0> <as-2\3> ( <b-4> <a-1> <fs-4> )
  | %% measure 92/42
  \pOff <e-2> <gs-1> <b-0> <e-0> <gs-4> ( <e-0> )
  | %% measure 93/43
  \pIII <as,-1> ( <b-2> ) <as'-3> ( <b-4> ) <fss-1> ( <a-3>
  | %% measure 94/44
  <gs-2> ) \pIV <ds-1\2> ( <fs!-4> <e-2> ) \pV <bs-1\3> ( <ds-4>
  | %% measure 95/45
  <cs-2> ) <as-4\4> ( <g-1> ) <e-4\5> ( <cs-1>\5 ) <b-3\6> (
  | %% measure 96/46
  \pVI <as-1> <cs-3> ) \pVII <e-1\5> ( <g-3> )
  \pVIII <as-1\4> ( <cs-3> )
  | %% measure 97/47
  \pIX <e-1> ( <g-3> ) \pXI <as-1\2> ( <cs-3> <as-1> ) <e'-2>
  | %% measure 98/48
  <cs-3\2> <g'-4> ( <e-2> ) <cs-3\2> ( <as-1> <cs-3> )
  | %% measure 99/49
  <b-2> \pVIII <e-4> <ds-3> ( <e-4> ) <css-2> ( <ds-3> )
  | %% measure 100/50
  <bs-1> ( <cs!-2> ) <as-3\2> ( <b-4> ) <gs-2> ( <a-3> )
  | %% measure 110/51
  <fss-1> ( <gs-2> ) <es-3\3> ( <fs-4> ) <ds-1> ( <e-2> )
  | %% measure 111/52
  <as,-1\4> ( <cs-4> <b-2> ) <gs-3\5> ( <a-4> <fs-1> )
}

finale = \relative c {
  \key e \minor \time 4/4
  \fingerRight \pOff
  | %% measure 112/1
  <e-3\5 e'-1\3>2 \f ^\markup { "Sostenuto." }
  <fs fs'>4\5\3 <g g'>\5\3

  <<
    \relative c {
      | %% measure 113/2
      \stringLeft
      <b\6 b'\4>2. \trill a'4\rest
    } \\
    \relative c {
      \dotsOff g2.\rest _\trill s4
    }
  >>

  | %% measure 114/3
  <fs\5 fs'\3>2 <a a'>4\5\3 <g g'>\5\3

  <<
    \relative c {
      | %% measure 115/4
      \stringLeft
      <e\5 e'\3>2. \trill a4\rest
    } \\
    \relative c {
      \dotsOff c2.\rest _\trill s4
    }
  >>

  | %% measure 116/5
  <e'-1 e'-4>2 <fs fs'>4 <g g'>

  <<
    \relative c {
      | %% measure 117/6
      s2 \stringUp \fingerUp
      \once \override Voice.TupletNumber.transparent = ##t
      \once \override Voice.TupletBracket.transparent = ##t
      \tuplet 6/4 { s4 <d''-1\2>8 s4. }
    } \\
    \relative c {
      \stringDown \fingerDown
      <a'' a'>4 <a,\5 a'\3>
      \override Beam.length-fraction = #.8
      \once \override TupletNumber.font-series = #'bold
      \tuplet 6/4 { <c' c'>8 [ <b b'>
                   <d-3\3> <c c'> <a a'> <f f'> ] }
      \revert Beam.length-fraction
    }
  >>
  <<
    \relative c {
      | %% measure 118/7
      \stringRight
      <e' e'>2 <b\4 b'\2> \trill
    } \\
    \relative c {
      \dotsOff s2 e2\rest _\trill
    }
  >>
  <<
    \relative c {
      | %% measure 119/8
      <e'-0>2.\1 a,4\rest
    } \\
    \relative c {
      \once \override NoteColumn.force-hshift = #1
      <e'-1\2>2. _\trill r4
    }
  >>
  <<
    \relative c {
      | %% measure 120/9
      <b'\4 b'\2>2 \p \trill <b,\6 b'\4> \trill
    } \\
    \relative c {
      \dotsOff e2\rest _\trill a,2\rest _\trill
    }
  >>
  <<
    \relative c {
      | %% measure 121/10
      <e-1\5>2. \trill a4\rest \fermata
    } \\
    \relative c {
      \dotsOn e,2. s4
      |
    }
  >>
}

music = {
  \intro \break
  \midiTempoChange \tempo 4=140
  \repeat volta 2 {
    \time 3/8
    \start
  }
  \break
  \more
  \midiTempoChange \tempo 4=100
  \finale
  \bar "|."
}

\header {
  title = "Caprice 3, Op. 1"
  composer = "Niccolò Paganini"
  arranger = "Arranged for guitar by Steve Yegge"
  copyright = "sites.google.com/site/steveysguitarsite"
  tagline = ##f
}

\score {
  <<
    \new Staff {
      \commonSetup
      \maybeFretDiagrams \music
    }
    \new TabStaff {
      \music
    }
  >>
}

\score {
  \unfoldRepeats
  \music
  \midi {
    \context {
      \Score
      midiInstrument = #"acoustic guitar (steel)"
      tempoWholesPerMinute = #100/4
    }
    \context {
      \Voice
      \remove "Dynamic_performer"
    }
  }
}

\paper {
   indent = 8\mm
   ragged-last-bottom = ##f
   min-systems-per-page = 5
   page-count = 5
}