[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: positionnement horizontal de FiguredBass
From: |
Gilles THIBAULT |
Subject: |
Re: positionnement horizontal de FiguredBass |
Date: |
Fri, 25 Feb 2011 11:14:05 +0100 |
les chiffres sont alignés sur la gauche des notes. C'est flagrant avec les
rondes. J'aimerais pouvoir les centrer sur l'axe de la noteHead.
Oups, je n'aurai pas pu trouver ça moi-même, mais dans le snippet :
http://lsr.dsi.unimi.it/LSR/Item?id=637
la solution est donnée pour le TextScript. Suffit juste de changer l'
\override pour le BassFigure.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
figuredBassCenterOnNote = \override BassFigure #'X-offset =
#(lambda (grob)
(let* ((paper-col (ly:grob-parent grob X))
(elts (ly:grob-object paper-col 'elements))
(rhythmic-head grob))
(for-each
(lambda (idx)
(let ((elt (ly:grob-array-ref elts idx)))
(if (grob::has-interface elt
'rhythmic-grob-interface)
(set! rhythmic-head elt))))
(reverse (iota (ly:grob-array-length elts))))
(+
(ly:self-alignment-interface::x-aligned-on-self grob)
(interval-center
(ly:grob-robust-relative-extent rhythmic-head rhythmic-head X)))))
<<
\new Staff \relative c{\clef bass c4 c c c c2 c c1 c c c \bar "|."}
\new FiguredBass{\figuremode {
\figuredBassCenterOnNote
<5>4 <6 4> <6 5> <_+> <6 4>2 <5> <_+>1 <5> <6 4 2> <6>}}
>>
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Pas sûr que ce soit très joli ...
Gilles