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] <
ml-node+s1069038n178135...@n5.nabble.com> 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]
> <http:///user/SendEmail.jtp?type=node&node=178135&i=0>>:
>
>> 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] <http:///user/SendEmail.jtp?type=node&node=178135&i=1>
>> https://lists.gnu.org/mailman/listinfo/lilypond-user
>>
>
>
> _______________________________________________
> lilypond-user mailing list
> [hidden email] <http:///user/SendEmail.jtp?type=node&node=178135&i=2>
> 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
> <http://lilypond.1069038.n5.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=178126&code=Y29ub3IucC5jb29rQGdtYWlsLmNvbXwxNzgxMjZ8LTY3MjU4ODMyNA==>
> .
> NAML
> <http://lilypond.1069038.n5.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble%3Aemail.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble%3Aemail.naml-instant_emails%21nabble%3Aemail.naml-send_instant_email%21nabble%3Aemail.naml>
>
--
View this message in context:
http://lilypond.1069038.n5.nabble.com/Bracketing-verses-tp178126p178169.html
Sent from the User mailing list archive at Nabble.com._______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
