On 6/14/20, david <david427@quetzalia.fr> wrote:
Ce n'est pas exactement ce que je recherche (il me faut la lettre de
l'alphabet "x" entre 2 notes consécutives) mais je vais regarder si je
trouve un moyen d'adapter ce code à mon cas précis (je vais essayer de
chercher tout seul)
Ah mais bien sûr, si vous n’avez pas besoin d’une ligne en pointillés
la question devient _nettement_ plus simple :
%%%%
extension =
#(define-music-function (m1 m2) (ly:music? ly:music?)
(let ((p1 (ly:music-property m1 'pitch))
(p2 (ly:music-property m2 'pitch))
(m1-clone (ly:music-deep-copy m1)))
(ly:music-set-property! m1-clone 'articulations '())
#{
\scaleDurations 1/2 {
$m1
\once \textLengthOn
\once \hideNotes
$m1-clone ^\markup \bold "×"
}
$m2
#}))
{
\clef bass
\extension e'2-3 fis'4-4
}
%%%%
V.