[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: aftergrace avec hampe barrée
From: |
Jean Abou Samra |
Subject: |
Re: aftergrace avec hampe barrée |
Date: |
Sat, 25 Sep 2021 11:21:29 +0200 |
User-agent: |
Mozilla/5.0 (X11; Linux x86_64; rv:78.0) Gecko/20100101 Thunderbird/78.11.0 |
Le 25/09/2021 à 11:06, Marc Lanoiselée via LilyPond French-speaking list
a écrit :
Bonjour,
Est-il possible de barrer la hampe d'une aftergrace et si possible
d'ajouter une liaison avec la note précédente (en fait de répéter la
typographie de l'accaciatura )?
\version "2.22.1"
<<
{\clef "alto"
\key c\major
\time 3/4
f'4 \acciaccatura { e'16 } \afterGrace d'2 { e'16 }
e' 2.}
>>
C'est possible, en modifiant légèrement le code de la
fonction \afterGrace pour ajouter la liaison et le style
de hampes.
\version "2.23.4"
afterAcciaccatura =
#(define-music-function (fraction main grace) ((scale?) ly:music? ly:music?)
(let ((main-length (ly:music-length main))
(fraction (or fraction (ly:parser-lookup 'afterGraceFraction))))
(descend-to-context
(make-simultaneous-music
(list
;; Ajout de <>\startGraceSlur pour débuter la liaison
;; sur la note principale.
(make-sequential-music
(list
#{ <>\startGraceSlur #}
main))
(make-sequential-music
(list
(make-music 'SkipMusic
'duration (ly:make-duration
0 0
(* (ly:moment-main main-length)
(scale->factor fraction))))
;; Changement du style de hampes.
#{ \temporary \override Flag.stroke-style = "grace" #}
(make-music 'GraceMusic
'element grace)
#{
% Retour à la valeur par défaut.
\revert Flag.stroke-style
% Fin de la liaison.
<>\stopGraceSlur
#}))))
'Bottom)))
{ \afterAcciaccatura c'4 d'8 e'4 }
Cordialement,
Jean