\version "2.20.0"

\sourcefilename "en/included/display-predefined-fretboards.ly"
\sourcefileline 0
\include "predefined-guitar-fretboards.ly"


\paper {
  #(set-paper-size "a4") %paper-height = 14.85\cm
  line-width = 15.0\cm indent = #0
  printallheaders = ##f print-all-headers = ##f
  ragged-right = ##f ragged-bollom = ##t force-assignment = #""
}

verseI = \lyricmode {
  \set stanza = #"1."
  Ej, tá hluc -- ká hos -- po -- da. Ej, tá hluc -- ká hos -- po -- da z_drob -- né -- ho ka -- me -- ní, z_drob -- né -- ho ka -- me -- ní.
}

melody = \chordmode {
  d2 d d d d4 a:7 d2 g d a:7 d a:7 d
}

theFretBoards = \chordmode {
  \override FretBoards.FretBoard #'size = #'0.95
  \override FretBoard #'(fret-diagram-details finger-code) = #'none
  \set chordChanges = ##t      
  \melody
}

theChords = \chordmode {
  \set chordChanges = ##t
  \germanChords \melody
}

staffMelody = \relative c' {
  \key d \major
  \clef "treble"
  \time 2/4
  d8 fis fis fis  fis e d4 <d fis>8 <fis a> <fis a> <fis a>  <fis a> <e g> <d fis>4 <d fis> <cis e> d4 r4
  <g b>4 <g b> <fis a> r4 <a cis> <g b> <fis a> r4   <cis a'> <e g> <d fis> r4
}

\book {
  \header {
    tagline = ##f %print foot with version
    dedication = "lidová píseň"
    title = \markup \center-column { "Ej, tá hlucká hospoda" }
    poet = \markup { "Moravská z Dolňácka" }
    meter = \markup { \tiny \italic "Svižně " \note #"4" #1 = 100 }
    composer = "(Doprovod: 5)"
  }

  \score {
    <<
      \override Score.SystemStartBar #'collapse-height = #1
      \context ChordNames { \theChords }
      \context FretBoards { \theFretBoards }
      \new Staff {
        \context Voice = "voiceMelody" { \staffMelody }
      }
      \new Lyrics = "lyricsI" {
        \lyricsto "voiceMelody" \verseI
      }
    >>
  }


  \markup {
    \vspace #2
    \fill-line {
      % moves the column off the left margin;
      % can be removed if space on the page is tight
      \hspace #-8
      \column {
        \line { \bold "2."
                \column {
                  "[: A kdo peníze"
                  "nemá. :]"
                  "[: Nech do ní"
                  "nechodí. :]"
                }
        }
      }
      \hspace #0.1
      \column {
        \line { \bold "3."
                \column {
                  "[: A já peníze"
                  "nemám. :]"
                  "[: Já do ní hned"
                  "půjdu. :]"
                }
        }
      }
      \hspace #29
      \column {
        \line { \bold "4."
                \column {
                  "[: Sů tam pěkné"
                  "děvčata. :]"
                  "[: Namlůvat si"
                  "budu. :]"
                }
        }
      }
    }
  }

}