lilypond-user
[Top][All Lists]
Advanced

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

Re: Midline system bracket


From: Jayaratna
Subject: Re: Midline system bracket
Date: Wed, 19 Nov 2014 00:26:12 -0700 (MST)

Yes, I need help, sorry.

How would you make a bracket instead of a brace in this function of yours:

braceBar =
#(define-music-function (parser location bracExt)(number?)

      (define ((braceBarLine markup) grob)
        (ly:stencil-combine-at-edge (ly:bar-line::print grob)
          X LEFT (grob-interpret-markup grob markup) 0.4))

      (define braceMarkup
        (make-line-markup
          (list
            (make-with-dimensions-markup '(0 . 0) '(0 . 0)
              (make-translate-markup ;(cons 0 ext)
                        (cons 0 (+ 0.2 (/ braceExt -10)))
                (make-left-brace-markup (+ braceExt 20)))))))
  #{
      \once\override Score.BarLine #'hair-thickness = #'1.6
      \once \override Staff.BarLine #'stencil = #(braceBarLine braceMarkup)
      \bar "|"
      \move
      \once\override Score.RehearsalMark #'self-alignment-X = #LEFT
  #})

Thank you,
Andrea



--
View this message in context: 
http://lilypond.1069038.n5.nabble.com/Midline-system-bracket-tp168813p168816.html
Sent from the User mailing list archive at Nabble.com.



reply via email to

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