opensubscriber
   Find in this group all groups
 
Unknown more information…

l : lilypond-user@gnu.org 23 April 2012 • 9:23AM -0400

Re: parenthesizing arpeggios
by David Nalesnik

REPLY TO AUTHOR
 
REPLY TO GROUP




Hi again!


> Here's something that works for arpeggios.  The attached file is a bit
> large because I needed to include several functions from stencil.scm to
> draw the parentheses.
>

Oh, what ever was I thinking!  No need at all for all that duplicated
code...

This is all you need:

\version "2.15.36"

\relative c' {
  \override Arpeggio #'stencil = #(lambda (grob)
    (parenthesize-stencil (ly:arpeggio::print grob) 0.1 0.5 0.5 0.2))
  \override Arpeggio #'before-line-breaking = #(lambda (grob)
    (set! (ly:grob-property grob 'X-extent)
          (ly:stencil-extent (ly:grob-property grob 'stencil) X)))
  \repeat unfold 4 {
  <c g' e'>-\arpeggio
  }
  <cis dis fis gis cis dis gis>-\arpeggio
  <cis dis fis gis cis dis>-\arpeggio
  <cis dis fis gis cis>-\arpeggio
  <cis dis fis gis>-\arpeggio
}

-David

Bookmark with:

Delicious   Digg   reddit   Facebook   StumbleUpon

Related Messages

opensubscriber is not affiliated with the authors of this message nor responsible for its content.