Voici quelques lignes qui relèvent le défi. Ton nouveau défi maintenant c'est de les comprendre ;-)
Mais je te donne volontiers plus d'explications.
chExceptionMusic = {
<c e g d'>1-\markup { \super "add9" }
}
chExceptions = #(append
(sequential-music-to-chord-exceptions chExceptionMusic #t)
ignatzekExceptions)
up = \upbow
do = \downbow
cr = \override NoteHead #'style = #'cross
no = \revert NoteHead #'style
\header {
title = "Test guitare"
}
accords = \chordmode {
\set chordNameExceptions = #chExceptions
d2:sus2 c4:9^7 g:6
d2:sus2 s8 a4.
}
staffGuitareJazz = \new RhythmicStaff {
\time 4/4
\set Score.markFormatter = #format-mark-box-letters
\mark \default c8.\do c16\do c8\do c16\do c\up c8\do c16\do c\up c8\do c16\do c16\up
c8.\do c16\up c8\do c16\do c\up \cr c\do c\up \no c8\do c\do \cr c16\do c\up
\bar "|."
}
\score {
<<
\new ChordNames \accords
\staffGuitareJazz
>>
}
}
%------------------------------------------------------------------------
A+