lilypond-user
[Top][All Lists]
Advanced

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

Re: Staff bracket and figured bass


From: Klaus Blum
Subject: Re: Staff bracket and figured bass
Date: Fri, 22 Apr 2016 14:53:23 -0700 (MST)

Hi Marcin, 

here is a way to replace the standard SystemStartSquare: 

% -----------------------------------------------------

\version "2.18.2"

voiceone = \relative c' {
  c c g' g a a g2 \bar "|."
}

voicetwo = \relative c {
  \clef "bass"
  c'4 c c, c f f c2
}

space = \markup \transparent "I"

\score {
  \new StaffGroup \with {
    systemStartDelimiter =
    #'SystemStartSquare
  }{
    <<
      \new Staff \voiceone
      \new FiguredBass {
        \figuremode {
          <5 3>4 \skip4 <5 3>4 \skip4 <\space \space 3>4 \skip4 <8 5 3>2
        }
      }
      \new Staff
      \voicetwo
    >>
  }
}

\layout {
  \context {
    \StaffGroup
    \override SystemStartSquare.padding = #0.2  % adjust this value as you
like...
    \override SystemStartSquare.stencil =
    #(lambda (grob)
       (let* ((area (ly:system-start-delimiter::print grob))
              (thickness 0.3)                    ; adjust this value as you
like...
              (x-ext (ly:stencil-extent area X))
              (left  (+ (car x-ext) (- 0.9 thickness)))
              (right (cdr x-ext)))
         (make-filled-box-stencil
          (cons left right)
          (cons
           (+ (car (ly:stencil-extent area Y)) 0.05)
           (- (cdr (ly:stencil-extent area Y)) 0.05)))))
  }
}

% -----------------------------------------------------

I hope this is what you are looking for. 

Cheers, 
Klaus



--
View this message in context: 
http://lilypond.1069038.n5.nabble.com/Staff-bracket-and-figured-bass-tp189868p189880.html
Sent from the User mailing list archive at Nabble.com.



reply via email to

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