\version "2.8.0" #(ly:set-option 'point-and-click #f) #(set-global-staff-size 20) moveFingering = #(define-music-function (parser location shift) (pair?) #{ \once \override Fingering #'extra-offset = $shift #}) moveStringNumber = #(define-music-function (parser location shift) (pair?) #{ \once \override StringNumber #'extra-offset = $shift #}) moveSlur = #(define-music-function (parser location shift) (pair?) #{ \once \override Voice.Slur #'extra-offset = $shift #}) barre = #(define-music-function (parser location padding text shorten) (number? string? pair?) #{ \once \override TextSpanner #'dash-fraction = #'() \once \override TextSpanner #'font-shape = #'upright \once \override TextSpanner #'edge-height = #'(0 . 1) \once \override TextSpanner #'padding = #$padding \once \override TextSpanner #'edge-text = #`( ,$text . "") \once \override TextSpanner #'shorten-pair = $shorten #}) rightAlignMark = #(define-music-function (parser location text padding ) (string? number?) #{ \once \override Score.RehearsalMark #'padding = #$padding \once \override Score.RehearsalMark #'self-alignment-X = #right \once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible \mark \markup { \fontsize #-2 $text } #}) \header { mutopiatitle = "Adelita" mutopiacomposer = "TarregaF" mutopiainstrument = "Guitar" source = "Boije Collection, Statens musikbibliotek - The Music Library of Sweden" style = "Romantic" maintainer = "Stewart Holmes" lastupdated = "2006/August/26" title = "Adelita" composer = "Francisco Tárrega (1852-1909)" tagline = \markup { \center-align \fontsize #-3.5 { \center-align { \fill-line { "" "Copyright © 2006" "" "Typeset by Stewart Holmes" "" } \fill-line { "" "Music from The Mutopia Project (www.mutopiaproject.org)" "" "Licensed under the Creative Commons Attribution-ShareAlike 2.5 License" "" } \fill-line { "" "Engraving by GNU Lilypond (www.lilypond.org)" "" "http://creativecommons.org/licenses/by-sa/2.5." "" } } } } % copyright = "Creative Commons Attribution-ShareAlike 2.5" footer = "Mutopia-2006/08/21-808" } top = \relative c { \set fingeringOrientations = #'(left) \set stringNumberOrientations= #'(down) \bar "|:" 8 ( \moveFingering #'(-1.3 . 0) \slurUp ) 2 | 8 ( \slurUp ) 2 | 8 ( \slurUp ) \moveFingering #'(-1.3 . 0) 4 | \break \slurDown \slurDashed \textSpannerDown \override TextSpanner #'edge-text = #(cons (markup #:teeny #:finger #:circle "2" ) "") \override TextSpanner #'dash-fraction = #'() \override TextSpanner #'font-shape = #'upright \override TextSpanner #'edge-height = #'(0 . 1) \override TextSpanner #'extra-offset = #'(0 . 0.5) \override TextSpanner #'shorten-pair = #'(-1 . -1) \appoggiatura { 16 ( [] } 8 ) [] [\startTextSpan] \stopTextSpan [] | \slurSolid ( \slurUp ) 2 | % bar 5 8 ( \slurUp ) 2 | 8 ( \slurUp ) 4 | 2 r4 | \bar ":|:" \key e \major 4. 8 8 [] | % bar 9 4. 8 8 [] | \once \override Arpeggio #'extra-offset = #'(0.8 . 0) \arpeggioBracket \moveFingering #'(-0.5 . -0.5) 8\arpeggio [] [] \slurDown \slurDashed \appoggiatura { \moveSlur #'(0 . -0.9) dis16-3 ([e-4] } 8) [] | \slurDown \slurDashed \appoggiatura { \moveSlur #'(0 . -0.5) cis16-3 ([dis-4] } cis8) [] [] \moveStringNumber #'(0 . -2.5) [] | \set stringNumberOrientations= #'(up) \moveStringNumber #'(0 . 2) 4. \moveFingering #'(0.25 . 0) 8 4 | % bar 13 \moveStringNumber #'(0 . 2) 8 [] \set stringNumberOrientations= #'(down) [] \slurUp \slurDashed \appoggiatura { \stemDown e16-2\3 ([fis-4] } \set fingeringOrientations = #'(up) \moveFingering #'(-0.2 . -0.7) \stemUp 8.) [16] | \set fingeringOrientations = #'(left) 8 8 \moveStringNumber #'(0 . 1.5) \set stringNumberOrientations= #'(up) 4 4 | 2 r4 | \bar ":|" } bass = \relative c { \set fingeringOrientations = #'(left) \set stringNumberOrientations= #'(down) e,2. | a | | \break e, | e | a | \break b2 e,4\rest | e\rest e e\rest | e2 a4 | \break e2 a4 | e2 \moveFingering #'(0 . -0.5) 4 | 2 c,4\rest | \break e,2 a4 | e2 4 | \set stringNumberOrientations = #'(left) 8 a\rest a4\rest | e e, a\rest | } middle = \relative c { \set fingeringOrientations = #'(left) \set stringNumberOrientations= #'(down) s2 4 | s2 \moveStringNumber #'(0 . -1) 4 | s2 4 | \break s2. | s2 4 | s2 4 | s2 4 | s2. | s4 4 s4 | s4 4 s4 | s2. | s | s4 4 \stemUp \set stringNumberOrientations = #'(left) \moveStringNumber #'(-1.5 . 0) 8 \stemDown | s2. | s | s | } dynamics = { \override DynamicLineSpanner #'padding = #6.5 \once \override TextScript #'padding = #4 s2.^\markup { \bold "Lento" }\p | s | s\mp | s4\< s8 s8\! s4\> | s2.\p | s | s | s \rightAlignMark "Fine" #3.5 | \bar ":|" s2.\mf | s | s2\< s8 s\! | s2\> s8 s\! | s2\< s8 s\! | s2. | s \> | s4\! s2 \rightAlignMark "D.C. al Fine" #5.9 | \bar ":|" } barring = { \textSpannerUp s2. | s2. | \barre #6.5 "CVII" #'(-5 . -3.5) s2\startTextSpan s4\stopTextSpan| s2. | s | s | s | \once \override TextScript #'padding = #3.5 s^\markup { "IV" } \barre #7.5 "CIV" #'(-2 . -3) s\startTextSpan | s2. | s8 s\stopTextSpan s4 \barre #7.5 "CIX" #'(-8 . -2.5) s8\startTextSpan s\stopTextSpan | \barre #7.5 "CVII" #'(-11.5 . -6.5) s2\startTextSpan s8 s\stopTextSpan | s2. | s4 \barre #5.5 "CVII" #'(-5 . -2) s8\startTextSpan s\stopTextSpan \barre #5.5 "CVIII" #'(-7 . -3.5) s8\startTextSpan s\stopTextSpan | s2 \barre #3 "CII" #'(-5 . -1) s8\startTextSpan s\stopTextSpan | s2. | } thescore = \score { << \context Staff = guitar { \set Staff.midiInstrument = "acoustic guitar (nylon)" \clef "G_8" \time 3/4 \key e \minor << \context Voice = "1" { \voiceOne \top } \context Voice = "2" { \voiceTwo \bass } \context Voice = "4" { \voiceFour \middle } \context Voice = "3" { \voiceThree << \dynamics \\ \barring >> } >> } >> \midi { \tempo 4=70 } \layout {} } \book { \paper { ragged-last-bottom = ##f ragged-bottom = ##f line-width = 180\mm left-margin = 15\mm indent = 0\mm top-margin = 0\mm } \score { \thescore } }