Hallo Martin,
das Verfahren aus dem alten Thread halte ich für viel zu umständlich.
Du kannst auch mal
hier nachschauen, vielleicht gibt das noch ein paar Anstöße.
Ich habe jetzt nur ein paar Symptome kuriert, eigentlich sollte man es komplett neu kodieren.
Allerdings muß Dir klar sein, daß jede Lösung, die glissando verwendet ein Problem hat: LilyPond akzeptiert kein glissando zu einer Pause. Da muß man dann doch rumfummeln.
Auf jeden Fall ist es jetzt nicht mehr nötig einen Zielakkord zu schreiben, in dem dann auch noch eine Note transparent gemacht werden muß. Die Angabe von \glissando entfällt. Das unsichtbar machen der Anfangsnote ebenfalls.
Schreib einfach \balken g
Ich habe eine 'minimum-length angegeben. Falls Dir der Wert nicht zusagt, ändere ihn halt.
\version "2.16.2"
\include "deutsch.ly"
ohr = \markup {
\with-dimensions #'(0 . 0) #'(0 . 0)
\translate #'( 0 . -0.3)
\combine \filled-box #'(-0.3 . +0.3) #'(0 . 0.3) #0 % Naht
\filled-box #'(-0.8 . +0.8) #'(0 . 0.15) #0 % Strich
}
balken = {
\once \override Glissando #'after-line-breaking =
#(lambda (grob)
(let* ((left-bound (ly:spanner-bound grob LEFT))
(left-Y (assoc-get 'Y (ly:grob-property grob 'left-bound-info))))
(ly:grob-set-property! left-bound 'stencil #f)
(ly:grob-set-nested-property! grob '(right-bound-info Y) left-Y)))
\once \override Glissando #'thickness = #6
\once \override Glissando #'(bound-details left padding) = #-0.5
\once \override Glissando #'(bound-details right padding) = #1.3
\once \override Glissando #'(bound-details left text) = \markup \rotate #-90 \ohr
\once \override Glissando #'(bound-details right text) = \markup \rotate #90 \ohr
\once \override Glissando #'springs-and-rods = #ly:spanner::set-spacing-rods
\once \override Glissando #'minimum-length = 10
<>\glissando
}
\score {
<<
\new Staff <<
\set Staff.instrumentName = #"Alt"
\new Voice = "Alt"
\relative c' {
\clef treble
\time 1/4
\autoBeamOff
\override Score.SpacingSpanner #'packed-spacing = ##t
\set Score.timing = ##f
e
\balken g
a
g2
g g
}
\new Lyrics = "ein" \lyricsto "Alt" {
Ei --
\once \override LyricText #'self-alignment-X = #LEFT
"ne Demonstra" -- ti -- on
zur Pause
}
>>
\new Staff <<
\set Staff.instrumentName = #"Tenor"
\new Voice = "Tenor"
\relative c' {
\clef "treble_8"
\time 1/4
\autoBeamOff
\override Score.SpacingSpanner #'packed-spacing = ##t
\set Score.timing = ##f
c4
\balken h
a h2
\balken c
\once \override NoteHead #'stencil = #point-stencil
\grace d
r
}
>>
>>
\midi {
}
\layout {
\context {
\Staff
\remove "Time_signature_engraver"
\remove "Bar_engraver"
\override Stem #'transparent = ##t
\override Flag #'transparent = ##t
\override Beam #'transparent = ##t
} % context
} % layout
} % scoreHTH,
Harm
EDIT: überflüssige Code-Zeilen entfernt
