Now with the code...
%%%%% BEGIN CODE
hairpinMolto = {
\override Voice.Hairpin #'stencil = #(lambda (grob) (ly:stencil-combine-at-edge
(ly:hairpin::print grob) 1 -1 (ly:text-interface::print grob) ))
\override Voice.Hairpin #'text = \markup { \smaller \italic "molto" }
}
\new Staff {
\hairpinMolto c'2\< c'2\f
}
%%%%% END CODE
----- Forwarded Message ----
From: Vivian Barty-Taylor <[EMAIL PROTECTED]>
To: lilypond-user@gnu.org
Sent: Wednesday, 28 February, 2007 1:48:09 PM
Subject: CrescMolto in Scheme
I'm trying to make a Scheme construction (my first!) which will automatically
center align a piece of text under a Hairpin object. The code I've got so far
is below. This would save laboriously individually adjusting the
#'extra-offset values of each TextScript.
What I can't find is how to do the center-aligning! Any suggestions?
Many thanks,
Vivian.
Inbox full of unwanted email? Get leading protection and 1GB storage with All
New Yahoo! Mail.
___________________________________________________________
What kind of emailer are you? Find out today - get a free analysis of your
email personality. Take the quiz at the Yahoo! Mail Championship.
http://uk.rd.yahoo.com/evt=44106/*http://mail.yahoo.net/uk _______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user
