% Volkslied:
%   „Prinz Eugen, der edle Ritter“
%
% Taktierung von Friedrich Silcher (um 1860)
%
% Referenz: Erk-Böhme, Deutscher Liederhort Bd II, S. 134
%           https://babel.hathitrust.org/cgi/pt?id=uc1.b4134294&seq=144

\version "2.22.0"

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

\include "deutsch.ly"


\header {
  tagline = ##f
}


\paper {
  indent = 0
  line-width = 128\mm
  oddHeaderMarkup = #f
  evenHeaderMarkup = #f
  oddFooterMarkup = #f
  evenFooterMarkup = #f
}


irregularMeter =
#(define-music-function (args) (pair?)
   "Create a compound time signature for irregular meters.

This function accepts the same arguments as function
`\\compoundMeter`; it also produces the same visual appearance of the
time signature elements.  However, it doesn't insert a plus sign
between the (top-level) elements but rather a small horizontal space.
Additionally, it doesn't change the timing, which means that it is
still necessary to insert proper `\\time` commands, to say `\\omit
Timing.TimeSignature` before the first `\\time` command in the section
with irregular meters, and `\\undo \\omit Timing.TimeSignature` after
this section."
  #{
    \once \override Timing.TimeSignature.stencil =
      #(lambda (grob)
         (grob-interpret-markup
          grob
          (make-concat-markup
            (list-join
              (map make-compound-meter-markup args)
              (make-hspace-markup 0.3)))))
  #})


melodie = \relative c' {
  \autoBeamOff

  \key g \major
  \irregularMeter #'((3 4) (2 4))
  
  \partial 4 d8 d |
  \omit Timing.TimeSignature
  \time 3/4 g8. g16 g8 g g a |
  h4 h-> \breathe g8 a |
  \time 2/4 h4 d |
  d8 c c h |
  \time 3/4 a8 g a h c h |
  a2 \break
  \repeat volta 2 {
    d8 c |
    \time 2/4 h4 d |
    \time 3/4 e8 d c h a g |
    \time 2/4 a4 c |
    \time 3/4 d8 c h a g g |
    g4 h a8 a |
    g2
  }
}

text = \lyricmode {
  Prinz Eu -- ge -- ni -- us der ed -- le Rit -- ter,
  wollt dem Kai -- ser wied -- rum krie -- gen
  Stadt und Fes -- tung Bel -- ga -- rad.
  Er ließ schla -- gen ei -- nen Bru -- cken,
  dass man konnt hin -- ü -- ber -- ru -- cken
  mit "d’r Ar" -- mee wohl vor die Stadt.

}


<<
  \new Voice = "Melodie" \melodie
  \new Lyrics \lyricsto "Melodie" \text
>>


\layout {
  \context {
    \Score
    \omit BarNumber
  }

  \context {
    \Lyrics
    \override LyricText.font-name = "Century Schoolbook L"
  }
}