Re: Un peu de couleur...

[Vincent Gay]

Le 13/12/2021 à 11:21, Vincent Gay a écrit :
> J'ai essayé de commencer par un silence invisible (\partial 32 s32) ce 
> qui rendrait cette fonction inutile et permettrait t'intégrer l'armure 
> initiale à l'intérieur de la première mesure mais cela me génère un 
> espace beaucoup trop grand avant la première barre de mesure. 
> J'essaierai de résoudre ça ultérieurement.
J'ai résolu le problème par
\layout {
  \context {
    \Score
    proportionalNotationDuration = #(ly:make-moment 1/10)
} }
et un \partial 256

voici le code corrigé

%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\version "2.22.1"
#(set-global-staff-size 18)
\include "jazzchords.ily"
\include "lilyjazz.ily"
\include "staffColor.ly"


\paper {
  indent = 0\mm
  ragged-last-bottom = ##t
  ragged-bottom = ##f
  ragged-last = ##f
  markup-system-spacing = #'((basic-distance . 23)
                             (minimum-distance . 8)
                             (padding . 1))
  score-system-spacing = #'((basic-distance . 23)
                            (minimum-distance . 20)
                            (padding . 5))
}

title = #"Les passantes"
composer = #"Georges Brassens"
meter = #"(Ballad)"

realBookTitle = \markup {
  \score {
    {
      \override TextScript.extra-offset = #'(0 . -4.5)
      \staffColor white
      s4
      s^\markup {
        \fill-line {
          \fontsize #1 \lower #1 \rotate #7 \concat { " " #meter }
          \fontsize #4
          \override #'(offset . 9)
          \override #'(thickness . 6)
          \underline \larger \larger #title
          \fontsize #1 \lower #1 \concat { #composer " " }
        }
      }
      s
    }
    \layout {
      \omit Staff.Clef
      \omit Staff.TimeSignature
      \omit Staff.KeySignature
      ragged-right = ##f
    }
  }
}

voltaAdLib = \markup { 1. 2. 3… \italic \text "ad lib." }
voltaOnCue = \markup \small \text "Last X"

\header {
  pdftitle = #title
  pdfauthor = #composer
  title = \realBookTitle
  tagline = ##f
}

\layout {
  \context {
    \Score
    proportionalNotationDuration = #(ly:make-moment 1/10)
    \omit BarNumber
    startRepeatType = #"[|:"
    endRepeatType = #":|]"
    doubleRepeatType = #":|][|:"
    \override Clef #'break-visibility = #'#(#f #f #f)
    \override KeySignature #'break-visibility = #'#(#f #t #t)
    \override SystemStartBar #'collapse-height = #1
  }
  \context {
    \Staff
    printPartCombineTexts = ##f
    \consists "Merge_rests_engraver"
  }
  \context {
    \ChordNames
    \override ParenthesesItem.font-size = #2
  }
  \context { \Score markFormatter = #format-mark-box-alphabet }
}

accords = \chordmode {
  \set chordChanges = ##t
  s256
  f1:7+ e:7 a:7 d:7 d:m7 g:7 c:7+ e:7
  f1:7+ e:7 a:7 d:7 a:m7 g:7 a:m7 g2:m7 c:7 a1:m
}

theNotes =  \relative c''' {
  \clef "treble" \time 4/4
  \staffColor white
  \partial 256 s256
  %\showStartBar \bar "[|:"
  \set Staff.explicitKeySignatureVisibility = ##'#(#f #t #t)
  \override Staff.KeyCancellation.break-visibility = #all-invisible

  \repeat volta 2
  {
    <<
      { \key f \major \staffColor aqua a1
        \key a \major \staffColor pink  gis
        \key d \major \staffColor orange g!
        \key g \major \staffColor yellow fis \break
        \key c \major \staffColor Chartreuse f! f e
        \key a \major \staffColor pink d \break
        \key f \major \staffColor aqua e
        \key a \major \staffColor pink d
        \key d \major \staffColor orange cis
        \key g \major \staffColor yellow c! \break
        \key c \major \staffColor Chartreuse c b c  }
      \\
      { e d cis c
        c b b gis
        a gis g! fis
        g f c
      }
    >>
  }
  \alternative {
    {
      \overrideProperty Score.VoltaBracket.text \voltaAdLib
      << { \key f \major \staffColor aqua bes' } \\ { f2 e } >> }
    {
      \overrideProperty Score.VoltaBracket.text \voltaOnCue
      << { \key c \major \staffColor Chartreuse c'1 } \\ { e,1 } >> 
\bar ".." }
  }
}



\book {
  \paper {
    #(set-paper-size "a4")
    page-count = #1
  }
  \bookpart {
    \score {
      <<
        \new ChordNames { \accords }
        \new Staff \theNotes
      >>
} } }

--
Vincent Gay
Envoyé depuis mon saxo-phone :)
https://myrealbook.vintherine.org/ - http://photos.vintherine.org/

OpenPGP_signature
Description: OpenPGP digital signature