2012/12/17 Arle Lommel <fene...@gmail.com>

> I have run into an odd little aesthetic issue. I'm finding that some
> eighth (or shorter) notes get stems that are too short when they stick out
> from the staff.
>
> For instance, I find the stem here awfully short because it makes the flag
> on the eighth note run into the note heads:
>
>
>
> But the measure before I get this:
>
>
> Which looks fine.
>
> While I am can tweak note stem lengths on an individual basis, it seems a
> less than ideal to address the issue.
>
> Is there some setting that can be used to keep the stems from getting so
> short? For the most part it only bothers me on the eight notes and shorter
> duration where the flags make it more apparent.
>
> Best,
>
> Arle
>
> _______________________________________________
> lilypond-user mailing list
> lilypond-user@gnu.org
> https://lists.gnu.org/mailman/listinfo/lilypond-user
>

Hi Arle,

please:
DON'T POST INLINE-IMAGES!
Attach them!
I'm surely not alone with filtering them out.

If I want to see what image you posted, I have to refer to the archives (or
change my filter-settings and I will _not_ do that).
This doesn't boost my motivation to work on your problem.

That said, on topic:
You may want to use the code below to lengthen an unbeamed stem for 8th or
shorter.
Sometimes LilyPond does a long stem, so I provided a reverting, too.

\version "2.16.1"

stemAdd =
#(define-music-function (parser location stem-add)(number?)
"
 Adds the value of stem-add to the length of the unbeamed stems of 8th and
 shorter.
"
#{
        \override Stem #'after-line-breaking =
           #(lambda (grob)
             (let* ((dur (ly:grob-property grob 'duration-log))
                    (nc (ly:grob-parent grob Y))
                    (beam? (ly:grob? (ly:grob-object grob 'beam)))
                    (lngth (if (not beam?)(ly:grob-property grob 'length))))
             (if (and (not beam?) (>= dur 3))
               (ly:grob-set-property! grob 'length (+ stem-add lngth))
               #f)))
#})

revertStemAdd = \revert Stem #'after-line-breaking

\layout {
        \stemAdd #1
}

\relative c' {
        \voiceTwo
        \autoBeamOff
        <d f a c>8
        d4
        d8
        d8[ e]
        d16
        d32
        d64
        d'64
        \revertStemAdd
        d'8 |
}


HTH,
  Harm

<<PastedGraphic-4.png>>

<<PastedGraphic-5.png>>

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to