%% Generated by lilypond-book.py %% Options: [quote,alt=[image of music],indent=0\mm] \include "lilypond-book-preamble.ly" % **************************************************************** % Start cut-&-pastable-section % **************************************************************** \paper { #(define dump-extents #t) line-width = 160\mm - 2.0 * 0.4\in indent = 0\mm force-assignment = #"" line-width = #(- line-width (* mm 3.000000)) } \layout { } % **************************************************************** % ly snippet: % **************************************************************** \sourcefilename "fretted-headword.ly" \sourcefileline 0 % INSPIRATIONAL HEADER FOR LILYPOND DOCUMENTATION fretted-strings % % Passage from Johann Kaspar Mertz "Opern Revue, Op. 8, no. 17" % % on melodies from Bellini's "Norma" % %*****************************************************************% \version "2.11.57" #(set-global-staff-size 15) \paper{ ragged-end=##t line-width=17\cm indent=0\cm } \layout { \context { \Score \remove "Bar_number_engraver" \override PaperColumn #'keep-inside-line = ##t \override NonMusicalPaperColumn #'keep-inside-line = ##t } } %%%% shortcuts % fingering orientations sfol = \set fingeringOrientations = #'(left) sfor = \set fingeringOrientations = #'(right) sfod = \set fingeringOrientations = #'(down) sfou = \set fingeringOrientations = #'(up) % string number orientations ssnol = \set stringNumberOrientations = #'(left) %(down right up) ssnou = \set stringNumberOrientations = #'(up) ssnod = \set stringNumberOrientations = #'(down) ssnor = \set stringNumberOrientations = #'(right) % define fingering offset FO = #(define-music-function (parser location offsetX offsetY) (number? number?) #{ \once \override Voice.Fingering #'extra-offset = #(cons $offsetX $offsetY ) #}) % markups rit = \markup \center-align { \bold { \italic { " rit." } } } dim = \markup \center-align { \italic { " dim." }} andantino = \markup \left-align { \italic { \bold { \fontsize #+2.5 { "Andantino" }}}} benmarcato = \markup { \italic { \bold { "il canto ben marcato" }}} %%% THE MUSIC %%% melody = \relative c { \clef "treble_8" \key d \major \time 4/4 % \override Staff.TimeSignature #'transparent = ##t \voiceOne \override Fingering #'staff-padding = #'() \sfol e,32 a' c e e, a c e e,, a' c e e, a c e f4\rest <e'-4>4-> | % m. 1 e,,,32 gis' b e e, gis b e e,, gis' b e e, gis b e f4\rest \FO #'0.4 #'0.5 <gis-1 e'-4>4 | % m. 2 d4\rest <b e>-> d4\rest^\rit <b e>4-> | % m. 3 <gis b e>1 | % m. 4 \bar "||" \key a \minor \override TupletNumber #'stencil = ##f \override TupletBracket #'bracket-visibility = ##f R1 % m. 5 e'4^\benmarcato e8. d16-4 d4-4 \times 2/3{\sfou \FO #'-0.3 #'0.6 <c-2>4 b8} | % end of m. 6 \FO #'-0.3 #'0.3 <a-3>4 \times 2/3{c4 b8} a4 e'8. e16 | % m. 7 \FO #'-0.3 #'0.3 <g-4>4 \times 2/3{\sfol \FO #'0.3 #'0.0 <f-1>4 e8} e4 % beg of m. 8 \times 2/3{\sfou <d-4>4 c8} | % end of m. 8 b4 \times 2/3{d4-4 c8} \sfou \FO #'-1.7 #'-1.5 <b-0>4 e | % end of m. 9 e4 e8. d16-4 d4 \times 2/3{c4 b8} | % m. 10 \times 2/3{a4 a8 b4 c8} % beg of m. 11 \sfou \FO #'-0.3 #'0.3 <d-4>4^\< \times 2/3{e4 <d f>8\!} | % end of m. 11 } bass = \relative c { \key d \major \time 4/4 \voiceTwo \override Fingering #'staff-padding = #'() e,8\fp[ e'] e,[ e'] e,[ \sfol <c''-1> <a'-2> c,] | % m. 1 e,,8\fp[ e'] e,[ e'] e,[ \sfod \FO #'0.2 #'-0.2 <b''-1> % beg m. 2 \sfol \FO #'0.3 #'0.0 <e-2> b] | % end m. 2 e,,8 e' gis e e, e' gis_\dim e | % m. 3 e,1 | % m. 4 %% new section starts here in A minor \override TupletNumber #'stencil = ##f \override TupletBracket #'bracket-visibility = ##f \set tupletSpannerDuration = #(ly:make-moment 1 4) \once \override TextScript #'staff-padding = #1.7 \times 2/3{a8\p[^\andantino e' a c a e ] a,[ e' a c a e ]} | % m. 5 \once \override DynamicText #'extra-offset = #'( -2.1 . 0.0 ) % beg m. 6 \once \override TextScript #'staff-padding = #'() \once \override TextScript #'extra-offset = #'( 0.0 . 2.0 ) \times 2/3{a,8[\p_\markup {\italic { "dol." } } e' a c a e]} \times 2/3{e,8[ \sfou <e'-3> <gis-1> c gis e]} | % end m. 6 \times 2/3{a,8[ <e'-2> a c e, b'] a,[ e' a c a e]} | % m. 7 \times 2/3{f,8[ f' a \sfol \FO #'0.3 #'-0.5 <d-4> a f] fis,[ d' a' d a d,]} | % m. 8 \times 2/3{<g,-3>8[ d' g d' g, d] % beg m. 9 \sfod \FO #'0.0 #'-2.0 <gis,-4>[ \sfou <e'-2> <gis-1> b gis e]} | % end m. 9 \times 2/3{a,8[ e' a c a e] e,[ e' gis c gis e]} | % m. 10 \times 2/3{a,8[ e' a b a e] f,[ f' a d a f]} | % m. 11 } \score { \context Staff = "guitar" << \context Voice = "upper" { \melody } \context Voice = "lower" { \bass } >> \layout { } \midi { \context { \Score } } } % **************************************************************** % end ly snippet % ****************************************************************