\version "2.12.0"

\paper {
  #(set-paper-size "a5landscape")
  top-margin = 1.5\cm
  bottom-margin = 1.5\cm
  left-margin = 1.5\cm
  right-margin = 1.5\cm
  indent = 0.3\cm
}

date = #(strftime "%Y-%m-%d" (localtime (current-time)))
year = #(strftime "%Y" (localtime (current-time)))

\header {
  title = "Halleluja-Vers nach GL 174,1"
  subtitle = "Erster Brief des Johannes 4, 12"
  composer = "A. J. Musiggiano"
  tagline = \markup {
    \concat {
      \teeny { "♡ " }
      %\teeny \year
      %\teeny { " Arnie Range, arnierange.mooo.com (" }
      \teeny \date
      %\teeny { "), may be freely copied (CC BY-NC-SA)" }
    }
  }
}

global = {
  \time 4/4
  \key d \minor
}

Instrument = {
  %\set Staff.midiInstrument = "choir aahs"
  \set Staff.midiInstrument = "trumpet"
  \hide Staff.TimeSignature
}

Chords = \chordmode {
  d1:m |
  c2/e c2 |
  b2/g c4:sus4 c4 |
  f1
  
  g1:m |
  f2/a b2 |
  c2:sus4 c2 |
  f1
}

SopranoNotes = \relative c'' {
  \Instrument
  a1 |
  g2 c4 c4 |
  bes4.( a8 g4) g4 |
  a1 \break |
  
  bes1 |
  a4.( g8) f4 f8( g8) |
  a2( c2) |
  a1
  \bar "|."
}


AltoNotes = \relative c' {
  \Instrument
  f1 |
  g4.( f8) e4 g4 |
  g2( ~ g8 f8) e4 |
  f1 |

  f1 |
  f4.( f8) f4 f8( f8) |
  f2( e2) |
  f1
}

TenorNotes = \relative c' {
  \Instrument
  a1 |
  c2 c4 c4 |
  d2( e4) e8( c8) |
  a1 |

  d1 |
  c2 d4 d4 |
  c4( d4 c8 g8 c4) |
  c1
}

BassNotes = \relative c {
  \Instrument
  d1 |
  e4.( d8) c4 e4 |
  g4.( f8 e4) c4 |
  f1 |

  g1 |
  a2 bes4 bes4 |
  c2( c,2) |
  f1
}

Lyrics = \lyricmode {
  \once \override LyricText.self-alignment-X = #LEFT
  "Wenn wir einander" lie -- ben bleibt Gott in uns, __
  \once \override LyricText.self-alignment-X = #LEFT
  "in uns ist seine" Lie -- be voll -- en -- det.
}

\score {
  \new ChoirStaff <<
    %\new ChordNames \Chords
    \new Staff = soprano <<
      \override Staff.InstrumentName #'self-alignment-X = #RIGHT
      \set Staff.instrumentName = \markup \right-column {
        S
        A
      }
      \clef treble
      \new Voice = "Soprano" { \global \voiceOne \SopranoNotes }
      \new Voice = "Alto" { \global \voiceTwo \AltoNotes }
      \new Lyrics \lyricsto "Alto" { \Lyrics }
    >>
    \new Staff = bass <<
      \override Staff.InstrumentName #'self-alignment-X = #RIGHT
      \set Staff.instrumentName = \markup \right-column {
        T
        B
      }
      \clef bass
      \new Voice = "Tenor" { \global \voiceOne \TenorNotes }
      \new Voice = "Bass" { \global \voiceTwo \BassNotes }
    >>
  >>
  \layout {
    \context {
      \Lyrics \with {
        \override LyricText #'font-size = #-0.0
	  }
    }
    \context {
      \Score
        \override RehearsalMark #'self-alignment-X = #LEFT
        \override RehearsalMark #'break-align-symbols = #'(bar-line)
    }
  }
}

%showLastLength = R1*9
\score {
  \unfoldRepeats <<
	\new Staff << \global \SopranoNotes >>
	\new Staff << \global \AltoNotes >>
	\new Staff << \global \TenorNotes >>
	\new Staff << \global \BassNotes >>
  >>
  \midi {
    \context {
      \Score
        tempoWholesPerMinute = #(ly:make-moment 120 4)
    }
  }
}

% :vim: ts=2 sw=2 et