Hallo harm,
Ist es möglich, dass der Schlagpfeil vor dem Fingersatz platziert wird?
\version "2.19.32"
#(define ((strike direction) grob)
(let* ((pos (ly:grob-property grob 'positions))
(thick (ly:grob-property grob 'thickness 1)))
(grob-interpret-markup grob
(markup
#:combine
#:translate
`(0 . ,(interval-end pos))
#:override `(thickness . ,thick)
#:draw-line
`(0 . ,(- (interval-length pos)))
#:translate
(cons
0
((if (= direction 1) interval-end interval-start)
(interval-widen pos 0.5)))
#:fontsize thick
#:arrow-head Y direction #f))))
strikeUp =
#(define-event-function ()()
#{
-\tweak stencil #(strike UP)
-\tweak X-extent #'(-0.5 . 0.5)
\arpeggio
#})
strikeDown =
#(define-event-function ()()
#{
-\tweak stencil #(strike DOWN)
-\tweak X-extent #'(-0.5 . 0.5)
\arpeggio
#})
\new Staff <<
\new Voice {
\time 3/8
\voiceOne
\set fingeringOrientations = #'(left)
%\override Arpeggio.thickness = 2
<e'' c''-1 a'-3 e'-2 a>16 \strikeUp
}
\new Voice {
\set fingeringOrientations = #'(left)
\voiceTwo <a-2>16
}
>>