doigté en couleur

[Gerard]

Bonjour,

1. Suite au développement de Valentin et Jean dans le fil "ajout de paroles à une partition", je modifie le sujet pour qui voudrait retrouver le doigté en couleur !

2. Ayant tâté du tuto de Jean sur le scheme, j'ose faire un petit pas en intégrant des variables dans le code proposé par Valentin et Jean (choix de la couleur, taille et écart à la portée). Pas de quoi fanfaronner mais quand même :)

\version "2.22.2"

#(define ColorFingerT darkblue)
#(define ColorFingerP red)
#(define Taille 5)
#(define Ajustement -6)

\layout {
  \context {
    \Voice
    \override Fingering.before-line-breaking =
    #(lambda (grob)
       (ly:grob-set-property! grob 'Y-offset Ajustement))
    \override Fingering.stencil =
    #(lambda (grob)
       (let* ((ev (event-cause grob))
              (txt (fingering::calc-text grob))
              (dir (ly:event-property ev 'direction)))
         (grob-interpret-markup
          grob
          (case dir
            ((1) (markup #:with-color ColorFingerP #:underline #:fontsize Taille txt))
            ((-1) (markup #:with-color ColorFingerT #:fontsize Taille txt))
            ((()) txt)))))
  }
}


{
  c'^1
  d'_2
  e'_3
  f'^4
  g'_1
}

J'oserai bien une petite question : comment ^ et _ sont détournés de leur fonction première et modifient dir ? que font ev, event-cause... ?

Cordialement

Gérard