Files
lilypond/kitara/iedere.ly
2024-02-27 19:20:03 +01:00

93 lines
2.7 KiB
Plaintext

\version "2.22.2"
\language "deutsch"
\header{
title = "Iedere nacht verlang ik"
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
#})
melody = \relative {
\set fingeringOrientations = #'(down)
\mergeDifferentlyHeadedOn
\mergeDifferentlyDottedOn
\key g \major
\time 4/4
\voiceOne
\partial 4. h'8 e fis \bar ".|:"
e, e' h e, a, [<c'-1>] h <d-4>
e, [e'] <fis-1> [<d-2>] <h-4> <d-2> <a'-3> d,
e [<a-4>] a [g] g [e] e g
\bbarre #"II" {
fis d h d
\autoBeamOff fis
} g d, [fis']
\autoBeamOn
c, c' e g a [d,] <g-2> <a-4>
<h-4> [h,] <c'-4> e, a e c <g'-4>
<fis-2> [h,] e, g' a [e] <d-3> <fis-2>
e, e' h g e, h'' e fis
}
bass = \relative {
\set fingeringOrientations = #'(down)
\key g \major
\time 4/4
\voiceTwo
\partial 4. s4.
<e'-2>4. e8 a,4 <h-2>
<e-2> d <g,-1>4. g8
<c-1>4 a <e'-1> e
h2 r8 e d4
c4. c8 d4 <e-1>8 <fis-3>
<g-0>4 <c,-3> a4. <e'-1>8
<h-1>4 e a, d
<e-1>2 e, \bar ":|."
}
\score {
\new Staff = "guitar" <<
\tempo 4 = 78
\context Voice = "upper" { \melody }
\context Voice = "lower" { \bass }
>>
\layout {
\context {
\Score
\remove "Bar_number_engraver"
\override Fingering.staff-padding = #'()
\omit TupletNumber
\override TupletBracket.bracket-visibility = ##f
}
}
}