lilypond-user-fr
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Chiffrage des accords de jazz


From: xtof pno
Subject: Re: Chiffrage des accords de jazz
Date: Fri, 12 Nov 2021 18:17:28 +0000 (UTC)

Merci Martial,
L'exemple me parle effectivement, mais je n'arrive pas à ce résultat.
Un truc qui bloque :


\version "2.18.2"
globalC = {
  \key c \major
  \numericTimeSignature
  \time 4/4 }
 
   chExceptionMusic = {
  %accord 7 b9 b13
 < g f' a b es aes > 1-\markup {
    \super "7"
    \fontsize #2 "(" \super {
    \fontsize #-1
  \translate #'(0 . 0.8)
  \column  {
    \translate #'(0 . -0.5) "b9"
    \translate #'(0 . 0.5)  "b13"
      }
    } \fontsize #2 ")"
  }
}  

 
  % Convert music to list and prepend to existing exceptions.
chExceptions = #(append
  (sequential-music-to-chord-exceptions chExceptionMusic #t)
  ignatzekExceptions)   

chordNames = \chordmode {
  \globalC
  % Ajouter ici des chiffrages.
   \set additionalPitchPrefix = "add"
  c2:maj7 13
  a:m7 11
 f4:min7.5-
aes4/b
e:min7 9  
 es4/a
  d4:min7  

   \set chordNameExceptions = #chExceptions
  g:9-.13-
     \unset chordNameExceptions
e:min7  a: 7
}

rightC = \relative c' {
  % En avant la musique !
<c e g a c>4 c' <g c d g> <g g'>
<a c e fis a>8 b' <es, aes c> b'16 a! <g, d' f a>8 g' <bes, es g> e!
<a, c f>8 g' <b,! es aes> g'16 f <g, b e>8 d' <cis, f! a! c!> e' |
}

leftC = \relative c {
  % En avant la musique !
<c, c'>4. <c c'>16 <b b'> <a a'>4 <b'' c e>
<fis e'>4 <b dis a'> <e, d'> <a cis g'>
<d, c'>4 <g f'!> <e d'> <a, g'> |
}


chordsPart = \new ChordNames \chordNames

pianoPart = \new PianoStaff \with {
  instrumentName = "Piano"
} <<
  \new Staff = "right" \with {
    midiInstrument = "acoustic grand"}  
  { << \globalC \rightC >> }
  \new Staff = "left" \with {
    midiInstrument = "acoustic grand"
  }  { \clef bass << \globalC \leftC>> }
>>

\score {
  <<
    \chordsPart
    \pianoPart
       >>
  \header {
    title = "Niveau 3"
  }
  \layout { }
  \midi {
    \tempo 4=80
  } }

Ecrire b5 ou "flat 5" sont équivalents.
Merci pour votre aide.
CJ



Le vendredi 12 novembre 2021 à 17:59:49 UTC+1, Martial R <martialr@gmail.com> a écrit :


Bonjour,

Sans exemple minimal j'ai du mal à comprendre en plus je suis un peu bourin !
est-ce que ceci vous parle :
http://lilybin.com/m6hagr/12
%%%%%%%%%%%%%%%%%
\version "2.18.2"
chExceptionMusic = {
  %mesModelesAccords
  %accord 7 add5-add9-

  <c e ges bes des'>1-\markup {
    \super "7"
    \fontsize #1 "(" \super {
      \fontsize #-1
      \column{
        \concat { \flat "5" }
        \raise #1  \concat { \flat "9" }
      }
    } \fontsize #1 ")"
  }

  <c e ges bes aes'>1-\markup {
    \super "7"
    \fontsize #1 "(" \super {
      \fontsize #-1
      \column{
        \concat { \flat "5" }
        \raise #1  \concat { \flat "13" }
      }
    } \fontsize #1 ")"
  }
}

chExceptions = #(append
                (sequential-music-to-chord-exceptions chExceptionMusic #t)
                ignatzekExceptions)

theMusic = \chordmode {
  \set chordNameExceptions = #chExceptions
  c1:7.5-.9-
  a:7.5-.9-
  c:7.5-13-
  f,:7.5-13-
}

global = {
  \key c \major
  \time 4/4
}

right = \relative c'' {
  \global
  % En avant la musique !
  ges1 ees  a' d,
}

left = \relative c' {
  \global
  % En avant la musique !
  c,1 a' c, f,
}

\score {
  <<
    \new ChordNames{
      \theMusic
    }
    \new PianoStaff \with {
      instrumentName = "Piano"
    } <<
      \new Staff = "right" \right
      \new Staff = "left" { \clef bass \left }
    >>
  >>
  \layout { }
}
%%%%%%%%%%%%%%%%%%%ù

Le ven. 12 nov. 2021 à 17:42, xtof pno <xtof01-pno@yahoo.fr> a écrit :
>
> Bonjour Martial,
> Merci beaucoup pour tes réponses.
> Cependant, je n'arrive toujours pas au résultat escompté.
> Je pense qu'il y a un problème au niveau de l'exception.
> Mes accords sont écrits pour piano, deux portées donc. Tes exemples ne le sont qu'en clef de sol.
> Je suppose que la cause est là.
> Comment écrire les notes de l'accord de l'exception, qui se trouvent sur 2 portées ?
> Merci pour vos conseils concernant cet ajustement.
> CJ
>
> Le vendredi 12 novembre 2021 à 10:40:18 UTC+1, Martial R <martialr@gmail.com> a écrit :
>
>
> Bonjour,,
>
> voici une version avec de vrais bémols  dans les accords
> http://lilybin.com/m6hagr/11
> %%%%%%%%%%%%%%%%%%%ù
>
> chExceptionMusic = {
>  %mesModelesAccords
>  %accord 7 add5-add9-
>
>  <c e ges bes des'>1-\markup {
>    \super "7"
>    \fontsize #1 "(" \super {
>      \fontsize #-1
>      \column{
>        \concat { \flat "5" }
>        \raise #1  \concat { \flat "9" }
>      }
>    } \fontsize #1 ")"
>  }
>
> <c e ges bes aes'>1-\markup {
>    \super "7"
>    \fontsize #1 "(" \super {
>      \fontsize #-1
>      \column{
>        \concat { \flat "5" }
>        \raise #1  \concat { \flat "13" }
>      }
>    } \fontsize #1 ")"
>  }
> }
>
> % Convert music to list and prepend to existing exceptions.
> %specialAccord
> chExceptions = #(append
>                (sequential-music-to-chord-exceptions chExceptionMusic #t)
>                ignatzekExceptions)
>
> theMusic = \chordmode {
>  \set chordNameExceptions = #chExceptions
>  c1:7.5-.9-
>  a:7.5-.9-
>  c:7.5-13-
>  f,:7.5-13-
>  \unset chordNameExceptions
>  e:7.5-.9-
>  c:7.5-13-
> }
>
> <<
>  \new ChordNames{
>    \theMusic
>  }
>  \new Voice \theMusic
> >>
> %%%%%%%%%%%%%%%%%%%%%%%
>
> Le sam. 23 oct. 2021 à 22:34, xtof pno <xtof01-pno@yahoo.fr> a écrit :
> >
> > Bonjour,
> > Je souhaiterais noter des accords comme pièce jointe "modèle".
> > Que les extensions de l'accord se superposent dans une parenthèse.
> >
> > Mais j'obtiens pièce jointe "résultat" (avec g:9-.13-). Ce n'est pas très lisible et cela prend beaucoup de place.
> > Comment ajuster la commande ?
> >
> > 2° : comment supprimer l'ajout "add" : \set additionalPitchPrefix = "add"
> > pour qu'il n'apparaisse qu'à la demande et non pas systématiquement ?
> >
> > Merci pour vos conseils.
> > Cordialement.
> > Christophe Julien.
>
>
>
>
> --
> Martial Rameaux
>


--
Martial Rameaux

reply via email to

[Prev in Thread] Current Thread [Next in Thread]