1 % DO NOT EDIT this file manually; it is automatically
2 % generated from Documentation/snippets/new
3 % Make any changes in Documentation/snippets/new/
4 % and then run scripts/auxiliar/makelsr.py
6 % This file is in the public domain.
7 %% Note: this file works from version 2.17.11
8 % INSPIRATIONAL HEADER FOR LILYPOND DOCUMENTATION fretted-strings %
9 % Passage from Johann Kaspar Mertz "Opern Revue, Op. 8, no. 17" %
10 % on melodies from Bellini's "Norma" %
11 %*****************************************************************%
26 \remove "Bar_number_engraver"
31 % fingering orientations
32 sfol = \set fingeringOrientations = #'(left)
33 sfor = \set fingeringOrientations = #'(right)
34 sfod = \set fingeringOrientations = #'(down)
35 sfou = \set fingeringOrientations = #'(up)
37 % string number orientations
38 ssnol = \set stringNumberOrientations = #'(left) %(down right up)
39 ssnou = \set stringNumberOrientations = #'(up)
40 ssnod = \set stringNumberOrientations = #'(down)
41 ssnor = \set stringNumberOrientations = #'(right)
43 % define fingering offset
44 FO = #(define-music-function (parser location offsetX offsetY) (number? number?)
46 \once \override Voice.Fingering.extra-offset = #(cons offsetX offsetY)
50 rit = \markup \center-align { \bold { \italic { " rit." } } }
51 dimin = \markup \center-align { \italic { " dim." } }
52 andantino = \markup \left-align { \italic { \bold { \fontsize #2.5 { "Andantino" } } } }
53 benmarcato = \markup { \italic { \bold { "il canto ben marcato" } } }
54 pdolce = #(make-dynamic-script (markup #:line (#:dynamic "p" #:normal-text #:italic "dol.")))
58 melody = \relative c {
68 f4\rest <e'-4>4-> | % m. 1
74 f4\rest \FO #'0.4 #'0.5 <gis-1 e'-4>4 | % m. 2
76 d4\rest <b e>-> d4\rest^\rit <b e>4-> | % m. 3
83 e'4^\benmarcato e8. d16-4
84 d4-4 \tuplet 3/2 { \sfou \FO #'-0.3 #'0.6 <c-2>4 b8 } | % end of m. 6
87 <a-3>4 \tuplet 3/2 { c4 b8 } a4 e'8. e16 | % m. 7
90 <g-4>4 \tuplet 3/2 { \sfol \FO #'0.3 #'0.0 <f-1>4 e8 } e4 % beg of m. 8
91 \tuplet 3/2 { \sfou <d-4>4 c8 } | % end of m. 8
93 b4 \tuplet 3/2 { d4-4 c8 } \sfou \FO #'-1.7 #'-1.5 <b-0>4 e | % end of m. 9
95 e4 e8. d16-4 d4 \tuplet 3/2 { c4 b8 } | % m. 10
97 \tuplet 3/2 { a4 a8 b4 c8 } % beg of m. 11
98 \sfou \FO #'-0.3 #'0.3
99 <d-4>4^\< \tuplet 3/2 { e4 <d f>8\! } | % end of m. 11
107 e,8\fp[ e'] e,[ e'] e, \sfol <c''-1> <a'-2> c, | % m. 1
109 e,,8\fp[ e'] e,[ e'] e, \sfod \FO #'0.2 #'-0.2 <b''-1> % beg m. 2
110 \sfol \FO #'0.3 #'0.0 <e-1> b | % end m. 2
112 e,,8 e' gis e e, e' gis_\dimin e | % m. 3
116 %% new section starts here in A minor
117 \set Score.beamExceptions = #'()
118 \once \override TextScript.staff-padding = #1.7
119 \tuplet 3/2 { a8\p^\andantino e' a c a e a, e' a c a e } | % m. 5
121 \tuplet 3/2 { a,8\pdolce e' a c a e } % beg m. 6
122 \tuplet 3/2 { e,8 \sfou <e'-3> <gis-1> c gis e } | % end m. 6
124 \tuplet 3/2 { a,8 <e'-2> a c e, b' a, e' a c a e } | % m. 7
126 \tuplet 3/2 { f,8 f' a \sfol \FO #'0.3 #'-0.5 <d-4> a f fis, d' a' d a d, } | % m. 8
128 \tuplet 3/2 { <g,-3>8 d' g d' g, d % beg m. 9
129 \sfod \FO #'0.0 #'-2.0 <gis,-4> \sfou <e'-2> <gis-1> b gis e } | % end m. 9
131 \tuplet 3/2 { a,8 e' a c a e e, e' gis c gis e } | % m. 10
133 \tuplet 3/2 { a,8 e' a b a e f, f' a d a f } | % m. 11
137 \new Staff = "guitar" <<
138 \context Voice = "upper" { \melody }
139 \context Voice = "lower" { \bass }
144 \override Fingering.staff-padding = #'()
145 \override TupletNumber.stencil = ##f
146 \override TupletBracket.bracket-visibility = ##f