\version "2.10.11"

\header {	
%		title = "182. Newburgh. S.M."
		title = "Newburgh"
		source = "The Sacred Harp (1991 Denson edition)"   
		poet = "Isaac Watts, 1719"
		composer = "Amos Munson, 1798" 	
        tagline = \markup { \fill-line { \with-url #"http://creativecommons.org/licenses/by/2.5/ca/" "License: Creative Commons Attribution 2.5" "Reactor Core Hymn Repository" \with-url #"http://hymns.reactor-core.org/" "http://hymns.reactor-core.org/" } }
}

%sacredHarpHeads = \set shapeNoteStyles = ##(fa #f la fa #f la mi)
%sacredHarpHeads = \set shapeNoteStyles = ##(la mi fa #f la fa #f)

#(set-global-staff-size 16)
#(set-default-paper-size "letter" 'landscape)

\paper {
	pagenumber = "yes"
	linewidth = 120\mm
	indent = 0\mm
}

global = {
	\key c \major
	\time 4/4
	\set Staff.printPartCombineTexts = ##f
}

soprano = \relative g' { \sacredHarpHeads \set autoBeaming = ##f
	c1 | e4 e e d | e2. e4 | c2. a4 | d2. d4 | d2. r4 | r1 | r | r2. c4 | e e e d | g g d d | c2. b4 | c2 d | e1 |
	r | r | r2. c4 | c e d8 [c] b [a] | g2. e'4 | c c c e | d8 [c] d [e] d4 e | c a g e | g2. c4 | e e e c | g' d d d | c c c d | e1 \bar "|."
}

alto = \relative g' { \sacredHarpHeads \set autoBeaming = ##f
	e1 | g4 g g g | g2. g4 | a2. a4 | g2 fis2 | g2. r4 | r1 | r2. e4 | g g g g | g8 ([a g f] e4) a | g2. g4 | a2. d,4 | g2 g | e1 |
	r1 | r | r2. e4 | a a a a | g2. r4 | r1 | r | r | r2. e4 | g g g e | d g g g | e g a g | g1 \bar "|."
} 

tenor = \relative g' { \sacredHarpHeads \set autoBeaming = ##f
	g1 | e4 g c d | c2. c4 | e2. c8 [e] | d4 (c b) a | g2. r4 | r2. g4 | c c a c8 [e] | d4 d d e8 [d] | c4 c a d | d8. [c16] b8 [a] g4 e | f4. ( g8 a4) d | c2 b | c1 |
	r1 | r | r2. c4 | e c a d8 [e] | d2. r4 | r1 | r | r | r2. g,4 | c c c e | d8 [c] d [e] d4 f | e g f8 [e] d4 | c1 \bar "|."
}

bass = \relative f { \sacredHarpHeads \set autoBeaming = ##f
	c1 | c4 c e g | c2. c4 | a2. c4 | g (c, d) d | g2. c,4 | e e e g | f8 ([g f e] d4) c | g'2. e4 | <c c'> <c c'> <c c'> <d d'> | g g g g | c4. (b8 a4) g | c2 g | c,1 |
	r2 c | e4 g a8 [g] a [b] | c2. c4 | a a d, d | g2. r4 | r1 | r | r | r2. c,4 | c' c a c | g g g g | a g c g | c,1 \bar "|."
}

sopwords = \lyricmode {
	Let ev' -- ry crea -- ture join
	To praise the'e -- ter -- nal God;

	Ye heav'n -- ly hosts, the song be -- gin,
	And sound His name a -- broad.

	And moon with pal -- er rays;

	Ye star -- ry lights,
	ye twink -- ling flames,
	Shine to your Mak -- er's praise:

	Ye star -- ry lights,
	ye twink -- ling flames,
	Shine to your Mak -- er's praise:
}
altwords = \lyricmode {
	Let ev' -- ry crea -- ture join
	To praise the'e -- ter -- nal God;

	Ye heav'n -- ly hosts, the song be -- gin,
	And sound His name a -- broad.

	And moon with pal -- er rays;

	Ye star -- ry lights,
	ye twink -- ling flames,
	Shine to your Mak -- er's praise:
}
tnrwords = \lyricmode {
	Let ev' -- ry crea -- ture join
	To praise the'e -- ter -- nal God;

	Ye heav'n -- ly hosts, the song be -- gin,
	Ye heav'n -- ly hosts, the song be -- gin,
	And sound His name a -- broad.

	And moon with pal -- er rays;

	Ye star -- ry lights,
	ye twink -- ling flames,
	Shine to your Mak -- er's praise:
}
basswords = \lyricmode {
	_ _ _ _ _ _ _ _ _ _ _ _

	Ye heav'n -- ly hosts, the song be -- gin,
	Ye heav'n -- ly hosts, the song be -- gin,
	And sound His name a -- broad.

	Thou sun with gold -- en beams,
	And moon with pal -- er rays;

	Ye star -- ry lights,
	ye twink -- ling flames,
	Shine to your Mak -- er's praise:
}

\score { \new ChoirStaff <<
    \new Staff << \global \clef treble \new Voice = "sopvox" \soprano
    \new Lyrics \lyricsto "sopvox" \sopwords >>
    \new Staff << \global \clef treble \new Voice = "altvox" \alto
    \new Lyrics \lyricsto "altvox" \altwords >>
    \new Staff << \global \clef treble \new Voice = "tnrvox" \tenor
    \new Lyrics \lyricsto "tnrvox" \tnrwords >>
    \new Staff << \global \clef bass \new Voice = "bassvox" \bass
    \new Lyrics \lyricsto "bassvox" \basswords >>
>>
  \layout {
    \context { \Score
                \remove "Bar_number_engraver"
                \override PaperColumn #'keep-inside-line = ##t
        }
    \context { \ChoirStaff \accepts "Lyrics" }
    \context { \Lyrics
                \override LyricSpace #'minimum-distance = #1.2
                \override LyricText #'self-alignment-X = #LEFT
                \consists "Bar_engraver"
                \consists "Separating_line_group_engraver"
                \override BarLine #'transparent = ##t
        }
	}
}

\score {
  << 
     \new Staff { \set Staff.midiInstrument = #"church organ" 
  		  \global \clef treble \transpose g' g'' \repeat unfold 1 \unfoldRepeats { \soprano } }
     \new Staff { \set Staff.midiInstrument = #"church organ" 
  		  \global \clef treble \transpose g' g'' \repeat unfold 1 \unfoldRepeats { \soprano } }
     \new Staff { \set Staff.midiInstrument = #"church organ" 
  		  \global \clef treble \repeat unfold 1 \unfoldRepeats { \soprano } }
%     \new Staff { \set Staff.midiInstrument = #"acoustic grand" 
%  		  \global \clef treble \repeat unfold 1 \unfoldRepeats { \soprano } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
     		  \global \clef treble \repeat unfold 1 \unfoldRepeats { \alto } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
     		  \global \clef treble \repeat unfold 1 \unfoldRepeats { \alto } }
%     \new Staff { \set Staff.midiInstrument = #"acoustic grand"
%     		  \global \clef treble \repeat unfold 1 \unfoldRepeats { \alto } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
                  \global \clef treble \repeat unfold 1 \unfoldRepeats { \tenor } }
%     \new Staff { \set Staff.midiInstrument = #"acoustic grand"
%                  \global \clef treble \repeat unfold 1 \unfoldRepeats { \tenor } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
                  \global \clef treble \transpose g' g \repeat unfold 1 \unfoldRepeats { \tenor } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
                  \global \clef bass \repeat unfold 1 \unfoldRepeats { \bass } }
%     \new Staff { \set Staff.midiInstrument = #"acoustic grand"
%                  \global \clef bass \repeat unfold 1 \unfoldRepeats { \bass } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
                  \global \clef bass \transpose f f, \repeat unfold 1 \unfoldRepeats { \bass } }
     \new Staff { \set Staff.midiInstrument = #"church organ"
                  \global \clef bass \transpose f f, \repeat unfold 1 \unfoldRepeats { \bass } }
>>
  \midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 125 4) } } 
}