\version "2.20.0"

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


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

\layout {
  \context { \Score
             \override MetronomeMark #'padding = #'-3
  }

  \context { \Staff
             \override TimeSignature #'style = #'numbered
             \override StringNumber #'transparent = ##t
  }
}

verseI = \lyricmode {
  \set stanza = #"1."
  Když jsem já slou -- žil to prv -- ní lé -- to, vy -- slou -- žil jsem si ku -- řát -- ko za to. A to ku -- ře krá -- ko -- ře, bě -- há po dvo -- ře, má pa -- nen -- ka plá -- če do -- ma v_ko -- mo -- ře. A ta kač -- ka blá -- to tlač -- ká a to ku -- ře krá -- ko -- ře bě -- há po dvo -- ře, má pa -- nen -- ka plá -- če do -- ma v_ko -- mo -- ře.
}

verseII = \lyricmode {
  \set stanza = #"2."
  Když jsem já slou -- žil to dru -- hé lé -- to, vy -- slou -- žil jsem si
  kach -- nič -- ku za to.
}

melody = \chordmode {
  d1 a:7 e2:m a:7
  d4 a:7 d2
  d1 a:7 a:7 d4 a:7 d2 d1
  d1 a:7 a:7 
  d4 a:7 d2
}

theFretBoards = \chordmode {
  \override FretBoards.FretBoard #'size = #'0.95
  \override FretBoard
  #'(fret-diagram-details finger-code) = #'none
  \set chordChanges = ##t % show chord name only at the start of the lines and when chord changes
  
  \melody
  
}      
theChords = \chordmode {
  % insert chords for chordnames here, chordnames are now German, thus B ~ H
  \germanChords
  \set chordChanges = ##t % show chord name only at the start of the lines and when chord changes
  
  \melody

}

voltaAdLib = \markup { 2. - 7. }

staffMelody = \relative c' {
  \key d \major
  \clef "treble"
  \time 4/4
  
  \repeat volta 2 {
    a4 d8 d d4 fis
    e8 d cis d e4 r
    e e8 e e4 g \break
    fis8 fis e e d4 r
  }

  \alternative {
    { a8 d d d fis4 d8 d
      e d cis d e4 r
      e8 e e e e4 g
      fis8 fis e e d4 r \bar ":|.|:"
    }
    { \set Score.repeatCommands = #(list (list 'volta voltaAdLib) 'start-repeat)
      a8 d d d fis d d d
      \set Score.repeatCommands = #'((volta #f) (volta "4.") end-repeat)
    } 
  }
  a8 d d d fis4 d8 d
  e d cis d e4 r
  a8 e e e e4 g
  fis8 fis e e d4 r
}

\book {
  \header {
    tagline = ##f %print foot with version
    dedication = "lidová píseň"
    title = \markup \center-column { "Když jsem já sloužil" }
    poet = \markup { "Česká z Berounska" }
    meter = \markup { \tiny \italic "Živě" } %\note #"4" #1 = 121
    composer = "(Doprovod: 1, 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
      }
      \new Lyrics = "lyricsII" {
        \lyricsto "voiceMelody" \verseII
      }
    >>
  }

  \markup {
    \fill-line {
      \hspace #2
      \column {
        \line  \smallCaps { 3. }
        \line \bold { }
        \italic {
          \line { .. husičku .. }
          \line { A ta husa }
          \line { chodí bosa }        
          \line { a ta kačka }                
          \line { bláto tlačká }  
          \line { a to kuře .. }                  
        }
      }
      \hspace #-2
      \column {
        \line  \smallCaps { 4. }
        \line \bold { }
        \italic {
          \line { .. vepříka .. }
          \line { A ten vepř }
          \line { jako pepř }
          \line { a ta husa }
          \line { chodí bosa }        
          \line { a ta kačka }                
          \line { bláto tlačká }  
          \line { a to kuře .. }
        }
      }
      \hspace #-2
      \column {
        \line  \smallCaps { 5. }
        \line \bold { }
        \italic {
          \line { .. telátko .. }
          \line { A to tele }
          \line { hubou mele }        
          \line { a ten vepř }
          \line { jako pepř }
          \line { a ta husa }
          \line { chodí bosa }
          \line { a ta kačka }                
          \line { bláto tlačká }  
          \line { a to kuře .. }
        }
      }
      \hspace #-2
      \column {
        \line  \smallCaps { 6. }
        \line \bold { }
        \italic {
          \line { .. kravičku .. }
          \line { A ta kráva }
          \line { mléko dává }
          \line { a to tele }
          \line { hubou mele }        
          \line { a ten vepř }
          \line { jako pepř }
          \line { a ta husa }
          \line { chodí bosa }
          \line { a ta kačka }                
          \line { bláto tlačká }  
          \line { a to kuře .. }        
        }
      }  
      \hspace #19
      \column {
        \line  \smallCaps { 7. }
        \line \bold { }
        \italic {
          \line { .. botičky .. }
          \line { A ty boty }
          \line { do roboty }
          \line { a ta kráva }
          \line { mléko dává }
          \line { a to tele }
          \line { hubou mele }        
          \line { a ten vepř }
          \line { jako pepř }
          \line { a ta husa }
          \line { chodí bosa }
          \line { a ta kačka }                
          \line { bláto tlačká }  
          \line { a to kuře .. }        
          
        }
      }        
    }
  }

}