Génération de notes profilées spéciales

Lorsque le profil spécifique d’une tête de note ne peut être obtenu facilement à l’aide d’un markup graphique, il est possible d’utiliser des instructions de dessin pour ly:make-stencil afin de générer ce profil. Cet exemple propose une tête de note profilée en parallélogramme.

Malheureusement, les commandes disponibles pour spécifier le dessin ne sont pas documentées à ce jour – c’est l’objet du ticket #6874 – mais la sous-commande path a la signature suivante, très proche de la fonction Scheme make-path-stencil.

(path épaisseur liste-commandes style-ligne-principale style-jonction-ligne remplissage)

Les commandes dans liste-commandes ressemblent aux instructions de dessin en PostScript, à ceci près que les arguments suivent ici le nom de la commande.

parallelogram =
  #(ly:make-stencil
    '(path 0.1
           (rmoveto 0 0.25
            lineto 1.2 0.75
            lineto 1.2 -0.25
            lineto 0 -0.75
            lineto 0 0.25)
           round
           round
           #t)
    (cons -0.05 1.25)
    (cons -.75 .75))

myNoteHeads = \override NoteHead.stencil = \parallelogram
normalNoteHeads = \revert NoteHead.stencil

\relative c'' {
  \myNoteHeads
  g4 d'
  \normalNoteHeads
  <f, \tweak stencil \parallelogram b e>4 d
}