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

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

inscription swing


From: Christian LE BARS
Subject: inscription swing
Date: Tue, 22 Jan 2019 10:06:24 +0100
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:60.0) Gecko/20100101 Thunderbird/60.4.0

Bonjour à tous.

Voila pour indiquer le swing je me sers d’une fonction que j'ai trouvé certainement sur le forum.

qui fonctionne correctement pour moi, lorsque lorsque j'ai une portée voix en plus des autres portées

ci dessous l'exemple:

\version "2.19.82"
#(set-global-staff-size 18) %taille des portées
%----------------------------------------------
\paper
 {
  oddFooterMarkup = \markup {\override #'(font-name . "LilyJAZZText")\fontsize #3 \fill-line { \fromproperty #'header:title  } }
  print-page-number = ##t 
    #(define fonts
     (set-global-fonts
      #:music "lilyjazz"
      #:brace "lilyjazz"
      #:roman "lilyjazz-text"
      #:sans "lilyjazz-chord"
      #:factor (/ staff-height pt 20)
      ))
 }
%--------- fonction swing ------------------------------------
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\override #'(font-name . "musejazz")
            \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 }
}
%------------------ fin fonction swing ----------------------------
Global=
{
 \numericTimeSignature
 \set Score.markFormatter = #format-mark-box-alphabet
 \time 4/4
 \key ees\major
 \set Score.barNumberVisibility = #all-bar-numbers-visible
}
%----------------------------------------------
LesAccords =
\chords
 {
  \override ChordNames.ChordName.font-name = "musejazz"
  \override ChordNames . ChordName.font-size = #1
  \set chordChanges = ##t
  \set Score.majorSevenSymbol = \markup {Maj7}
  \set chordNameSeparator = \markup { "/" }
  \set minorChordModifier = \markup{"-"}
   ees1/bes bes2:7sus bes:7-9  
 }
 %---------------------------------
LaVoix =
\relative c''
 {
  \Global  
   s1 s2 bes4 g
 }  
%-----------------------------------------------
LaMainGauche =
 \relative c
  {
   \clef "bass"
    \Global
    <bes f' g>1<bes aes'>2<bes aes'>
  }
%--------------------------------------------
LaMainDroite =
\relative c'
  {
   \clef "treble"
   \Global
   <<
     {
      \voiceOne
        s1 s2 bes'4 g      
     }
     \new Voice
      {
       \voiceTwo             
         { g8 bes, b d c ees g d'  <c, ees g bes>2 <ces d> } 
      } 
   >>   
  }
%-------------------------------------------
LePiano =
\new PianoStaff
 \with
    { instrumentName = \markup{\override #'(font-name . "musejazz") "Piano"}
      shortInstrumentName = \markup{\override #'(font-name . "musejazz") "Pia. "}
    } 
   <<     
      \new Staff \LaMainDroite
      \new Staff \LaMainGauche
    >>
 %------------------------------------------------
 \score
  {
   { %--------- Appel fonction swing -------------------

    \override Score.RehearsalMark.self-alignment-X = #LEFT
    \once \override Score.RehearsalMark.X-offset = #5
    \rhythmMark #"Swing"
    \rhyMarkIIEighths \rhyMarkTriplets

    <<    
      \context Voice = voix \LaVoix
       \LesAccords     
      \LePiano     
    >>
  } 
  \layout   {}
 }

Par contre si je veux enlever le context Voice  Lilypond écrit quand même le début d'une porté vide,

que j'aimerai supprimer , mais comment faire?

Par avance merci

PS: j'aimerai bien me servir de lilybin mais je ne sais ou trouver Lilybin et comment on s'en sert


reply via email to

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