On 4 Dec 2007, at 00:38, Trevor Daniels wrote:

Maybe this is a better solution for you.  If you need
other patterns it should be clear how to modify the
music function.  Someone with more experience with
music functions may be able to improve this so the
four quad notes can be placed inside braces after
the \quad call, but with care this works ok.

Not really important, I think.

quad = #(define-music-function ( parser location a b c d )
         (ly:music? ly:music? ly:music? ly:music?)
         #{
           \times 3/4 {
             $a
             \set stemRightBeamCount = #1 $b
             \set stemLeftBeamCount = #1 $c
             $d
           }
         #}
       )

\relative c {
  \clef bass
  \time 24/32
  \set beatGrouping = #'(3 3 4 4 3 3 4)
  \set subdivideBeams = ##t
  #(override-auto-beam-setting '(end * * 24 32) 3 16)
  #(override-auto-beam-setting '(end * * 24 32) 7 16)
  #(override-auto-beam-setting '(end * * 24 32) 10 16)
  \quad c16 b c c
  d c d g,
  \quad a b c c
  d e |
}

I think you made a typo here, because you made a function to fix it for the meter 12/16, but then entered 24/32, where the beaming comes out correctly with only using the quadruplets straight off. This works:

quad = #(define-music-function ( parser location a b c d )
         (ly:music? ly:music? ly:music? ly:music?)
         #{
           \times 3/4 {
             $a
             \set stemRightBeamCount = #1 $b
             \set stemLeftBeamCount = #1 $c
             $d
           }
         #}
       )

\relative c {
  \clef bass
  \time 12/16
  \set beatGrouping = #'(3 2 2 3 2)
  \set subdivideBeams = ##t
  #(override-auto-beam-setting '(end * * 12 16) 3 16)
  #(override-auto-beam-setting '(end * * 12 16) 7 16)
  #(override-auto-beam-setting '(end * * 12 16) 10 16)
  \quad c16 b c c
  d c d g,
  \quad a b c c
  d e |
}

  Hans Ã…berg




_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to