[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Liaison de valeur entre parenthèses
From: |
bameylan |
Subject: |
Re: Liaison de valeur entre parenthèses |
Date: |
Mon, 11 Nov 2013 12:00:27 -0800 (PST) |
Alors voilà le code modifié pour être compatible avec les liaisons de valeur:
\version "2.17.95"
tieBetweenText =
#(define-music-function (parser location leftText rightText) (markup?
markup?)
#{
\once \override Tie #'stencil =
#(lambda (grob)
(let* ((orig (ly:grob-original grob))
(siblings (if (ly:grob? orig)
(ly:spanner-broken-into orig)
'()))
(tie-stencil (ly:stencil-aligned-to
(ly:tie::print grob) Y CENTER))
(left-addition (ly:stencil-aligned-to
(grob-interpret-markup grob leftText) Y
CENTER))
(right-addition (ly:stencil-aligned-to
(grob-interpret-markup grob rightText) Y
CENTER)))
(if (or (null? siblings)
(eq? grob (car siblings)))
(set! tie-stencil
(ly:stencil-combine-at-edge
left-addition
X RIGHT
tie-stencil
1.5)))
(if (or (null? siblings)
(eq? grob (car (reverse siblings))))
(set! tie-stencil
(ly:stencil-combine-at-edge
tie-stencil
X RIGHT
right-addition
0.6)))
tie-stencil))
#})
% utilisation :
parenthesizedTie = \tieBetweenText \markup "(" \markup ")"
{
\parenthesizedTie
d'2~d'
}
et le résultat donne ceci (chez moi en tous cas...):
<http://lilypond-french-users.1298960.n2.nabble.com/file/n7580539/tieparentese.jpeg>
donc ton idée est juste... pour le placement correct, j'ai tenté ce qui
était à ma portée... sans résultat...
Bernard
-----
Cordialement
Bernard
--
View this message in context:
http://lilypond-french-users.1298960.n2.nabble.com/Liaison-de-valeur-entre-parentheses-tp7580531p7580539.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.