\version "2.16.0" #(define (half-bfb which-side) (lambda (grob) (let* ( (dir-h (if (negative? which-side) -1 +1)) ;; clamp to LEFT or RIGHT (layout (ly:grob-layout grob)) (line-thickness (ly:output-def-lookup layout 'line-thickness)) (thickness (ly:grob-property grob 'thickness 1)) (th (* line-thickness thickness)) (hth (/ th 2)) (tip-lo-h (car (ly:grob-property grob 'edge-height))) (tip-hi-h (cdr (ly:grob-property grob 'edge-height))) (bfb (ly:enclosing-bracket::print grob)) (bfb-x (ly:stencil-extent bfb X)) (bfb-y (ly:stencil-extent bfb Y)) (stem-v (interval-widen bfb-y (- hth))) (stems-h (interval-widen bfb-x (- hth))) (single-bracket (lambda (grob) (grob-interpret-markup grob (markup #:translate (cons ((if (negative? dir-h) car cdr) stems-h) (cdr stem-v)) #:scale (cons (- dir-h) -1) #:combine #:draw-line (cons tip-hi-h 0) #:combine #:draw-line (cons 0 (interval-length stem-v)) #:translate (cons 0 (interval-length stem-v)) #:draw-line (cons tip-lo-h 0)))))) (single-bracket grob)))) bfbJustOpen = \once \override FiguredBass.BassFigureBracket #'stencil = #(half-bfb LEFT) bfbJustClose = \once \override FiguredBass.BassFigureBracket #'stencil = #(half-bfb RIGHT) << \new Voice { \clef bass \key g \minor g1 g4 a4 bes4 ees4 } \new FiguredBass \with { implicitBassFigures = #'(0) } { \figuremode { s1 \bfbJustOpen <[6 0]>4 \bfbJustClose <[6 5]> s2 } } >>