[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Liaison de phrasé s'achevant par une flèche
From: |
martial |
Subject: |
Re: Liaison de phrasé s'achevant par une flèche |
Date: |
Wed, 27 Jan 2021 02:40:11 -0700 (MST) |
Ha oui j'avais vu, et même mis dans mes "Lilypond help"
donc d'après le script de Schneidy
%%%%%%%%%%%%%%%%
arrowSlur =
-\tweak stencil
#(lambda (grob)
(let* ((cp (ly:grob-property grob 'control-points))
(lp (grob-interpret-markup grob (markup #:teeny "")))
(rp (grob-interpret-markup grob (markup #:teeny ">"))))
(set! lp (ly:stencil-aligned-to lp Y CENTER))
(set! lp (ly:stencil-aligned-to lp X 0.2))
(set! lp (ly:stencil-translate lp (first cp)))
(set! rp (ly:stencil-aligned-to rp Y CENTER))
(set! rp (ly:stencil-aligned-to rp X -0.2))
(set! rp (ly:stencil-translate rp (last cp)))
(list-set! cp 0
(cons (cdr (ly:stencil-extent lp X))
(cdr (first cp))))
(list-set! cp (1- (length cp))
(cons (car (ly:stencil-extent rp X))
(cdr (last cp))))
(ly:grob-set-property! grob 'control-points cp)
(apply ly:stencil-add (list lp rp
(ly:slur::print grob)))))
\etc
{ g'4\arrowSlur \(
\arrowSlur (b' c''2 ) |
g'2\arrowSlur ( f'4 e' ) \) }
%%%%
-----
♫artial♪
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/
- Liaison de phrasé s'achevant par une flèche, Gilles Tiar, 2021/01/26
- Re: Liaison de phrasé s'achevant par une flèche, Jacques Menu, 2021/01/26
- Re: Liaison de phrasé s'achevant par une flèche, Gilles Tiar, 2021/01/26
- Re: Liaison de phrasé s'achevant par une flèche, martial, 2021/01/27
- Re: Liaison de phrasé s'achevant par une flèche, Pierre Perol-Schneider, 2021/01/27
- Re: Liaison de phrasé s'achevant par une flèche,
martial <=
- Re: Liaison de phrasé s'achevant par une flèche, martial, 2021/01/27
- Re: Liaison de phrasé s'achevant par une flèche, Gilles Tiar, 2021/01/27
- Re: Liaison de phrasé s'achevant par une flèche, Gilles Tiar, 2021/01/28
- Re: Liaison de phrasé s'achevant par une flèche, Jacques Menu, 2021/01/28