[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Appogiature double?
From: |
Ya Gloops |
Subject: |
Re: Appogiature double? |
Date: |
Sun, 22 Oct 2023 18:03:44 +0000 (UTC) |
Intérressant !
Y a t'il un moyen de pouvoir change le style de flag, j'aime utiliser
"modern-straight-flag"
Gilles
Le dimanche 22 octobre 2023 à 16:48:02 UTC+2, Jean Abou Samra
<jean@abou-samra.fr> a écrit :
Bonjour Bernard,
Ça n'existe pas par défaut, mais je peux vous proposer une implémentation :
\version "2.24.2"
double-slash-padding = 0.4
startDoubleSlashedGraceMusic = {
\temporary \override Flag.stencil =
#(lambda (grob)
(let* ((stem (ly:grob-parent grob X))
(dir (if (eqv? (ly:grob-property stem 'direction) UP) "u" "d"))
(flag-stencil (retrieve-glyph-flag "" dir "" grob))
(stroked (add-stroke-glyph flag-stencil grob dir "grace" ""))
(moved (ly:stencil-translate-axis stroked double-slash-padding Y))
(double-stroked (add-stroke-glyph moved grob dir "grace" ""))
(moved-back
(ly:stencil-translate-axis double-stroked (-
double-slash-padding) Y)))
moved-back))
}
stopDoubleSlashedGraceMusic = {
\revert Flag.stencil
}
doubleSlashedGrace =
#(def-grace-function startDoubleSlashedGraceMusic stopDoubleSlashedGraceMusic)
{
\doubleSlashedGrace c'8 d'2 e'2
}
Cordialement,
Jean