Subject: ligne supplémentaire de guidon

From: [email-masked]
Date: Tue, 25 Jan 2022 11:04:21 +0100 (CET)

Bonjour à tous,

Je cherche à graver une ligne supplémentaire pour un guidon situé hors portée.
Savez-vous comment procéder ?

Merci pour votre aide et belle journée !

Joël

---

From: Xavier Scheuer <[email-masked]>
Date: Tue, 25 Jan 2022 11:40:34 +0100

> Savez-vous comment procéder ?

Bonjour,

Il y a un bug ouvert à ce sujet, avec un workaround.
https://gitlab.com/lilypond/lilypond/-/issues/6055

Cordialement,
Xavier

-- 
Xavier Scheuer <[email-masked]>

---

From: [email-masked]
Date: Tue, 25 Jan 2022 11:50:44 +0100 (CET)

Merci beaucoup Xavier, c'est parfait !
Bonne journée

----- Mail original -----
De: "Xavier Scheuer" <[email-masked]>
À: "JoëlG" <[email-masked]>
Cc: "lilypond-user-fr" <[email-masked]>
Envoyé: Mardi 25 Janvier 2022 11:40:34
Objet: Re: ligne supplémentaire de guidon

Bonjour, 

Cordialement, 
Xavier 

-- 

Xavier Scheuer < [email-masked] >

---

From: Jean Abou Samra <[email-masked]>
Date: Tue, 25 Jan 2022 20:45:08 +0100

Bonjour,

Permettez-moi de saisir l'occasion de ce fil pour poser
une question. Il est très facile de régler le bug en question,
sauf que la manière dont la taille des lignes supplémentaires
est calculée par défaut les rend trop courtes, comme on
peut le voir sur l'image en pièce jointe. C'est pour
cela que le code d'Aaron modifie la taille, avec des
valeurs qu'il a choisies. Voici une version de ce code
légèrement modifiée pour qu'il soit possible de régler
indépendamment la longueur à gauche et la longueur à
droite :

\version "2.22.1"

#(define custos-ledger-paddings
    '((vaticana . (-0.25 . 0.25))
      (medicaea . (-0.25 . 0.25))
      (hufnagel . (-0.15 . 0.15))
      (mensural . (-0.0 . 0.0))))

Custos_Ledger_Lines_engraver =
#(make-engraver
    (acknowledgers
      ((custos-interface engraver custos source)
        (let ((pad (assq-ref custos-ledger-paddings (ly:grob-property 
custos 'style)))
              (sten (ly:grob-property custos 'stencil))
              (nh (ly:engraver-make-grob engraver 'NoteHead custos)))
          (ly:grob-set-property! nh 'non-musical #t)
          (ly:grob-set-property!
           nh
           'stencil
           (ly:make-stencil
            (ly:stencil-expr sten)
            (coord-translate (ly:stencil-extent sten X)
                             pad)
            (ly:stencil-extent sten Y)))
          (ly:grob-set-parent! nh X custos)
          (ly:grob-set-parent! nh Y custos)))))

\paper { indent = 0 ragged-right = ##t }
\new Staff \with { \omit TimeSignature
    \consists Custos_engraver
    \consists \Custos_Ledger_Lines_engraver }
{ <a c'''>2. r4 \override Staff.Custos.style = #'vaticana \break
    <a c'''>2. r4 \override Staff.Custos.style = #'medicaea \break
    <a c'''>2. r4 \override Staff.Custos.style = #'hufnagel \break
    <a c'''>2. r4 \override Staff.Custos.style = #'mensural \break
    <a c'''>2. r4^\markup \transparent \draw-line #'(9 . 0) }

Ma question aux experts de musique ancienne est : les
valeurs d'Aaron vous semblent-elles bonnes du point de
vue typographique, et sinon, quelles valeurs choisiriez-vous ?
Vous pouvez les ajuster dans la définition de
custos-ledger-paddings au début du code et voir le rendu
sur l'exemple.

Merci,
Jean

---

From: [email-masked]
Date: Tue, 25 Jan 2022 22:56:46 +0100 (CET)

Voici en PJ un scan deux exemples de 1744.
Je crois que c'est assez proche :-)

----- Mail original -----
De: "Jean Abou Samra" <[email-masked]>
À: "Xavier Scheuer" <[email-masked]>, "JoëlG" <[email-masked]>
Cc: "lilypond-user-fr" <[email-masked]>
Envoyé: Mardi 25 Janvier 2022 20:45:08
Objet: Re: ligne supplémentaire de guidon

Bonjour,

\version "2.22.1"

Merci,
Jean