Re: Imprimer un crochet début et un crochet fin sur un système de portées

[Pierre Perol-Schneider]

Bonjour Daniel,

Le 30 octobre 2014 17:54, Daniel Bernair <address@hidden> a écrit :

 

Je ne trouve pas comment programmer l’impression d’un crochet de début de sélection et celui de fin à travers un système. Voir un extrait d’image de début de croceht.

Je pense que le plus simple dans ce cas précis est d'utiliser un markup.

Par ex.:

\version "2.18.2"

#(define-markup-command (flip layout props myGrob)
  (markup?)
    (interpret-markup layout props
      (markup #:concat (#:null #:scale (cons -1 1) #:line (myGrob)))))

#(define-markup-command (crochet layout props myBracketHeight) (number?)
  (interpret-markup layout props
    (markup #:line (#:with-dimensions (cons -1 1) (cons 0 1)
      (#:path 0.25
        (list (list (quote moveto) 0 0)
        (list (quote lineto) -2 0)
        (list (quote lineto) -2 (* myBracketHeight -1))
        (list (quote lineto) 0 (* myBracketHeight -1))))))))

global = {
  \key b\minor
  \time 3/4
  \mark\markup\box "M"
}

\score {
  <<
    \new Voice = "Bariton" {
      \global
      \clef F
      <>-\tweak extra-offset #'(1 . 1) %=> affine le réglage de position
      ^\markup\crochet #28 %=> définit la hauteur du crochet
      r4 r c'
      <>-\tweak extra-offset #'(1 . 1)
      ^\markup\flip\crochet #28
      s
    }
    \new Lyrics \lyricsto "Bariton" {
      I
    }
    \new Lyrics \lyricsto "Bariton" {
      \markup\italic So
    }
    \new PianoStaff <<
      \new Staff {
        \global
        g''4.( a''8) fis''4-. s
      }
      \new Staff {
        \global
        \clef F
        << { r4 <c' d'> q s } \\ { g2. } >>
      }
    >>
  >>
  \layout {
    \context {
      \Score
      \omit TimeSignature
    }
  }
}

Cordialement,

Pierre