Le 01/12/2012 12:57, Martial a écrit :
%%<------------------------------------------------
% définition de tous les accords de 7e sans quinte
% et de tous les accords de 9e sans 3 ni 5 ni 7
chExceptionMusic = {
<c e bf>1-\markup { \super "7(-5)" }
<c d'>1-\markup { \super "9(sans3ni5ni7)" }
}
% Convert music to list and prepend to existing exceptions.
chExceptions = #( append
( sequential-music-to-chord-exceptions chExceptionMusic
#t)
ignatzekExceptions)
myCsept = \chordmode {
%met l’exception pour les accords sans quinte
% affiche 7(-5)
\set chordNameExceptions = #chExceptions
c1:3.7 e1:3.7 g1:3.7
\break
%retire l'exception affichera 7
\unset chordNameExceptions
c1:3.7 e1:3.7 g1:3.7
\break
%remet l’exception pour les accords sans quinte
\set chordNameExceptions = #chExceptions
c % accord parfait do
c:7 % accord de do 7em normal
c:3.7 % accord de do 7e sans quinte
\break
g1:3.7 % accord de 7 sans 5
g1:1.9 % accord de 9 sans 3 ni 5 ni 7
}
<<
\context ChordNames \myCsept
\context Voice \myCsept
>>
\layout {
indent = 0
ragged-right = ##t
}
Cette fois, c'est OK. Merci. Ça ne parait pas très utile pour un
guitariste, mais je joue avec un pianiste pinailleur. C'est très
bien. On apprend des choses nouvelles. Encore merci.
Jean-Pierre.

|