Re: Orchestral group

[Kieren MacMillan]

Hi Pierre (et al.),

> This is a wonderfull course !
> As a guitarist I barely use those codes ; thanks for showing me such a clear 
> "lily-like" solution.
> One thing though : I find the orchestral brace absolutely uggly (for that 
> size I mean), reason why I didn't mention it in my code.
> I think that a LargeCurlyBracket, shuch as Mario's pic, for orchestral 
> grouping, is laking in the lily fonts and would be much more elegant.

Why not just adjust the thickness or shape of the brace itself?
The snippet below scales the thickness, but you could adjust whatever you 
wanted (including drawing a whole new curve yourself in the stencil).

Hope this helps!
Kieren.
____________________

\version "2.17.13"

someMusic = \relative c' { c1 }

\paper { indent = 2\in }

\layout {
  \context {
    \Staff
    \override InstrumentName.padding = #-10.5
    \override InstrumentName.self-alignment-X = #0
    \override InstrumentName.baseline-skip = #2.25
    \override InstrumentName.font-size = #-0.5
  }
  \context {
    \StaffGroup
    \name ViolinGroup
    \alias StaffGroup
    systemStartDelimiter = #'SystemStartBrace
    \override SystemStartBrace.extra-offset = #'(13.25 . 0)
  }
  \context {
    \StaffGroup
    \name WindGroup
    \alias StaffGroup
    systemStartDelimiter = #'SystemStartBracket
    \override SystemStartBracket.collapse-height = #1
    \override SystemStartBracket.extra-offset = #'(15.5 . 0)
  }
  \context {
    \StaffGroup
    \name StringGroup
    \alias StaffGroup
    \accepts ViolinGroup
    systemStartDelimiter = #'SystemStartBracket
    \override SystemStartBracket.extra-offset = #'(15.5 . 0)
    \override SystemStartBrace #'stencil = #(lambda (grob)
      (let ((brace (ly:system-start-delimiter::print grob)))
        (if (ly:stencil? brace)
            (ly:stencil-scale brace 1 1))))
  }
  \context {
    \StaffGroup
    \name OrchestraGroup
    \accepts WindGroup
    \accepts StringGroup
    systemStartDelimiter = #'SystemStartBrace
    \override SystemStartBrace #'X-offset = #-14
    instrumentName = \markup \rotate #90 { "Orchestra I" }
    \override InstrumentName.extra-offset = #'(13 . 0)
    \override SystemStartBrace #'stencil = #(lambda (grob)
      (let ((brace (ly:system-start-delimiter::print grob)))
        (if (ly:stencil? brace)
            (ly:stencil-scale brace 0.5 1))))
  }
  \context {
    \GrandStaff
    \remove "System_start_delimiter_engraver"
    \accepts OrchestraGroup
    \accepts StaffGroup
  }
}

\score {
  \new GrandStaff <<
    \new OrchestraGroup <<
      \new WindGroup <<
        \new Staff \with { instrumentName = "Oboe" } \someMusic
      >>
      \new StringGroup <<
        \new ViolinGroup <<
          \new Staff \with { instrumentName = "Violino I" } \someMusic
          \new Staff \with { instrumentName = "Violino II" } \someMusic
        >>
        \new Staff \with { instrumentName = "Viola" } \someMusic
      >>
    >>
    \new StaffGroup \with { \override SystemStartBracket.extra-offset = #'(0.25 
. 0) } <<
      \new Staff \with { instrumentName = "Soprano" \override 
InstrumentName.padding = #-24 } \someMusic
      \new Staff \someMusic
    >>
  >>
}