Diagrammes d'accords à ma sauce

[address@hidden]

Bonjour à tous,

Je cherche à obtenir des diagrammes d'accords à ma sauce, comme dans le
petit exemple suivant.

\version "2.17.29"


}
\header {
  title = "Titre"
}

global = {
  \key g \major
  \time 4/4
  \tempo 4=100
}

chordNames = \chordmode {
  \global
  \powerChords
  g1 d2
}

melody = \relative c'' {
  \global
  g2^\markup {
   
    \override #'(fret-diagram-details . (
                                         (label-dir . -1)
                                         (finger-code . in-dot)
                                         (mute-string . "X")
                                         (open-string . "O")
                                         (orientation . portrait)
                                         (barre-type . none)
                                         (dot-radius . 0.5)
                                         (dot-color . white)
                                         (xo-font-magnification . 0.4)
                                         (xo-padding . 0.3))) {
                                           \fret-diagram-verbose
#'((mute 6)
                                                                   
(mute 5)
                                                                   
(mute 4)
                                                                   
(open 3 1)
                                                                   
(open 2  3)
                                                                   
(place-fret 1 3 1)
                                                                   
(barre 0 0 0 ))
    }
  } g4 b b^\markup {
   
    \override #'(fret-diagram-details . (
                                         (label-dir . -1)
                                         (finger-code . in-dot)
                                         (mute-string . "X")
                                         (open-string . "O")
                                         (orientation . portrait)
                                         (barre-type . none)
                                         (dot-radius . 0.5)
                                         (dot-color . white)
                                         (xo-font-magnification . 0.4)
                                         (xo-padding . 0.3))) {
                                           \fret-diagram-verbose
#'((mute 6)
                                                                   
(mute 5)
                                                                   
(open 4)
                                                                   
(place-fret 3 2 3)
                                                                   
(place-fret 2 3 1)
                                                                   
(place-fret 1 2 5)
                                                                    )
    }
  }
 
}

verseI = \lyricmode {
  À la
}

classicalGuitar = \relative c' {
  \global
  <g g,>2
 
}

leadSheetPart = <<
  \new ChordNames \chordNames
  \new Staff { \melody }
  \addlyrics { \verseI }
 
>>

classicalGuitarPart = \new StaffGroup \with {
  \consists "Instrument_name_engraver"
  instrumentName = "Guitare"
} <<
  \new Staff \with {
    midiInstrument = "acoustic guitar (nylon)"
  } { \clef "treble_8" \classicalGuitar }
  \new TabStaff \with {
    stringTunings = #guitar-tuning
  } \classicalGuitar
>>

\score {
  <<
    \leadSheetPart
    \classicalGuitarPart
  >>
  \layout { }
  \midi { }
}


Je voudrais n'avoir à déclarer les détails de dessin des diagrammes
qu'une fois.
J'aimerai aussi définir mes propres accords de base dans un catalogue
utilisable pour différentes partitions.
Je ne sais pas trop comment m'y prendre.

Quelqu'un aurait-il des pistes?

Merci beaucoup!

-- 
Harpo