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

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

Re: 11 lignes équidistantes et armure à la carte


From: Bernard Meylan
Subject: Re: 11 lignes équidistantes et armure à la carte
Date: Tue, 13 Feb 2018 07:16:31 -0700 (MST)

Bonjour,

je te propose ce code que j'utilise pour la musique d'orgue de la
Renaissance. À l'origine, elle est basée sur une portée à huit lignes, mais
il est facile de l'adapter à ton cas (ce que j'ai fait). Je n'ai par contre
pas pu éviter les décalages entre les notes des voix 3 et 4... elles sont
parfaitement alignées lorsqu'il n'y pas de notes aux voix 1 et 2... je n'ai
pas pu résoudre ce problème.

\version "2.18.2"

#(set-global-staff-size 18)

\header {
  
  tagline = ##f
}

global = {
  \key f \major
}


rightOne = \relative c'' {
  \global
  g2 g a1 g4 a g f s1 s
  
}

rightTwo = \relative c' {
  \global
  c1 d e f 
}

rightThree = \relative c {
  \global 
  f1 c' f,1 g d s
  
}

rightFour = \relative c {
  \global 
  f,1 c' f,1 g d s
  
}


pianoPart = \new PianoStaff 
<<
  \new Staff = "right"
  \with {
    \override StaffSymbol.line-count = #11
    \override KeySignature.flat-positions = #'((-7 . 6))
    \override KeyCancellation.flat-positions = #'((-7 . 6))
    % presumably sharps are also printed in both octaves
    \override KeySignature.sharp-positions = #'((-6 . 7))
    \override KeyCancellation.sharp-positions = #'((-6 . 7))
    \override Clef.stencil = 
    #(lambda (grob)(grob-interpret-markup grob
                     #{ 
                       \markup\fontsize #1 {
                         \combine 
                         \translate #'(0 . 0) 
                         \musicglyph #"clefs.petrucci.g"
                         \combine
                         \translate #'(0 . -2)
                         \musicglyph #"clefs.vaticana.do"
                         \translate #'(0 . -4)
                         \musicglyph #"clefs.mensural.f"
                     } #}))
    clefPosition = #4
    middleCPosition = #0
    middleCClefPosition = #0
  }
  {
    \global
    << \rightOne \\ \rightTwo \\ \rightThree \\ \rightFour >>
  }
>>

\score {
  <<
    \pianoPart
  >>
  \layout {
    \context {
      \Score
      \override StaffSymbol #'thickness = #1.75
      \override BarLine #'hair-thickness = #2
      \override BarNumber #'break-align-symbols = #'(clef)
      \override BarNumber #'self-alignment-X = #1
      \override BarNumber #'font-name = #"Garamond Premier Pro"
      \override BarNumber #'font-size = #1
      \override BarNumber #'padding = #2
      %\override SpacingSpanner #'base-shortest-duration = #(ly:make-moment
1 1)
      %\override SpacingSpanner #'uniform-stretching = ##t
      %\override StaffGrouper.staff-staff-spacing.padding = #6
      %\override StaffGrouper.staff-staff-spacing.basic-distance = #1
    }
  }
}


En espérant que cela puisse t'aider.



-----
Cordialement

Bernard
--
Sent from: http://lilypond-french-users.1298960.n2.nabble.com/



reply via email to

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