104 lines
2.5 KiB
Plaintext
104 lines
2.5 KiB
Plaintext
\version "2.22.2"
|
|
\language "deutsch"
|
|
\header{
|
|
title = "Lagrima"
|
|
composer = "Francisco Tarrega"
|
|
tagline = ##f
|
|
}
|
|
bbarre =
|
|
#(define-music-function (barre location str music) (string? ly:music?)
|
|
(let ((elts (extract-named-music music '(NoteEvent EventChord))))
|
|
(if (pair? elts)
|
|
(let ((first-element (first elts))
|
|
(last-element (last elts)))
|
|
(set! (ly:music-property first-element 'articulations)
|
|
(cons (make-music 'TextSpanEvent 'span-direction -1)
|
|
(ly:music-property first-element 'articulations)))
|
|
(set! (ly:music-property last-element 'articulations)
|
|
(cons (make-music 'TextSpanEvent 'span-direction 1)
|
|
(ly:music-property last-element 'articulations))))))
|
|
#{
|
|
\once \override TextSpanner.font-size = #-2
|
|
\once \override TextSpanner.font-shape = #'upright
|
|
\once \override TextSpanner.staff-padding = #3
|
|
\once \override TextSpanner.style = #'line
|
|
\once \override TextSpanner.to-barline = ##f
|
|
\once \override TextSpanner.bound-details =
|
|
#`((left
|
|
(text . ,#{ \markup { \draw-line #'( 0 . -.5) } #})
|
|
(Y . 0)
|
|
(padding . 0.25)
|
|
(attach-dir . -2))
|
|
(right
|
|
(text . ,#{ \markup { #str } #})
|
|
(Y . 0)
|
|
(padding . 0.25)
|
|
(attach-dir . 2)))
|
|
%% uncomment this line for make full barred
|
|
% \once \override TextSpanner.bound-details.left.text = \markup{"B" #str}
|
|
$music
|
|
#})
|
|
|
|
global = {
|
|
\set fingeringOrientations = #'(left)
|
|
\mergeDifferentlyHeadedOn
|
|
\mergeDifferentlyDottedOn
|
|
\key e \major
|
|
\time 3/4
|
|
}
|
|
|
|
melodyone = \relative {
|
|
\global
|
|
\voiceOne
|
|
\bar "|."
|
|
gis''4-3 a4-2 h4-4
|
|
fis2.-4
|
|
gis4 a4 h4
|
|
fis2.
|
|
|
|
\bbarre #"IX" {
|
|
e'4-4 dis4-4
|
|
} \bbarre #"VII" {
|
|
cis4-3
|
|
h4-1
|
|
}
|
|
cis,8[ e8 fis8 a8]
|
|
gis4-3 cis,8[ fis8] h,,8[ dis'8]
|
|
e2 r4
|
|
}
|
|
|
|
melodytwo = \relative {
|
|
\global
|
|
\voiceFour
|
|
}
|
|
|
|
bass = \relative {
|
|
\global
|
|
\voiceTwo
|
|
e'4-1 fis4-1 gis4-3
|
|
dis2.-1
|
|
e4 fis4 gis4
|
|
dis2.
|
|
|
|
cis'4-3 h4 a4
|
|
h4-2\glissando cis2-2
|
|
}
|
|
|
|
\score {
|
|
\new Staff = "guitar" <<
|
|
%\tempo 4 = 114
|
|
\context Voice = "upper" { \melodyone }
|
|
\context Voice = "middle" { \melodytwo }
|
|
\context Voice = "lower" { \bass }
|
|
>>
|
|
\layout {
|
|
\context {
|
|
\Score
|
|
\remove "Bar_number_engraver"
|
|
\override Fingering.staff-padding = #'()
|
|
%\omit TupletNumber
|
|
%\override TupletBracket.bracket-visibility = ##f
|
|
}
|
|
}
|
|
}
|