User:Andy02124/sandbox/lilypond

Lilypond experiment

1923: The song 'Yes, We Have No Bananas' is published, and promptly faces a law suit from the American publishers of Handel's Messiah for allegedly taking the theme from the Hallelujah chorus. (March 23) https://www.independent.co.uk/arts-entertainment/happy-anniversary-hallelujah-we-have-no-bananas-1430601.html

https://archive.org/details/variety71-1923-06/page/n49/mode/1up article about Yes sales

Hallelujah, Bananas![edit]

A. Yes! We Have No Bananas by Frank Silver and Irving Cohn, 1923. Public domain.
B. Alternate lyrics cobbled together by Sigmund Spaeth very soon thereafter.

$\layout { \context Lyrics { \override LyricText.font-size = -1 \override LyricHyphen.minimum-distance = #1.0 % \override VerticalAxisGroup.staff-affinity = ##f % \override VerticalAxisGroup.staff-staff-spacing = % #'((basic-distance . 0) % (minimum-distance . 2) % (padding . 2)) } } \new Staff << \new Voice = orig \relative c'' { \key c \major \time 2/2 \tempo 2 = 120 \set Staff.midiInstrument = "marimba" %"choir aahs" \set Score.tempoHideNote = ##t \language "english" c4 r r g | a4 g r f | e4 g2. ~ | g4 r r gs | a4 d r c | b4 a r b | c1 ~ | c4 r r g | a4 d r c | \phrasingSlurDotted af_$ d$ r c | g4_$ d'$ r c | g4_$ d'$ r c | fs,4 g r a | b2 b | b1 ~ | b4 << % split into two voices to handle differing scansion { \voiceOne % stems automatically up e,4 f \once \override NoteColumn.force-hshift = #-0.5 fs | g1 | a4 a2 g4 | g c2. ~ | c1 | c | d4 d2 c4 % we have an... } \new Voice = spaeth \relative c' { \voiceTwo % stems down \set Score.midiMaximumVolume = #0 % these aren't chords \tiny r4 e \once \override NoteColumn.force-hshift = #1 f | g2. a4 | a g2. % I was... \phrasingSlurDotted $g4 c2.$( | c2) c4 c \once \override NoteColumn.force-hshift = #-0.5 c1 | d2. c4 } \new Lyrics \with { \override LyricText.extra-offset = #'(0 . 2.8) \override LyricHyphen.extra-offset = #'(0 . 2.8) \override LyricExtender.extra-offset = #'(0 . 2.8) } \lyricsto spaeth { I was see -- ing Nel -- lie home, __ _ to an old fash -- ioned } >> % end split \oneVoice c4 a2. ~ | a2 g | c4 r r g | a g r f | e g2. ~ | g4 r r gs | a4 d r c | b4 a r b | c1 ~ | c4 r4 r2 \bar "|." } % end orig Voice \addlyrics { \set stanza = "A. " Yes! We have no ba -- na -- nas. __ We have no ba -- na -- nas to -- day. __ We've string beans and HON -- ions, cah -- BAH -- ges, and scal -- lions, and all kinds of fruit and say, __ we have an old -- fash -- ioned to -- MAH -- to, __ Long Is -- land po -- TAH -- to, __ but yes, we have no ba -- na -- nas, __ we have no ba -- na -- nas to -- day! __ } \addlyrics { \set stanza = "B. " %\set LyricExtender.extendersOverRests = ##f Ha -- le -- lu -- jah, Ba -- na -- nas! __ Oh, bring back my Bon -- nie to me. __ I dreamt that I dwelt __ _ in mar -- __ _ ble halls, __ _ the kind that you sel -- dom see. _ \repeat unfold 12 { \skip 1 } % skip over voiceTwo lyrics 12 gar -- den; __ but, Ha -- le -- lu -- jah, Ba -- na -- nas! __ Oh, bring back my Bon -- nie to me! __ } >>$

%=====================================================

With da capo

$\layout { line-width = #70 \context Lyrics { \override LyricHyphen.minimum-distance = #1.0 } } \new Staff << %this doesn't seem to have any effect \new Voice { \once \override Score.NonMusicalPaperColumn.line-break-system-details = #'((Y-offset . 0)) s1*4 \break \once \override Score.NonMusicalPaperColumn.line-break-system-details = #'((Y-offset . 140)) s1*3 \break s1*3 \break s1*2 \break s1*3 \break \once \override Score.NonMusicalPaperColumn.line-break-system-details = #'((Y-offset . 120)) s1*3 \break \once \override Score.NonMusicalPaperColumn.line-break-system-details = #'((Y-offset . 130)) s1*3 \break s1*4 \break } \new Voice = orig \relative c'' { \set Staff.midiInstrument = "marimba" %"choir aahs" \set Score.tempoHideNote = ##t \set Score.BarNumber = ##f \magnifyStaff #5/7 \tempo 2 = 120 \key c \major \time 2/2 \language "english" \repeat segno 2 { c4 r r g | a4 g r f | e4 g2. ~ | g4 r r gs | \break a4 d r c | b4 a r b | c1 ~ | } \alternative { { c4 r r g \bar "||" } { \once \override NoteHead.extra-spacing-width = #'(-2 . 2) c4 -\tweak control-points #'((-1.5 . 1) (-1 . 1) (0 . 2) (1 . 0)) ( <> ) r r2 \mark \markup \tiny "Fine" \bar "|." } } a4 d r c | \phrasingSlurDotted af$ d$ r c | g4$ d'$ r c | g4$ d'$ r c | fs,4 g r a | b2 b |b1 ~ | b4 << % split into two voices to handle differing scansion { \voiceOne % stems up e,4 f fs | g1 | a4 a2 g4 | g c2. ~ | c1 | c | d4 d2 c4 % we have an... } \new Voice = spaeth \relative c' { \voiceTwo % stems down \set Score.midiMaximumVolume = #0 % these aren't chords \teeny r4 e \once \override NoteColumn.force-hshift = #1 f | g2. a4 | a g2. % I was... \phrasingSlurDotted $g4 c2.$( | c2) c4 c \once \override NoteColumn.force-hshift = #-0.5 c1 | d2. c4 } \new Lyrics \with { % \override LyricText.extra-offset = #'(0 . 2.8) % \override LyricHyphen.extra-offset = #'(0 . 2.8) % \override LyricExtender.extra-offset = #'(0 . 2.8) %\override StanzaNumber.extra-offset = #'(0 . 2.8) } \lyricsto spaeth { \set fontSize = #-2 \override LyricText.extra-offset = #'(0 . 2.8) \override LyricHyphen.extra-offset = #'(0 . 2.8) I was see -- ing \override LyricText.extra-offset = #'(0 . 0) \override LyricHyphen.extra-offset = #'(0 . 0.2) Nel -- lie home, __ _ to an \override LyricText.extra-offset = #'(0 . 2.8) \override LyricHyphen.extra-offset = #'(0 . 3) old fash -- ioned } >> % end split \oneVoice c4 a2. ~ | a2 \mark \markup \tiny "D.C. al Fine" g \bar "||" } % end orig Voice \addlyrics { \set stanza = "A. " \set fontSize = #-2 Yes! We have no ba -- na -- nas. __ We have no ba -- na -- nas to -- day. __ We've \skip 1 string beans and HON -- ions, cah -- BAH -- ges, and scal -- lions, and all kinds of fruit and say, __ we have an old -- fash -- ioned to -- MAH -- to, __ Long Is -- land po -- TAH -- to, __ but } \addlyrics { \set stanza = "B. " \set fontSize = #-2 Ha -- le -- lu -- jah, Ba -- na -- nas! __ Oh, bring back my Bon -- nie to me. __ I \skip 1 dreamt that I dwelt __ _ in mar -- __ _ ble halls, __ _ the kind that you sel -- dom see \repeat unfold 11 { \skip 1 } % skip over voiceTwo lyrics gar -- den; __ but, } >>$

%===========================================