Am Mi., 5. Dez. 2018 um 10:56 Uhr schrieb Pierre Perol-Schneider
<pierre.schneider.pa...@gmail.com>:
>
> Thank you Harm,
> In this particular case, there is no chord.
> Cheers,
> Pierre
So why use event-chords and a context-property then?
Wouldn't below work already?
#(define (forced-dir-II grob)
(let* ((x-parent (ly:grob-parent grob X))
(stem (ly:grob-object x-parent 'stem))
(stem-dir (ly:grob-property stem 'direction)))
(if (= stem-dir 1)
(ly:grob-set-property! grob 'direction UP)
(ly:grob-set-property! grob 'direction DOWN))))
#(define (forced-dir-II grob)
(let* ((x-parent (ly:grob-parent grob X))
(stem (ly:grob-object x-parent 'stem))
(stem-dir (ly:grob-property stem 'direction)))
(if (= stem-dir 1)
(ly:grob-set-property! grob 'direction UP)
(ly:grob-set-property! grob 'direction DOWN))))
{
\clef "G_8"
\override Fingering.after-line-breaking = #forced-dir-II
\override Fingering.staff-padding = #'()
a4-4
b-2
a8-4
\noBeam
b-2
a8-4[
b-2]
}
How should it behave with flags and beams?
Cheers,
Harm
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
