168 lines
3.2 KiB
Plaintext
168 lines
3.2 KiB
Plaintext
\version "2.22.2"
|
|
\language "deutsch"
|
|
\header{
|
|
title = "Valse"
|
|
composer = "Francisco Tarrega"
|
|
tagline = ##f
|
|
}
|
|
bbarre =
|
|
#(define-music-function (barre location str bottom top music) (string? ly:pitch? ly:pitch? 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))))))
|
|
#{
|
|
<a e>1\arpeggio
|
|
\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 { #str } #})
|
|
(text . ,#{ \markup { \draw-line #'( 0 . -.5) } #})
|
|
(Y . 0)
|
|
(padding . 0.25)
|
|
(attach-dir . -2))
|
|
(right
|
|
(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 a \major
|
|
\time 3/4
|
|
\partial 4
|
|
}
|
|
|
|
melodyone = \relative {
|
|
\global
|
|
\voiceOne
|
|
e''4-0
|
|
e2.-0
|
|
fis2.-3
|
|
\bbarre #"II" a d {fis2.
|
|
gis2.-3
|
|
gis2 a4-4
|
|
a2 gis4
|
|
} %\bbarre #"II" {
|
|
%fis2. }
|
|
|
|
r2.
|
|
fis2.
|
|
gis2-4 a4
|
|
cis2.
|
|
h2.
|
|
e8-4 d8-2 fis,4-3 gis4-1
|
|
cis8-4 h8 d,4-1 e4-3
|
|
h'8-4 a8 cis,4-2 e4
|
|
r4 r4
|
|
|
|
e4
|
|
e2.
|
|
fis2.
|
|
fis2.
|
|
gis2.
|
|
gis2.
|
|
a2.
|
|
e'2.-4
|
|
d2.-1
|
|
fis,2.
|
|
d'2.-4
|
|
cis2.-3
|
|
e,2.
|
|
fis2.-1
|
|
h2.
|
|
a2.
|
|
a2
|
|
}
|
|
|
|
melodytwo = \relative {
|
|
\global
|
|
\voiceThree
|
|
s4
|
|
r4 <a'-1 cis-2>4 <a cis>4
|
|
r4 <a cis>4 <a cis>4
|
|
r4 <a cis>4 <a cis>4
|
|
r4 <a cis>4 <a cis>4
|
|
r4 <a cis>4 <a cis>4
|
|
r4 <a cis>4 <a cis>4
|
|
r4 <h-3 d-3>4 <h d>4
|
|
|
|
%r2.
|
|
}
|
|
|
|
bass = \relative {
|
|
\global
|
|
\voiceTwo
|
|
r4
|
|
a2.
|
|
e2.
|
|
a2.
|
|
e2.
|
|
a2.
|
|
e2.
|
|
h'2.
|
|
|
|
h4 cis4-3 d4
|
|
e,2.
|
|
h'2.
|
|
e,2.
|
|
e'2.
|
|
e,2.
|
|
e2.
|
|
a2.
|
|
\override NoteHead.style = #'harmonic-mixed
|
|
a2.-3^\markup { \italic \fontsize #-2 "Harm. VII" }
|
|
\revert NoteHead.style
|
|
|
|
a2.
|
|
e2.
|
|
a2.
|
|
e2.
|
|
a2.
|
|
a2.
|
|
d2.
|
|
d2.
|
|
h2.
|
|
d2.
|
|
e2.
|
|
e,2.
|
|
e2.
|
|
e'2.
|
|
a,2.
|
|
a2
|
|
}
|
|
|
|
\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
|
|
}
|
|
}
|
|
}
|