Many thanks for this. I need to experiment a little to see if I can fit the
brackets into a rather congested setting.
With best wishes, MT

On Thu, 9 Apr 2020 at 12:49, Pierre Perol-Schneider <
[email protected]> wrote:

> Hi Michael,
> That may work, e.g.:
>
> \version "2.20.0"
>
> #(define-markup-command (lcb layout props arg)
>    (number?)
>   "Draw a curly bracket with a variable length."
>      (interpret-markup layout props
>        (markup
>          (#:override (cons (quote filled) #t)
>           (#:path 0 `(
>            (moveto   -0.8   0.0)
>            (curveto  -0.2   0.4  -0.3  0.7 -0.3  1.5)
>            (lineto   -0.3   ,arg)
>            (curveto  -0.4   ,(+ arg 1.3) 0.5 ,(+ arg 2.8) 0.7 ,(+ arg 2.8))
>            (curveto   0.6   ,(+ arg 2.5) 0.1 ,(+ arg 2)   0.1 ,arg)
>            (lineto    0.1   1.5)
>            (curveto   0.1   0.7   0.1   0.0  -0.8   0.0)
>            (closepath)
>            (curveto  -0.2  -0.4  -0.3  -0.7  -0.3  -1.5)
>            (lineto   -0.3   ,(* arg -1))
>            (curveto  -0.4   ,(* (+ arg 1.3) -1) 0.5 ,(* (+ arg 2.8) -1)
> 0.7 ,(* (+ arg 2.8) -1))
>            (curveto   0.6   ,(* (+ arg 2.5) -1) 0.1 ,(* (+ arg 2) -1)
> 0.1 ,(* arg -1))
>            (lineto    0.1  -1.5)
>            (curveto   0.1  -0.7   0.1   0.0  -0.8   0.0)
>            (closepath)))))))
>
>
> \relative c'' {
>   c4 _\markup {
>     \with-dimensions-from \null
>       \left-align {
>         \override #'(baseline-skip . 0)
>         \center-column {
>           "a" \vspace #-.1
>           \rotate #90 \lcb #3
>           \vspace #.1 "b"
>         }
>       }
>     } d e
>   -\tweak extra-offset #'(0 . -5)
>    _\markup {
>     \with-dimensions-from \null
>       \left-align {
>         \override #'(baseline-skip . 0)
>         \center-column {
>           "a" \vspace #-.1
>           \rotate #90 \lcb #5
>           \vspace #.1 "b"
>         }
>       }
>     }d c
>   b
>   -\tweak extra-offset #'(.5 . 3)
>   ^\markup {
>     \with-dimensions-from \null
>       \left-align {
>         \override #'(baseline-skip . 0)
>         \center-column {
>           "a" \vspace #.1
>           \rotate #-90 \lcb #6
>           \vspace #-.1 "b"
>         }
>       }
>     } a g f e d c
> }
>
> HTH,
> Cheers,
> Pierre
>
> Le jeu. 9 avr. 2020 à 17:27, Michael Taylor <[email protected]> a
> écrit :
>
>> Dear David,
>> Many thanks for this. I was curious about the curly analysis brackets
>> when I saw this in Snippets http://lsr.di.unimi.it/LSR/Search?q=curly but
>> couldn't figure out how (or if) these
>> shapes could be used for what I wanted. The only application I could find
>> was to group an
>> ensemble within a larger instrumental contingent.
>> With best wishes
>> Michael
>>
>> On Tue, 7 Apr 2020 at 23:00, David Nalesnik <[email protected]>
>> wrote:
>>
>>> On Tue, Apr 7, 2020 at 11:07 AM Michael Taylor
>>> <[email protected]> wrote:
>>> > Would it be possible in a future version to have the option of placing
>>> text within analysis brackets as well as the default above? MT
>>>
>>> HorizontalBracketText.direction with a little more tweaking than
>>> should be necessary.
>>>
>>> \layout {
>>>   \context {
>>>     \Voice
>>>     \consists "Horizontal_bracket_engraver"
>>>     \override HorizontalBracket.direction = #UP
>>>   }
>>> }
>>>
>>> {
>>>   \once\override HorizontalBracketText.direction = #DOWN
>>>   \once\override HorizontalBracketText.text = "a"
>>>   \once\override HorizontalBracketText.padding = #-0.5
>>>   \once\override HorizontalBracket.padding = 1
>>>   c''\startGroup d''\stopGroup
>>> }
>>>
>>

Reply via email to