% Version 1.20
% Last edit: March 24, 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

\version "2.8.0"
\include "english.ly"

#(set-default-paper-size "letter")
#(set-global-staff-size 20)

title = "Go to Dark Gethsemane"
composer = "Richard Redhead"
poet = "James Montgomery"
piece = "Petra"
meter = "77.77.77"
arranger = ""

world = {
  \key d \major
  \time 4/4
  \partial 4*4
}

melody = \relative c' {
  \world
  d4 d e fs |
  g4. g8 fs2 |
  d4 d e fs | 
  e e d2 |
  d4 fs a a |
  b b a2 |
  d,4 fs a a |
  b4. b8 a2 |
  d,4 d e fs |
  g4. g8 fs2 |
  d4 e fs e |
  d cs d2 \bar "|."
}

alto = \relative c' {
  \world
  a4 a cs d |
  d4. d8 d2 |
  a4 b cs d |
  d cs d2 |
  d4 d e fs |
  d e fs2 |
  d4 d e cs |
  fs4 e8 d cs2 |
  d4 d cs d |
  d4. d8 d2 |
  d4 cs d b |
  a a a2  
}

tenor = \relative c {
  \world
  fs4 fs a a |
  b4. b8 a2 |
  fs4 fs a a |
  b a fs2 |
  fs4 b cs d |
  d cs d2 |
  a4 a a a |
  a gs a2 |
  a4 a g a |
  b4. b8 a2 |
  a4 g a g | 
  fs e fs2
}

bass = \relative c {
  \world
  d4 d a d |
  g,4. g8 d'2 |
  d4 b a d |
  g, a d2 |
  d4 b a d |
  g g d2 |
  fs4 d cs fs |
  d e a2 |
  fs4 fs e d |
  g,4. g8 d'2 |
  fs4 e d g, |
  a a d2
}

verseOne = \lyricmode {
  \set stanza = "1. "
  Go to dark Geth -- sem -- a -- ne,
  Ye that feel the temp -- ter's pow'r;
  Your Re -- deem -- er's con -- flict see,
  Watch with him one bit -- ter hour;
  Turn not from his griefs a -- way,
  Learn of Je -- sus Christ to pray.
}

\markup {
  \column {
    \fill-line { \large \bold \title } % title
    \fill-line { \caps \piece               % piece
	         \caps \composer      % composer
	  }
    \fill-line { \meter          % meter
	         \arranger           % arranger
	  }
  }
}

\score {
  \context ChoirStaff <<
    \context Staff = upper <<
      \context Voice =
         sopranos { \voiceOne << \melody >> }
      \context Voice =
         altos { \voiceTwo << \alto >> }
      \context Lyrics = one \lyricsto sopranos \verseOne
    >>
    \context Staff = men <<
      \clef bass
      \context Voice =
        tenors { \voiceOne << \tenor >> }
      \context Voice =
        basses { \voiceTwo << \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)
    }
  }
}

\markup {
  \normalsize {
    \fill-line {
      \hspace #4.0
      \hspace #4.0
      \line {
	"2. "
	\column {
	  "Follow to the judgment hall;"
	  "  View the Lord of life arraigned;"
	  "O the wormwood and the gall!"
	  "  O the pangs his soul sustained!"
	  "Shun not suff'ring, shame, or loss;"
	  "Learn of him to bear the cross."
	}
      }
      \hspace #4.0
      \line {
	"3. "
	\column {
	  "Calv'ry's mournful mountain climb;"
	  "  There, adoring at his feet,"
	  "Mark the miracle of time,"
	  "  God's own sacrifice complete;"
	  "“It is finished!” hear him cry;"
	  "Learn of Jesus Christ to die."
	}
      }
      \hspace #4.0
      \hspace #4.0
    }
  }
}

\markup {
  \fill-line {
    " "
    \column {
      \small \caps \poet % poet
    }
  }
}

%{
  Per the _Hymnal 1940_.

  This is a good file to consult to see how to put verses side-by-side.
  Change log:
  3-24-06 Move to 2.8 and current formatting
%}