Re: [Denemo-devel] Vertically centred common lyrics

[Andreas Schneider]

On 10/11/19 9:39 AM, Richard Shann wrote:
> On Wed, 2019-10-09 at 22:36 +0200, Andreas Schneider wrote:
>> What is the best way to input vertically centred common lyrics (see
>> http://lilypond.org/doc/v2.18/Documentation/snippets/vocal-music#voca
>> l-music-vertically-centered-common-lyrics)
>> in Denemo? I used the Score > Lilypond Definition feature to define
>> commands dropLyrics and revertLyrics similar as in the snippet,
>>
>> dropLyrics = {
>>   \override LyricText.extra-offset = #'(0 . -1.5)
>>   \override LyricHyphen.extra-offset = #'(0 . -1.5)
>>   \override LyricExtender.extra-offset = #'(0 . -1.5)
>> }
>> revertLyrics = {
>>   \revert LyricText.extra-offset
>>   \revert LyricHyphen.extra-offset
>>   \revert LyricExtender.extra-offset
>> }
>>
>> and used those commands in the lyrics pane, but I wonder whether
>> there
>> is a better way to do that?
>
> That looks like a question that may get a better response from the lily
> address@hidden mailing list. Unless the question is about how to
> insert the syntax from that example into a Denemo score

The question was what is the best way to insert it in Denemo.

> on that I
> think you have it right - you could elaborate it into a command in the
> Lyrics menu that automatically creates the definitions at the head of
> the file and inserts the invocations (\dropLyrics etc) in the text
> (there are many examples in the Lyrics menu of inserting stuff using
>
> d-InsertTextInVerse
>
> but perhaps none that create a definition - one command that does that
> is TrillsPlus which I see uses
>
> d-LilyPondDefinition
>
> which I see takes a pair (cons "name" "definition"))

So that is something like this:

;InsertDropLyrics
(let ((tag "InsertDropLyrics"))
((d-LilyPondDefinition (cons "dropLyrics" "\\override
LyricText.extra-offset = #'(0 . -1.5)\\override LyricHyphen.extra-offset
= #'(0 . -1.5)\\override LyricExtender.extra-offset = #'(0 . -1.5)"))
(d-InsertTextInVerse "\\dropLyrics")
(d-SetSaved #f)))

If you have an even number of verses, this can be used to drop the
chorus lyrics half a verse (e.g. in the second verse if you have four
verses). If you have an odd number of verses, no such script is needed,
as you can just insert the chorus lyrics in the centre verse.

>  If you are asking on lilypond-user perhaps it would be good to ask if
> the lines
> leftbrace = \markup { \override #'(font-encoding . fetaBraces) \lookup 
> #"brace240" }
> rightbrace = \markup { \rotate #180 \leftbrace }
> in that snippet are a mistake ... they don't seem relevant.

I guess those are used to draw brackets to indicate that common text is
following, such as in this extension of the snippet from the Lilypond
documentation:

\include "english.ly"
leftbrace = \markup { \override #'(font-encoding . fetaBraces) \lookup
#"brace120" }
rightbrace = \markup { \rotate #180 \leftbrace }

dropLyrics =
{
    \override LyricText.extra-offset = #'(0 . -4)
    \override LyricHyphen.extra-offset = #'(0 . -4)
    \override LyricExtender.extra-offset = #'(0 . -4)
}

raiseLyrics =
{
    \revert LyricText.extra-offset
    \revert LyricHyphen.extra-offset
    \revert LyricExtender.extra-offset
}

skipFour = \repeat unfold 4 { \skip 8 }

lyricsA = \lyricmode { The first verse has \dropLyrics
\markup{\rightbrace the} com -- mon
__ \markup{words\leftbrace} \raiseLyrics used in all four. }
lyricsB = \lyricmode { In stan -- za two, \skipFour al -- so ap -- pear. }
lyricsC = \lyricmode { By the third verse, \skipFour are get -- ting dull. }
lyricsD = \lyricmode { Last stan -- za, and \skipFour get used once more. }

melody = \relative c' { c4 d e f g f e8( f) d4 c e d c }

\score
{
        <<
                \new Voice = m \melody
                \new Lyrics \lyricsto m \lyricsA
                \new Lyrics \lyricsto m \lyricsB
                \new Lyrics \lyricsto m \lyricsC
                \new Lyrics \lyricsto m \lyricsD
        >>
}

Unfortunately, I couldn't get rid of the extra vertical space between
first and second verse which is inserted when adding the markup for
\rightbrace. Furthermore, the definition of \leftbrace depends on the
number of verses, as that determines the size of the bracket; thus, a
Scheme script would have to check that.

Andreas