Re: Bracketing verses

Nice work, Pierre! That's a fantastic way to differentiate verses.

- Abraham

On Wed, Jun 24, 2015 at 2:33 PM, RomanticStrings [via Lilypond] <[hidden email]> wrote:

Dear all,

Thank you! That works beautifully! I don't quite understand everything that just happened, but it looks great!

~Conor

On Wed, Jun 24, 2015 at 12:48 AM, Schneidy [via Lilypond] <[hidden email]> wrote:

Hi,

Using Harm's link and Simon markup:

\version "2.18.2"

% After: http://lsr.dsi.unimi.it/LSR/Item?id=641
%% http://lilypond.1069038.n5.nabble.com/Different-markups-for-odd-and-even-lyrics-lines-stanzas-td58072.html

#(define (lyricswitch context)
(let ((cnt 0))
    (make-engraver
     (listeners
      ((AnnounceNewContext translator ev)
       (if (eq? (ly:context-name (ly:event-property ev 'context)) 'Lyrics)
           (begin
             (set! cnt (1+ cnt))
             (if (even? cnt)
              (ly:context-mod-apply! (ly:event-property ev 'context)
               #{
                 \with {
                \override StanzaNumber.font-series = #'medium
                \override LyricText.font-shape = #'italic
                \override LyricText.color = #(x11-color 'grey20)
                \override VerticalAxisGroup.nonstaff-nonstaff-spacing =
                       #'((basic-distance . 0)
                          (minimum-distance . 5) ;; <================ more lower space
                          (padding . 0.2)
                          (stretchability . 0))
                 }
              #})))))))))

%% Implement an alternate lyric context
myLayout =
\layout {
        \context {
        \Lyrics
        \override LyricText.font-size = #-1
        }
        \context {
        \Score
                \consists #lyricswitch
        }

        \context {
        \StaffGroup
                \consists #lyricswitch
        }

        \context {
        \ChoirStaff
                \consists #lyricswitch
        }

}

%%%%%%%%%%%% test %%%%%%%%%%%%%%%%%%%

mus = \relative c' \repeat unfold 3 { c4 c c c\break }

lyrOne = {
        \set stanza = \markup {
          \translate #'(0 . -.7)
          \with-dimensions #'(0 . 0) #'(0 . 0)
          \left-brace #22
          1.
        }
        \lyricmode {
        \repeat unfold 2 { bla -- bla -- bla -- bla -- }
        bla -- bla -- bla -- bla
        }
}

lyrTwo = {
        \set stanza = "1."
        \lyricmode {
        \repeat unfold 2 { blub -- blub -- blub -- blub -- }
        blub -- blub -- blub -- blub
        }
}

lyrThree = {
        \set stanza = \markup {
          \translate #'(0 . -.7)
          \with-dimensions #'(0 . 0) #'(0 . 0)
          \left-brace #22
          2.
        }
        \lyricmode {
        \repeat unfold 2 { foo -- foo -- foo -- foo -- }
        foo -- foo -- foo -- foo
        }
}

lyrFour = {
        \set stanza = "2."
        \lyricmode {
        \repeat unfold 2 { bla -- bla -- bla -- bla -- }
        bla -- bla -- bla -- bla
        }
}

lyrFive = {
        \set stanza = \markup {

          \translate #'(0 . -.7)
          \with-dimensions #'(0 . 0) #'(0 . 0)
          \left-brace #22
          3.
        }
        \lyricmode {
        \repeat unfold 2 { blub -- blub -- blub -- blub -- }
        blub -- blub -- blub -- blub
        }
}

lyrSix = {
        \set stanza = "3."
        \lyricmode {
        \repeat unfold 2 { foo -- foo -- foo -- foo -- }
        foo -- foo -- foo -- foo
        }
}

\score {
        <<
          \new Staff <<
            \new Voice = "mus" \mus
            \new Lyrics \lyricsto "mus" \lyrOne
            \new Lyrics \lyricsto "mus" \lyrTwo
            \new Lyrics \lyricsto "mus" \lyrThree
            \new Lyrics \lyricsto "mus" \lyrFour
            \new Lyrics \lyricsto "mus" \lyrFive
            \new Lyrics \lyricsto "mus" \lyrSix
          >>
          \new PianoStaff <<
            \new Staff { \repeat unfold 12 c' }
            \new Staff { \clef F \repeat unfold 12 c }
          >>
        >>
        \layout { \myLayout }
}

Cheers,
Pierre

2015-06-23 23:39 GMT+02:00 RomanticStrings <[hidden email]>:
Thank you, Simon. It does indeed create a bracket to the left of the verse.
It creates a space below the top verse, however, as well. Is there any way
to prevent that?

--
View this message in context: http://lilypond.1069038.n5.nabble.com/Bracketing-verses-tp178126p178131.html

Sent from the User mailing list archive at Nabble.com.

_______________________________________________
lilypond-user mailing list
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user

_______________________________________________
lilypond-user mailing list
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user

~Pierre

If you reply to this email, your message will be added to the discussion below:
http://lilypond.1069038.n5.nabble.com/Bracketing-verses-tp178126p178135.html

To unsubscribe from Bracketing verses, click here.
NAML

If you reply to this email, your message will be added to the discussion below:
http://lilypond.1069038.n5.nabble.com/Bracketing-verses-tp178126p178169.html

To start a new topic under User, email [hidden email]
To unsubscribe from Lilypond, click here.
NAML

From:	tisimst
Subject:	Re: Bracketing verses
Date:	Wed, 24 Jun 2015 14:25:39 -0700 (MST)