% Version 1.0
% Last edit: March 10, 2006
% The music and words produced by this source code are believed
% to be in the public domain in the United States. The source
% code itself is covered by the Creative Commons Attribution-
% NonCommercial license, 
% http://creativecommons.org/licenses/by-nc/2.5/
% Attribution: Geoff Horton

% **** Note: Running this file through lilypond produces a lot of
% **** "programming error: adding reverse spring, setting to unit
% **** continuing, cross fingers" error messages. It doesn't seem
% **** to affect the final output, so they can safely be ignored.

\version "2.8.0"
\include "english.ly"

#(set-default-paper-size "letter")
#(set-global-staff-size 19)

% *** play with sizes a little to get it to fit on one page

\paper {
  ragged-bottom = ##t
  top-margin = 0.25\in
  bottom-margin = 0.25\in
  between-system-space = 0.25\in
  head-separation = 0\in
  page-top-space = 0\in
}

title = "Take Up Your Cross"
composer = \markup { "William Gardiner's" \italic "Sacred Melodies" }
poet = "Charles W. Everest, alt."
meter = "L.M."
arranger = ""
piece = "Gardiner"

world = {
  \key e \minor
  \time 4/2
  \partial 2*1
}

optSlur = \tag #'withoutSlur { \once \override Slur #'transparent = ##t }

melody = \relative c' {
  \world
  \optSlur e4( fs) |
  g2 \optSlur fs4( e) ds2 \optSlur e4( fs) |
  g2 fs e g | % end line 1
  a2 a b g |
  <a e> a b b |
  c \optSlur b4( c) \optSlur d( c) b2 | % end line 2
  \optSlur a4( g) a2 g b |
  g <a a,> g fs |
  e ds e1 \bar "|."
}

alto = \relative c' {
  \world
  b2 |
  e4 d c2 b b4 ds |
  e2 ds b e | % end line 1
  d4 e fs2 <g d> <e b> |
  e4 g fs e ds2 e |
  e4 fs <g d>2 <a d> <g d> | % end line 2
  fs4 g ~ g fs d2 <fs b,> |
  <e b> e4 ds <e b>2 ds |
  e4 c b2 b1 \bar "|."
}

tenor = \relative c' {
  \world
%  \showStaffSwitch
  g4 a |
  b2 a4 g fs2 g4 a |
  b c fs, b g2 b | % end line 1
  a2 d s2 s2 |
  s2 a2 fs g |
  a s2 s2 s2 | % end line 2
  cs4 b cs a b2 s2 |
  s2 s2 s2  b4 a |
  g2 fs4 g8[ a] g1 \bar "|."
}

bass = \relative c {
  \world
  < \tweak #'font-size #-2 e e,>2 |
  e a, b4 a g < \tweak #'font-size #-2 fs' fs,> |
  < \tweak #'font-size #-2 e e,> a, b2 e, e' | % end line 1
  fs d g4 fs e d | 
  c b c2 b e |
  a, g fs g | % end line 2
  d' d g ds |
  e4 e, fs2 g4 a b2 |
  c4 a b2 < \tweak #'font-size #-2 e e,>1 |
}

verseOne = \lyricmode {
  \set stanza = "1. "
   “Take up your cross,” the Sav -- ior said,
  If you would my dis -- ci -- ple be;
  Take up your cross with will -- ing heart,
  And hum -- bly fol -- low af -- ter me.
}

verseTwo = \lyricmode {
  \set stanza = "2. "
  Take up your cross, let not its weight
  Fill your weak spir -- it with a -- larm;
  His strength shall bear your spir -- it up
  And brace your heart and nerve your arm.
}

verseThree = \lyricmode {
  \set stanza = "3. "
  Take up your cross, heed not the shame,
  And let your fool -- ish heart be still;
  The Lord for you ac -- cept -- ed death
  Up -- on a cross, on Cal -- v'ry's hill.
}

\markup {
  \column {
    \fill-line { \large \bold \title } % title
    \fill-line { \caps \piece               % piece
	         \caps \composer      % composer
	  }
    \fill-line { \meter          % meter
	         \arranger           % arranger
	       }
  }
}

\score {
  <<
    \context Staff = melody <<
      \removeWithTag #'withoutSlur
      \context Voice = melody { \melody } 
      \context Lyrics = one \lyricsto melody \verseOne
      \context Lyrics = two \lyricsto melody \verseTwo
      \context Lyrics = three \lyricsto melody \verseThree
    >>
    \context PianoStaff <<
      \context Staff = upper <<
        \set Staff.printPartCombineTexts = ##f
        \partcombine
        \melody
        \alto
      >>
      \context Staff = lower <<
        \set Staff.printPartCombineTexts = ##f
        \clef bass
        \partcombine
        \tenor
        \bass
      >>
    >>
  >>
  \layout {
    \context {
      \Score
      % **** Turns off bar numbering
      \remove "Bar_number_engraver"
    }
    \context {
      \Lyrics
      % **** Prevents lyrics from running too close together
      \override LyricSpace #'minimum-distance = #0.6
      % **** Makes the text of lyrics a little smaller
      \override LyricText #'font-size = #-1
      % **** Moves lines of lyrics closer together
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
    }
    \context {
      \Staff
      % **** Moves staves a little closer together
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-2 . 2)
    }
  }
}

\markup { 
  \normalsize {
    \fill-line {
      \hspace #3.0
      \line {
	\bold "4. "
	\column {
	  "Take up your cross, then, in his strength"
	  "  And calmly ev'ry danger brave;"
	  "It guide you to a better home"
	  "  And leads to vict'ry o'er the grave."
	}
      }
      \hspace #3.0
      \line {
	\bold "5. "
	\column {
	  "Take up your cross, and follow Christ,"
	  "  Nor think till death to lay it down;"
	  "For only those who bear the cross"
	  "  May hope to wear the glorious crown."
	}
      }
      \hspace #3.0
    }
  }
}

%{

  Change log:
  4-01-06 New
%}