Or, if you want to keep your syntax:

\version "2.18.2"

myCluster = {
  \once\override NoteHead.X-offset = #0
  \once\override NoteHead.stem-attachment = #'(0.8 . 0)
  \once\override NoteHead.stencil =
    #(lambda (grob)
        (grob-interpret-markup grob
          #{
            \markup {
              \with-dimensions #'(-0.4 . 0.4) #'(0 . 0)
              \override #'(thickness . 5)
              \draw-line #'(0 . 0.5)
            }
          #}))
}

{
  \new Voice { \myCluster <c' d' e'>4 }
  \new Voice { \myCluster <a b c'>4  }
  \new Voice { \myCluster <f g a>8 }
  \new Voice { \myCluster <d~ e f>4 \myCluster q }
}

Cheers,
Pierre

2015-03-22 18:59 GMT+01:00 Pierre Perol-Schneider <
pierre.schneider.pa...@gmail.com>:

> Hi Iain,
>
> How about:
>
> \version "2.18.2"
>
> {
>   \override NoteHead.X-offset = #0
>   \override NoteHead.stem-attachment = #'(0.8 . 0)
>   \override NoteHead.stencil =
>     #(lambda (grob)
>         (grob-interpret-markup grob
>           #{
>             \markup {
>               \with-dimensions #'(-0.4 . 0.4) #'(0 . 0)
>               \override #'(thickness . 5)
>               \draw-line #'(0 . 0.5)
>             }
>           #}))
>     <c' d' e'>4
>     <a b c'>4
>     <f g a>8
>     <d~ e f>4 q
> }
>
> HTH,
> Pierre
>
> 2015-03-22 15:23 GMT+01:00 Ebo H <del...@hotmail.com>:
>
>> \version "2.18.2"
>> {
>> \new Voice { \makeClusters  <c' d'  e' f'> 4   }
>> \new Voice { \makeClusters  <a b c' d' >4  }
>> \new Voice { \makeClusters <f g  a  b >8 }
>> \new Voice { \makeClusters  <d e f g> 2 }
>> }
>>
>> Is there a way to show rhythmic values and ledger lines in discrete note
>> clusters?
>>
>> _______________________________________________
>> lilypond-user mailing list
>> lilypond-user@gnu.org
>> https://lists.gnu.org/mailman/listinfo/lilypond-user
>>
>>
>
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to