% % Love At Home % \version "2.10.33" \include "english.ly" #(set-global-staff-size 20) \header { title = "Love At Home" subtitle = "SATB choir and piano" subsubtitle = "Version 1.0 - May 10, 2008" copyright = \markup { "http://dt.prohosting.com/sheetmusic" } composer = "John Hugh McNaughton" arranger = \markup { \tiny "(arr: David B. Thomas)" } } \layout { \context { \RemoveEmptyStaffContext } % The rest of this layout block is devoted to providing the % "centered piano dynamics" feature. \context { \type "Engraver_group" \name Dynamics \alias Voice % So that \cresc works, for example. \consists "Output_property_engraver" \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1) \consists "Script_engraver" \consists "Dynamic_engraver" \consists "Text_engraver" \override TextScript #'font-size = #2 \override TextScript #'font-shape = #'italic \override DynamicText #'extra-offset = #'(1 . 1.5) \override Hairpin #'extra-offset = #'(0 . 2.5) \consists "Skip_event_swallow_translator" \consists "Axis_group_engraver" } \context { \PianoStaff \accepts Dynamics \override VerticalAlignment #'forced-distance = #7 } } % SEGMENT A: piano intro snA = \relative c' { \key ef \major \override Staff.TimeSignature #'style = #'() \time 4/4 s1 * 4 } anA = \relative c' { \key ef \major \override Staff.TimeSignature #'style = #'() \time 4/4 s1 * 4 } tnA = \relative c { \key ef \major \override Staff.TimeSignature #'style = #'() \time 4/4 s1 * 4 } bnA = \relative c { \key ef \major \override Staff.TimeSignature #'style = #'() \time 4/4 s1 * 4 } btA = \lyricmode { } rhA = \relative c'' { \key ef \major \override Staff.TimeSignature #'style = #'() \time 4/4 bf4\( g' g8 bf, 4\) | 4\( c4\) 4\( d?8 c\) | 2\( g4 ef4\) | 2\( d'2\) \break } lhA = \relative c' { \key ef \major \override Staff.TimeSignature #'style = #'() \time 4/4 \clef treble ef8\( g bf2.\) | af,8\( ef' af4\) f,8\( c'\) r4 \clef bass | bf1 | bf,1 } dynA = { s1\mp | s1 | s1\> | s1\p } % SEGMENT B: verse 1 snB = \relative c' { \oneVoice bf4\mp^\markup { \italic \bold \tiny "SA or solo" } g' g f | ef c ef2 | bf4. c8 bf4 g' | f2. r4 | g4. af8 bf4 g | ef c ef2 | bf4 g' f4. g8 | ef1 \break | d4^\markup { \italic \bold \tiny "all" }\mf f f f | ef4. f8 g2 | \voiceOne c,4^\markup { \italic \bold \tiny "div." } ef ef ef | \once \override Hairpin #'extra-offset = #'(0 . -2) d4.\> ef8 f2 | % code melody here, even though the altos sing it \voiceTwo g4.^\markup { \italic \bold \tiny "S: ooh... (A: optional solo)" }\mp af8 bf4 g | ef c ef2 | \oneVoice bf4^\markup { \italic \bold \tiny "all" } bf' af4. d,8 | ef1 \bar "||" \break } anB = \relative c' { s1 * 10 | \voiceTwo c4 c c af | bf4. c8 d( ef f4) | % code harmony here, even though the sopranos sing it \voiceOne bf1\glissando | ef,2. r4 | \voiceTwo s1 * 2 | \bar "||" } tnB = \relative c { \oneVoice R1 | R1 | R1 | R1 | R1 | R1 | R1 | R1 | \voiceOne f4 af af af | g4. af8 bf2 | bf4 af g f | f4. f8 bf2 | bf2.\( df4 | c1\) | bf2.\( af4 | g1\) \bar "||" } bnB = \relative c { s1 * 8 | \voiceTwo bf4 bf bf bf | bf4. bf8 ef2 | af,4 af8( c) f4 f4 | bf,4. bf8 bf2 | ef1\(_\markup { \italic \bold \tiny "TB: ooh..." } | ef1\) | ef2\( bf2 | ef1\) \bar "||" } btB = \lyricmode { There is beau -- ty all a -- round When there's love at home; There is joy in ev -- 'ry sound When there's love at home. Peace and plen -- ty here a -- bide, Smil -- ing sweet on ev -- 'ry side. Time doth soft -- ly, sweet -- ly glide When there's love at home. } rhB = \relative c' { 1 | | | 2\( d8 ef8 f4\) | 2\( r8 df8 bf'4\) | << { bf2.( af4) } \\ { ef1 } >> | 2 << { 2 } \\ { bf4( af4) } >> | 1 | 2.\( f'4\) | 1 | 2 af2 | 1 | 2. 4 | 1 | 2 2 | 1 \bar "||" } lhB = \relative c, { 1 | | | 2\( f'8 g8 af4\) | 1 | | 2 bf2 | 2\( ef'8 ef d c8\) | bf4.\( bf8 bf4 bf4\) | bf4.\( bf8 bf4 bf4\) | af4. g8 f2 | bf2\( bf8 c8 d4\) | 2. 4 | 1 | 2 2 | << { g'1 } \\ { ef4 ef8 ef8 ef4 ef4 } >> \bar "||" } dynB = { s1 * 7 | s1\< | s1\mp | s1 | s1 | s1\> | s1\p | s1 | s1 | s4\< s2 s4\! } % SEGMENT C: key change snC = \relative c' { \key gf \major R1 | R1 | R1 | R1 \mark \default \break } anC = \relative c' { \key gf \major s1 * 4 } tnC = \relative c { \key gf \major \oneVoice R1 | R1 | R1 | R1 } bnC = \relative c { \key gf \major s1 * 4 } %btC = \lyricmode { } rhC = \relative c'' { \key gf \major << { bf4. cf8 df4 bf4 } \\ { 1 } >> | 4\( 4\) 4\( f8( ef8)\) | 4.\( ef'8 df4 bf'4\) | 2.\( cf8 gf'8\) | } lhC = \relative c { \key gf \major df4.\( df8 df4 df4\) | cf4.\( bf8 af2\) | df1 | df,4.\( ef'8 df2\) } dynC = { s1\mf | s1 | s1 | s4\> s2 s4\! } % SEGMENT D: 2nd verse snD = \relative c'' { \voiceOne \once \override DynamicText #'extra-offset = #'( -4 . -.25 ) gf1\(^\markup { \italic \bold \tiny "ooh..." }\mf | gf\) | gf\(^\markup { \italic \bold \tiny "ooh..." } | f2 f8 gf af4\) | bf2.\(^\markup { \italic \bold \tiny "ooh..." } df4~ | df4 cf4 gf af | bf2 af2 | gf1\) \breathe | f4 af af af | gf4. af8 bf2 | gf4 gf ef ef | \bar "||" \key ef \major \once \override Hairpin #'extra-offset = #'(0 . -2) d4.\> ef8 f2 \breathe | % switch voices for lyrics \voiceTwo \once \override TextScript #'extra-offset = #'( 0 . 1.5 ) g4.^\markup { \italic \bold \tiny "S: ooh..." }\mp af8 bf4 g | ef c ef % end voice switching \oneVoice r4 | bf4^\markup { \italic \bold \tiny "all" }\< g' f4. g8 | ef2 r2\! \mark \default \break } anD = \relative c' { \voiceTwo df1\( | ef1\) | df1\( | df1\) | df2.\( ff4 | ef2. eff4 | df2 f4. gf8~ | \hideNotes gf1\) \unHideNotes | df4 f f f | gf4. af8 bf2 | ef,4 ef cf cf | \bar "||" \key ef \major bf4. c?8 d2 \breathe | % switch voices for lyrics \voiceOne g2.\( bf4 | af2.\) % end voice switching \voiceTwo s4 | s1 | s1 } tnD = \relative c { df4^\markup { \italic \bold \tiny "all" } bf' bf af | gf ef gf2 | df4. ef8 df4 bf' | af1 | bf4. cf8 df4 bf | gf ef gf2 | df4 bf' af4. bf8 | gf1 | \voiceOne af4 cf cf cf | bf4. cf8 df2 | df4 cf8( bf8) bf4 af4 \bar "||" \key ef \major f4. f8 bf2 \breathe | bf2.\( df4 | c2.\) \oneVoice r4 | R1 | R1 } bnD = \relative c { s1 * 8 | \voiceTwo df4 df df df | df4. df8 gf2 | cf,8( bf) af( gf) f4 f' \bar "||" \key ef \major bf,4. c8 d2 \breathe | ef1\(_\markup { \italic \bold \tiny "TB: ooh..." } | ef2.\) s4 | s1 | s1 } btDone = \lyricmode { In the cot -- tage there is joy When there's love at home; Hate and en -- vy ne'er an -- noy When there's love at home. } btDtwo = \lyricmode { Ros -- es bloom be -- neath our feet; All the earth's a gar -- den sweet, Mak -- ing life a bliss com -- plete When there's love at home. } rhD = \relative c' { 4.\( bf8 gf' bf,8\) r4 | 4.\( cf8 gf' cf,8\) r4 | 4.\( bf8 gf' bf,8\) r4 | 4\( af8 df f bf, cf4\) | 2.\( 4\) | 2. 4 | 2\( 4 cf8 gf'8\) | 1 | 2.\( 4\) | 1 | 2 2 | \bar "||" \key ef \major 2\( r8 ef'8 f4\) | 2.\( ef4\) | 2. 4 | 2 << { 2 } \\ { bf4( af) } >> | 2 4 4 } lhD = \relative c { gf8\( df' gf2 gf8 df8\) | gf,8\( ef' gf2 gf8 ef8\) | gf,8\( df' gf2 gf8 df8\) | \set tieWaitForNote = ##t gf,8~ df'8~ 2. | gf8\( df' gf df af' df, gf4\) | gf,8\( ef' gf ef gf4\) gf4 | gf,8\( df' gf df gf2\) | gf,4\( gf8 df'8 gf gf f ef8\) | df4.\( df8 df4 df4\) | df4.\( df8 df4 df4\) | cf2 f,? | \bar "||" \key ef \major bf4.\( bf8 bf2\) | 2\( r8 df4.\) | c2. r4 | bf4.\( bf8\) bf2 | ef4.\( ef8 ef d c bf8\) } dynD = { s1\mp | s1 * 10 | s1\> | s1\p | s1 | s1\< | s2. s4\! } % SEGMENT E: first chorus snE = \relative c' { \voiceOne \once \override DynamicText #'extra-offset = #'( -3 . 0 ) c2\f af' | g1 | g2 ef2 | bf'1 | \bar "||" \key gf \major bf4. cf8 df4 bf | gf ef gf2 | df2 df'2 | cf2 \oneVoice r4^\markup { \italic \bold \tiny "Sopr. or solo" } bf4 \mark \default \break \bar "||" } anE = \relative c' { \voiceTwo af2 c2 | ef1 | ef2 d4( c) | d2( f) | \bar "||" \key gf \major gf4. f8 ef4 df | ef ef ef2 | af4( gf) gf2 | gf2 s2 | \bar "||" } btE = \lyricmode { Love at home, love at home; Mak -- ing life a bliss com -- plete When there's love at } tnE = \relative c { \voiceOne ef2 af | bf1 | bf2 g2 | bf2( d) | \bar "||" \key gf \major df4. df8 df4 bf | df cf bf( cf) | bf2 df | ef2 \oneVoice r2 } bnE = \relative c { \voiceTwo af2 af | bf1 | ef2 g2 | bf2.( af4) | \bar "||" \key gf \major gf4. af8 bf4 gf | cf,4 cf8( bf) af2 | df2 bf'2 | df2 s2 } rhE = \relative c' { 2 << { ef4( f) } \\ 2 >> | 1 | 2 << { 4( c) } \\ { g2 } >> | 2\( af8 bf d f8\) | \bar "||" \key gf \major 1 | 2 2 | 4\( 8 df df df8\) | 4 -. \breathe r4 \bar "||" } lhE = \relative c { af4.\( af8 af2\) | bf4.\( ef8 ef f g f8\) | ef4.\( d8 c2\) | bf4\( d8 f8~ f2\) | \bar "||" \key gf \major gf4.\( f8 ef4 df4\) | cf4.\( bf8\) af2 | df2..\( df8\) | df,4.\( df8\) df'4-. \breathe r4 \bar "||" } dynE = { s1\mf | s1 * 7 } % SEGMENT F: piano interlude snF = \relative c'' { \key ef \major \oneVoice bf1^\markup { \italic \bold \tiny "Sopr. or solo" } | R1 | R1 | R1 \mark \default \break } anF = \relative c'' { \key ef \major s1 * 4 } btF = \lyricmode { home. } tnF = \relative c { \key ef \major \oneVoice R1 | R1 | R1 | R1 } bnF = \relative c { \key ef \major s1 * 4 } rhF = \relative c'' { \key ef \major bf4\( g' g8 bf, 4\) | 4\( c4\) 4 << { d?8( c) } \\ { af4 } >> | 1 | 2 4-> -> \bar "||" } lhF = \relative c' { \key ef \major \clef treble ef8\( g bf2.\) | af,8\( ef' af g8\) f,8\( c'8~ c4\) \clef bass | bf4\( bf8 bf~ bf af g f8\) | ef4. ef8 ef4-> ef,-> \bar "||" } dynF = { s1\mp | s1 | s1\< | s2. s4\! } % SEGMENT G: last verse, part one snG = \relative c' { \key af \major \oneVoice ef4^\markup { \italic \bold \tiny "all" } c' c bf | af f af2 | ef4. f8 ef4 c' | bf2. r4 | c4. df8 ef4 c | af f af2 | ef4 c' bf4. c8 | af2. r4 } anG = \relative c' { \key af \major s1 * 8 } btG = \lyricmode { Kind -- ly heav -- en smiles a -- bove When there's love at home; All the world is filled with love When there's love at home. } tnG = \relative c { \key af \major \oneVoice ef4^\markup { \italic \bold \tiny "all" } c' c bf | af f af2 | ef4. f8 ef4 c' | bf2. r4 | c4. df8 ef4 c | af f af2 | ef4 c' bf4. c8 | af2. r4 } bnG = \relative c { \key af \major s1 * 8 } rhG = \relative c' { \key af \major 4\( \times 2/3 { r8 c ef af ef c8\) } r4 | 4\( \times 2/3 { r8 df f af f df8\) } r4 | 4\( \times 2/3 { r8 c ef af ef c } ef4\) | 4\( \times 2/3 { r8 bf ef8\) ->( f df) ->( g ef8) } | 4->\( \times 2/3 { ef8 af c ef c af } ef4\) | 4->\( \times 2/3 { f8 af df } f8 df af f8\) | 4->\( \times 2/3 { ef8 af ef'8\) } 4->\( \times 2/3 { ef8 bf' ef8\) } | 4->\( \times 2/3 { r8 c ef } af8 c-> bf-> af8->\) } lhG = \relative c { \key af \major \times 2/3 { af8\( c ef } af2 \times 2/3 { af8 ef c8\) } | \times 2/3 { af8\( df f } af2 \times 2/3 { af8 f df8\) } | \times 2/3 { af8\( c ef } af4 af4 \times 2/3 { ef8 c af8\) } | \times 2/3 { af8\( bf ef } g4\) ef4-> ef-> | \times 2/3 { af,8\( c ef af c ef af ef c af ef c8\) } | af4->\( \times 2/3 { af'8 df f } af8 f df4\) | \times 2/3 { af,8\( ef' af~ } af4\) \times 2/3 { af,8\( ef' g~ } g4\) | \times 2/3 { af,8\( c ef } af4 r8 af-> g-> f8->\) } dynG = { s1\mf | s1 * 7 } % SEGMENT H: last verse, part two snH = \relative c'' { \oneVoice g4 bf bf bf | af4. bf8 c2 | \voiceOne ef8(\> df) df( c) c( bf) bf( af) | bf4. bf8 ef,2\! \breathe | } anH = \relative c' { \voiceTwo s1 | s1 | f4 af af af | g4. af8 bf2 \breathe | } btH = \lyricmode { Sweet -- er sings the brook -- let by; Bright -- er beams the az -- ure sky. } tnH = \relative c' { \voiceOne bf4^\markup { \italic \bold \tiny "div." } df df df | c4. df8 ef2 | df4 af bf bf | bf4. bf8 df2 \breathe | } bnH = \relative c { \voiceTwo ef4 ef ef ef | ef4. ef8 af2 | df,4 df8( c) bf4 bf' | ef,4. f8 g2 \breathe | } rhH = \relative c' { 2. 4 | 1 | 2 | 1 } lhH = \relative c { ef4. ef,8 ef4 ef | ef'4. ef,8 ef4 ef | df'4. c8 bf2 | ef1 } dynH = { s1 | s1 | s1\> | s2. s4\! } % SEGMENT I: last verse, part three snI = \relative c'' { \voiceOne \once \override DynamicText #'extra-offset = #'( -4 . -1 ) c2.\(^\markup { \italic \bold \tiny "ooh..." }\mf ef4 | ef df af bf4\) | c4\(^\markup { \italic \bold \tiny "ooh..." } af g2 | \once \override Hairpin #'extra-offset = #'( 0 . -2 ) af1\)\< } anI = \relative c' { \voiceTwo ef2.\( gf4 | f2. ff4\) | ef1\( | c2 ef2\) } btI = \lyricmode { Oh, there's One who smiles on high When there's love at home. } tnI = \relative c' { \voiceOne c4. df8 ef4 c | af f af2 | ef4 c' bf4. c8 | af1 } bnI = \relative c { \voiceTwo af1\(_\markup { \italic \bold \tiny "B: ooh..." } | af1\) | ef'1_\markup { \italic \bold \tiny "B: ooh..." } | \once \override TextScript #'extra-offset = #'( -5 . 0 ) af4_\markup { \italic \bold \tiny "B: when there's love at" } g f ef } rhI = \relative c' { 2.\( ef4\) | 2.\( 4\) | 2 << { 2 } \\ { bf4( df4) } >> | 1 } lhI = \relative c { 2\( r8 gf'4.\) | 1 | ef'2 ef | af,1 } dynI = { s1\mp | s1 * 3 } % SEGMENT J: a cappella chorus snJ = \relative c' { \voiceOne \once \override DynamicText #'extra-offset = #'( 0 . -2 ) f2\f df'2 | c1 | c2 af | ef'1 | \once \override DynamicText #'extra-offset = #'( 0 . -6 ) c4\mf df ef c | af f af2\fermata | \once \override DynamicText #'extra-offset = #'( 0 . -6 ) ef2\mp ef'2 | df2. g,4 } anJ = \relative c' { \voiceTwo df2 f | ef1 | ef2 f | g1 | af4 g f ef | f df f2 | ef2 af2 | f2 ef2 } btJ = \lyricmode { Love at home, love at home; Oh, there's One who smiles on high When there's love at } tnJ = \relative c' { \voiceOne af2 af | af1 | af2 c4( d) | bf1 | af4 bf c af | ef' df8( c) c4( df4)\fermata | c2 ef | ef df } bnJ = \relative c { \voiceTwo df2 df | af1 | af'2 f | ef1 | af4 af af8( g) f( ef) | df4 df bf2 | ef2 c'2 | bf2 ef,2 } rhJ = \relative c { s1 * 8 } lhJ = \relative c { s1 * 8 } dynJ = { s1 * 8 } % SEGMENT K: ending snK = \relative c'' { \voiceOne af1( | af1) | af1( | af1) | \oneVoice r1\fermata \bar "|." } anK = \relative c' { \voiceTwo ef4( df c2 | df1) | df4( af2 bf4 | c1) | s1 \bar "|." } btK = \lyricmode { home. ooh... } tnK = \relative c' { \voiceOne c4( bf af2 | f1) | ff1( | ef1) | \oneVoice r1\fermata \bar "|." } bnK = \relative c { \voiceTwo af1( | af1) | af1( | af1) | s1 \bar "|." } rhK = \relative c' { ef4\( c' c8 ef, 4\) | 4\( af'2\) | ef4\( c' c8 ff, bf4\) | 1 | c1\fermata \bar "|." } lhK = \relative c { af8\( ef' af2.\) | af,8\( ef' f2.\) | af,8\( ff'8~ ff2.\) | 1 | 1 } dynK = { s1\p | s1 | s1 | s1 | s1\pp } %%%%%%%%%%%%%%%%%%% % SCORE STRUCTURE % %%%%%%%%%%%%%%%%%%% << \set Score.markFormatter = #format-mark-letters \set Score.markFormatter = #format-mark-box-letters \override Score.BarNumber #'padding = #2 \override Score.VerticalAxisGroup #'remove-first = ##t \new ChoirStaff << % treble staff \new Staff = "women" { \override Score.MetronomeMark #'extra-offset = #'( -8 . 3 ) \tempo 4=88 \set Staff.instrumentName = \markup { \column { "Soprano " \line { "Alto" } } } \set Staff.shortInstrumentName = "SA " \set Staff.printKeyCancellation = ##f << \new Voice = "soprano" { \snA \snB \snC \snD \snE \snF \snG \snH \snI \snJ \snK } \new Voice = "alto" { \anA \anB \anC \anD \anE \anF \anG \anH \anI \anJ \anK } >> } % btreb: lyrics context below treble staff \new Lyrics = "btreb" { s1 } % bass staff \new Staff = "men" { \set Staff.instrumentName = \markup { \column { "Tenor " \line { "Bass" } } } \set Staff.shortInstrumentName = "TB " \set Staff.printKeyCancellation = ##f \clef bass << \new Voice = tenor { \tnA \tnB \tnC \tnD \tnE \tnF \tnG \tnH \tnI \tnJ \tnK } \new Voice = bass { \bnA \bnB \bnC \bnD \bnE \bnF \bnG \bnH \bnI \bnJ \bnK } >> } { \lyricsto "soprano" \context Lyrics = btreb { \btA \btB %\btC \set associatedVoice = tenor \btDone \set associatedVoice = soprano \btDtwo \btE \btF \btG \btH \set associatedVoice = tenor \btI \btJ \btK } } >> \new PianoStaff { \set PianoStaff.instrumentName = "Piano " \set PianoStaff.connectArpeggios = ##t \set PianoStaff.printKeyCancellation = ##f << \new Staff = "rh" { \rhA } \new Dynamics = "dynamics" \dynA \new Staff = "lh" { \lhA } >> << \context Staff = "rh" { \rhB } \context Dynamics = "dynamics" \dynB \context Staff = "lh" { \lhB } >> << \context Staff = "rh" { \rhC } \context Dynamics = "dynamics" \dynC \context Staff = "lh" { \lhC } >> << \context Staff = "rh" { \rhD } \context Dynamics = "dynamics" \dynD \context Staff = "lh" { \lhD } >> << \context Staff = "rh" { \rhE } \context Dynamics = "dynamics" \dynE \context Staff = "lh" { \lhE } >> << \context Staff = "rh" { \rhF } \context Dynamics = "dynamics" \dynF \context Staff = "lh" { \lhF } >> << \context Staff = "rh" { \rhG } \context Dynamics = "dynamics" \dynG \context Staff = "lh" { \lhG } >> << \context Staff = "rh" { \rhH } \context Dynamics = "dynamics" \dynH \context Staff = "lh" { \lhH } >> << \context Staff = "rh" { \rhI } \context Dynamics = "dynamics" \dynI \context Staff = "lh" { \lhI } >> << \context Staff = "rh" { \rhJ } \context Dynamics = "dynamics" \dynJ \context Staff = "lh" { \lhJ } >> << \context Staff = "rh" { \rhK } \context Dynamics = "dynamics" \dynK \context Staff = "lh" { \lhK } >> } >>