[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: personnalisation des accords.
From: |
budilyss |
Subject: |
Re: personnalisation des accords. |
Date: |
Sun, 18 Sep 2016 12:02:08 -0700 (MST) |
oui bien sûr , voici , en rouge mon problème : je voudrais obtenir "blabla"
et non "Ablabla" , c'est à dire enlever la note de base de l'accord.
=================DEBUT CODE==========================
\version "2.18.2"
% on redefinit les accords
chExceptionMusic = {
<c e g>1-\markup {"blabla"}
<c e gis>1-\markup {\raise #-1 \super{\fontsize #-2 {\raise #0.5 \sharp 5}}}
<c e ges>1-\markup {\raise #-1 \super{\fontsize #-2 {\raise #0.5 \flat 5}}}
<c e g d'>1-\markup {9} %pb
}
chExceptions = #( append
( sequential-music-to-chord-exceptions chExceptionMusic #t)
ignatzekExceptions)
\score {
\new StaffGroup <<
\override StaffGroup.SystemStartBracket.transparent = ##t
% on imprime les accords
\new ChordNames {
\set chordNameExceptions = #chExceptions
\override ChordName.color = #(x11-color "DarkRed")
\transpose c a <c e g>4
\override ChordName.color = #(x11-color "Black")
\transpose c c <c e ges>4
\transpose c e <c e gis>4
\transpose c des <c e g d'>4
}
% et la les notes
\new Staff \relative c' {
\override Staff.TimeSignature
#'stencil = ##f
\override Stem #'transparent
= ##t
\clef "treble"
\override NoteHead.color = #(x11-color
"DarkRed")
\transpose c a'<c e g>4
\override NoteHead.color = #(x11-color
"Black")
\transpose c c' <c e ges>
\transpose c e' <c e gis>
\transpose c des' <c e g d'>
}
>>
}
=================FIN CODE==========================
--
View this message in context:
http://lilypond-french-users.1298960.n2.nabble.com/personnalisation-des-accords-tp7584175p7584182.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.