numéro de notes

[Christian LE BARS]

bonjour,

j'aimerai inscrire dans les têtes de notes leur numéro pour cela j'ai
trouvé dans la doc ceci:

\version "2.19.48"
%-----------------------------------------------------------
#(define Ez_numbers_engraver
   (make-engraver
    (acknowledgers
     ((note-head-interface engraver grob source-engraver)
      (let* ((context (ly:translator-context engraver))
         (tonic-pitch (ly:context-property context 'tonic))
         (tonic-name (ly:pitch-notename tonic-pitch))
         (grob-pitch
          (ly:event-property (event-cause grob) 'pitch))
         (grob-name (ly:pitch-notename grob-pitch))
         (delta (modulo (- grob-name tonic-name) 7))
         (note-names
          (make-vector 7 (number->string (1+ delta)))))
    (ly:grob-set-property! grob 'note-names note-names))))))
%-----------------------------------------------------
\score
{
  <<
    \new ChordNames
     { \chordmode  {d4:m7  } }
    \new Staff
     \relative c'
      { \easyHeadsOn
        <f a c e>4
      }
  >>
%------------------------------------------
 \layout
 {
   ragged-right = ##t
   \context
   {
     \Voice
     \consists \Ez_numbers_engraver
   }
 }
}

cela donne le numéro de la note dans la gamme .

Mais moi je voudrais mettre le numéro par rapport a l'accord, c'est a
dire au lieu de: 4,6,1,3(la gamme) je voudrais 3,5,7,9(l'accord)

quelqu'un a t'il la solution? par avance merci