On 30 January 2010 13:42, Bertalan Fodor (LilyPondTool)
<lilypondt...@organum.hu> wrote:
> I checked the doc and couldn't find an easy way. Perhaps looking at the
> ambitus engraver source code would help more. Actually I think implementing
> tis possibility wouldn't be that hard for a developer.
Here's a quick hack using AmbitusLine:
shiftAmbitusHead =
#(define-music-function (parser location offset) (number?)
#{
\override AmbitusLine #'before-line-breaking =
#(lambda (grob)
(let* ((heads (ly:grob-object grob 'note-heads))
(up-head (ly:grob-array-ref heads 1)))
(ly:grob-set-property! up-head 'X-offset $offset)))
#})
\new Voice \with { \consists Ambitus_engraver }
\relative c' {
\shiftAmbitusHead #3
c4 d e f
g4 a b c
}
Cheers,
Neil
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
