Sat, 03 Jan 2004 16:55:00 +0100, Vaclav a dit :
> Hello,
> I need to typeset a trill with the "tr" at the beginning and moreover
> being enclosed in parentheses, like this : "(tr~~~~~~~~~)".
> I only need to concatenate two markups when setting edge-text, for the
> first argument of #cons; for simple "tr~~~" this is
> \property Voice.TextSpanner \set #'edge-text = #(cons
> (make-musicglyph-markup "scripts-trill") "").
> So I tried
> #(cons
> (combine-markup
> (make-musicglyph-markup "accidentals-leftparen")
> (make-musicglyph-markup "scripts-trill"))
> (make-musicglyph-markup "accidentals-rightparen"))
> but this does not work (ERROR: In procedure car: ERROR: Wrong type
> argument in position 1: () ). I am not sure if combine-markup is the
> function I need, is there another one or should I do it in another way
> altogether?
> Thanks for suggestions.
> Vaclav
Here are two suggestions. (I'm using LilyPond 2.0.1)
First, using temporary variables and the markup notation:
--------------------------
beginTrill=\markup {
\musicglyph #"accidentals-leftparen"
\translate #(cons 0.5 -0.7) \musicglyph #"scripts-trill"
" " }
endTrill=\markup { \musicglyph #"accidentals-rightparen" }
\score {
\notes {
\property Voice.TextSpanner \set #'edge-text = #(cons beginTrill endTrill)
c2\startTextSpan b c\stopTextSpan a
}
}
--------------------------
The second, in plain scheme:
--------------------------
#(use-modules (ice-9 optargs) (lilypond markups))
\score {
\notes {
\property Voice.TextSpanner \set #'edge-text =
#(cons (markup (#:musicglyph "accidentals-leftparen")
(#:translate (cons 0.5 -0.7) (#:musicglyph "scripts-trill")))
(markup (#:musicglyph "accidentals-rightparen")))
c2\startTextSpan b c\stopTextSpan a
}
}
--------------------------
but this one requires an extra scheme lib that enables you to write
markups in scheme, in a way that looks like regular LilyPond markup
notation: http://nicolas.sceaux.free.fr/schemingly/markups.html
Ie, the LilyPond markup notation ---> scheme markup translation is
straight-forward.
nicolas
_______________________________________________
Lilypond-user mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/lilypond-user
