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

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

Re: Barre de reprise avec deux traits en haut et en bas


From: NOreply
Subject: Re: Barre de reprise avec deux traits en haut et en bas
Date: Tue, 6 Feb 2018 01:27:11 -0700 (MST)

Bonjour,
Je te propose autre chose qui est mieux car on peut régler la position
verticale des doubles slash.
http://lilybin.com/jbipm5/1

%%%%%% le code

%{
>>>>>>  UTILISATION:
\doubleslash #"["  #n1 #n2
n1 = position verticale des 2 doubles slash
n2 = pécartement entre les 2 doubles slash
%}

doubleslash = 
#(define-music-function 
  (parser location repeat-bar-type  repeat-bar-translate ecartement )
  (string? number?  number?)
  (cond
   ((string=? repeat-bar-type "]")  
    #{
      \once \override Staff.BarLine.stencil =
      #(lambda (grob)
         (ly:stencil-combine-at-edge
          (ly:bar-line::print grob)
          X LEFT
          (grob-interpret-markup grob 
            #{ 
              \markup
              \translate #(cons 0 repeat-bar-translate) 
              \center-column   {                       
                \scale #' (-1 . 1) {                         
                  \center-align
                  \vcenter \combine
                  \beam #2.0 #0.5 #0.48
                  \raise #0.7 \beam #2.0 #0.5 #0.48
                } 
                \vspace #ecartement
                {                         
                  \center-align
                  \vcenter \combine
                  \beam #2.0 #0.5 #0.48
                  \raise #0.7 \beam #2.0 #0.5 #0.48
                } 


              }
              
            #})))
    #})
   ((string=? repeat-bar-type "[")  
    #{
      
      \once \override Staff.BarLine.stencil =
      #(lambda (grob)
         (ly:stencil-combine-at-edge
          (ly:bar-line::print grob)
          X RIGHT
          (grob-interpret-markup grob 
            #{ 
              \markup
              \translate #(cons 0 repeat-bar-translate) 
              \center-column   {  {                         
                \center-align
                \vcenter \combine
                \beam #2.0 #0.5 #0.48
                \raise #0.7 \beam #2.0 #0.5 #0.48
                                  } 
                                  \vspace #ecartement
                                  \scale #' (-1 . 1) {                         
                                    \center-align
                                    \vcenter \combine
                                    \beam #2.0 #0.5 #0.48
                                    \raise #0.7 \beam #2.0 #0.5 #0.48
                                  } 
              } 
            #})))
    #})
   (else 
    #{
      \once \override Staff.BarLine.stencil = #ly:bar-line::print
    #})))

{ c'1 \doubleslash #"["  #3.6 #1.5
   c' \doubleslash #"]"  #3.6 #1.5
   c'}




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



reply via email to

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