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

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

difficulté pour placer les accords


From: Christian LE BARS
Subject: difficulté pour placer les accords
Date: Thu, 7 Jan 2021 15:07:24 +0100
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:68.0) Gecko/20100101 Thunderbird/68.10.0

Bonjour a tous.

Bonne Lilyannée.

Voila j'aimerai que mes accords  s'inscrivent en dessous de la marque swing, du repère A, de  la marque triolet.

Ci dessous un extrait de mon code:

\version "2.19.60"
#(set-global-staff-size 20) %taille des portées
\include "lilyjazz.ily"
%-------------------------------------------------
\header
{
 title = \markup { \override #'(font-name . "Lilyjazz-text")\fontsize #1 \bold\italic "When Sunny Gets Blue" }  composer =\markup { \override #'(font-name . "Lilyjazz-text")\italic "Fisher / Segal" }
}
%----------------------------------------------
\paper
 {
  oddFooterMarkup = \markup {\override #'(font-name . "Lilyjazz-text")\fontsize #3 \fill-line { \fromproperty #'header:title  } }
  print-page-number = ##t
  top-margin = 5\mm
 }
%------------------------------------------
rhythmMarkStaffReduce = #-3
rhythmMarkLabelFontSize = #-2
%---------------------------------
rhythmMark = #(define-music-function (parser location label musicI musicII ) (string? ly:music? ly:music?)
   #{
      \mark \markup {
        \line \general-align #Y #DOWN {
          \combine
            \italic \fontsize #rhythmMarkLabelFontSize $label
            \transparent \italic \fontsize #rhythmMarkLabelFontSize f
          \score
          {
            \new Staff
            \with
            {
              fontSize = #rhythmMarkStaffReduce
              \override StaffSymbol.staff-space = #(magstep rhythmMarkStaffReduce)
              \override StaffSymbol.line-count = #0
              \override VerticalAxisGroup.Y-extent = #'(-0.85 . 4)
            }
            {
              \relative c' { \stemUp $musicI }
              \once \override Score.TextScript.Y-offset = #-0.4
              s4.^\markup{ \halign #-1 \italic "=" }
              \relative c' { \stemUp $musicII }
            }
 %-----------------------------------
            \layout
            {
              ragged-right= ##t
              indent = 0
              \context
              {
                \Staff
                \remove "Clef_engraver"
                \remove "Time_signature_engraver"
              }
            } % layout end
          } % Score end
        } % line end
      } % markup end
   #})
%------------------------------------
rhyMarkIIEighths =
 {
  \override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 3/16) % even
  b'8[ b8]
}
%-----------------------------------------
rhyMarkTriplets =
{
  \override Score.SpacingSpanner.common-shortest-duration = #(ly:make-moment 3/16) % even
  \tuplet 3/2 { b'4 b8 }
}
%----------------------------------------------
Global=
{
 \numericTimeSignature
 \set Score.markFormatter = #format-mark-box-alphabet
 \time 4/4
 \partial 8
 \key f\major
}
%----------------------------------------------
LesAccords =
\new ChordNames
  {
   \override ChordNames.ChordName.font-name =  "Lilyjazz-text"
  \override ChordNames . ChordName #'font-size = #2
  \set chordChanges = ##t
  \set Score.majorSevenSymbol = \markup {Maj7}
  \set chordNameSeparator = \markup { "/" }
  \set minorChordModifier = \markup{"-"}
 \chordmode
   {
    s8 g2:m7 c:sus4.7
   }
 }
%---------------------------------------------------
LaMélodie =
\relative c'
 {
  \clef treble
  \Global
  \rhythmMark #"Ballade" \rhyMarkIIEighths \rhyMarkTriplets
  c8
  \mark \markup { \box A }
  \repeat volta 2
   {
    \tuplet3/2{a'4\segno g a}c,4. c8
   }
}
%--------------------------------------
\score
{
 <<
   \LesAccords
   \new Staff \LaMélodie
 >>
\layout  {}
}

Par avance merci

Christian

Attachment: test.pdf
Description: Adobe PDF document


reply via email to

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