[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Fingering vs stem direction
From: |
Thomas Morley |
Subject: |
Re: Fingering vs stem direction |
Date: |
Wed, 5 Dec 2018 11:16:02 +0100 |
Am Mi., 5. Dez. 2018 um 10:56 Uhr schrieb Pierre Perol-Schneider
<address@hidden>:
>
> 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