% title: Mendom
% composer: William Billings
% editor: Michael Lauer
\version "2.11.62"

\include "english.ly"
\include "../mrlUtil.ly"
\include "../mrlbillingsdefs.ly"

#(set-global-staff-size 17)

#(ly:set-option 'point-and-click #f)

\paper {
    top-margin = .4\in
    bottom-margin = .4\in
    foot-separation = .0\in
    
    %annotate-spacing = ##t
 
    myStaffSize = #17
  #(define fonts
    (make-pango-font-tree "Baskerville1757"
                          "Sans"
                          "Mono"
                           (/ myStaffSize 20)))
}

global = {

  #(override-auto-beam-setting '(end * * * *) 1 4 )
  #(override-auto-beam-setting '(end * * * *) 2 4 )
  #(override-auto-beam-setting '(end * * * *) 3 4 )
  #(override-auto-beam-setting '(end * * * *) 4 4 )
  
  %\override Score.SpacingSpanner
  %              #'common-shortest-duration = #(ly:make-moment 1 8)
  %\override Score.SpacingSpanner
  %              #'base-shortest-duration = #(ly:make-moment 1 8)
  \key a \minor

  \tsAllegro 
  \partial 2
  \skip 4*2
  \skip 1*8
  \repeat volta 2 {
       \skip 1*9
  }
}

sopranoNotes = {
  \relative g' {
    \set Staff.instrumentName = "Treble"
    \clef "treble"
        a4 c |
    %1
        b c8. (e16) d8 (c) b4 |
        a2 g2 |
        a4 c b a |
        gs2 a4 c |
    %5
        b c8. (e16) d8 (c) b4 |
        a2 a |
        b4 a a gs |
        a1 |
        r2 a4 b |
    %10
        c8 (b) c (e) d (c) b4 |
        c4. b8 a4 gs |
        a4 e'8 (c) d (b) c (b16 a) |
        gs2 c4 a |
        b g c8. (b16) a4 |
    %15
        g2 b2 |
        a4 c b8 (a) gs4 |
        a1 |
  }
}

theLyrics = \lyricmode { 
  My Re -- dee -- mer let me |
  be quite |
  hap -- py at thy | 
  feet, full to |
  know my -- self and |
  Thee, be this my bit -- ter sweet. 
  Look u -- pon my in -- fant |
  state and with a |
  Fa -- ther’s year -- ning |
  bless.  Don’t thy |
  ran -- som’d Child for -- get nor |
  leave me in dis -- tress.
}

sopranoLyrics = \lyricmode {
    \keepWithTag #'soprano \theLyrics
}

altoNotes = {
  \relative d' {
    \set Staff.instrumentName = "Counter"
    \clef "treble"
    % Original clef:
    %\clef "neomensural-c3"
        e4 e4 |
    %1
        e e f e |
        e2 e |
        e4 g g e |
        e2 e4 e |
    %5
        e e f e |
        e2 e |
        g4 a8 (g) f4 e |
        e1 |
        r2 e4 g |
    %10
        g e a gs |
        a4. e8 e4 e |
        e e f e |
        e2 e4 c |
        d e e e |
    %15
        e2 g |
        e4 f f e |
        e1 |
  }
}

altoLyrics = \lyricmode {
  \keepWithTag #'alto \theLyrics
}

%\noacc = { \once \override Accidental #'transparent = ##t }
%\ficnat = \markup { \tiny \natural }

tenorNotes = {
  \relative b {
    \set Staff.instrumentName = "Tenor"
    \clef "treble_8"
        a4 a |
    %1
        g e a gs |
        a2 b |
        c4 e d c |
        b2 a4 a |
    %5
        g e a gs |
        a2 c |
        e4 f8 (e) d (c) b4 |
        a1 |
        r2 c4 d |
    %10
        e e f e8 (d) |
        e4. d8 c4 b |
        c e d c |
        b2 c4 c |
        b b a8. (b16) c8 (a) |
    %15
        b2 e |
        c4 a d8 (c) b4 |
        a1
  }
}

tenorLyrics = \lyricmode {
  \keepWithTag #'tenor \theLyrics
}

bassNotes = {
  \relative a, {
    \set Staff.instrumentName = "Bass"
    \clef "bass"
        a4 a |
    %1
        e' c d e |
        a,2 e' |
        c4 c g' a |
        e2 a,4 a |
    %5
        e'4 c d e |
        a,2 a' |
        e4 d8 (c) d4 e |
        a,1 |
        r2 a'4 g |
    %10
        e c d e |
        a4. gs8 a4 e |
        a c b a |
        e2 a4 a |
        g e a a, |
    %15
        e'2 e |
        a8. (g16) f8. (e16) d4 e
        a,1 |
  }
}

bassLyrics = \lyricmode {
  \keepWithTag #'bass \theLyrics
}

engravedLine = #(string-append "Engraved by LilyPond " (lilypond-version))

\header {
	composer = \markup { \larger \bold \italic "William Billings" }
    %subtitle = ""
    poet = \markup { \larger "“Words from Relly”" }
    opus = \markup { \larger { \italic { The Psalm-Singer’s Amusement } (1781) }}
	title = \markup { \larger \medium \italic "Mendom" }
    tagline = ""
    copyright = \markup { \center-column {
        "Copyright © 2005 by Michael Lauer."
        "This edition may be freely distributed, duplicated, performed, or recorded." 
        \engravedLine } }
    headerMarkup = \markup { "Billings:" \italic "Mendom" }
    
}

\score {
  \context ChoirStaff = choir <<
    \context Voice =
      sopranoNotes << \global \sopranoNotes >>
    \context Lyrics =
      sopranoLyrics \lyricsto sopranoNotes { \sopranoLyrics }
    \context Voice =
      altoNotes << \global \altoNotes >>
    \context Lyrics =
      altoLyrics \lyricsto altoNotes { \altoLyrics }
    \context Voice =
      tenorNotes << \global \tenorNotes >>
    \context Lyrics =
      tenorLyrics \lyricsto tenorNotes { \tenorLyrics }
    \context Voice =
      bassNotes << \global \bassNotes >>
    \context Lyrics =
      bassLyrics \lyricsto bassNotes { \bassLyrics }
  >>
  \layout {
  }

  
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 120 4)
      }
    }



 }