Page:Olympic Anthem Score.pdf/6

From Wikisource
Jump to navigation Jump to search
This page has not been proofread.



\version "2.18.2"
\header {
  tagline = ""
}

\paper {
indent =0
myStaffSize = #20
  #(define fonts
    (make-pango-font-tree "DejaVu Serif"
                          "DejaVu Sans"
                          "DejaVu Mono"
                           (/ myStaffSize 20)))
}


\layout {
  \context {
    \Staff
    \RemoveEmptyStaves
    \override VerticalAxisGroup.remove-first = ##t
  }
  \context {
    \PianoStaff
    \consists "Span_arpeggio_engraver"
  }
}

VoiceS = \relative c' { \key f \major \stemUp


}

VoiceA = \relative c' { \key f \major \stemDown
  <e g>2 <e g>4 r8. <e g>16 
  <f a>4.. <f a>16 <a c>4 <c d>
  <cis e>2 <a cis>4 <a cis>8 r
  b4 cis8 (d) cis4 b

  a2~a8 r a4
  <g bes>4. <fis a>8 <g bes> (<a c>) <bes d> (<c e>)
  <a f'>4. <c e>8 <bes d>4 <d f>
  <c e>4. <bes d>8 <a c> <g bes> <a c> <bes d>

  <a c>2 <f a>4 r8. <a d>16
  <a d>4.. <a d>16 <bes d>4.. <gis d'>16
  <a c>2 <a f'>4 a
  <bes d>2 <g c>4 \tuplet 3/2 {c8 \(d <c e>\)}
}

VoiceT = \relative c {\clef bass \key f \major \stemUp
  c2 c4 r8. c16
  f4.. f16 <f a>4 <f a>
  <e a>2 <fis a>4 <fis a>8 r
  <d fis>4 <d fis> <e gis> <e gis>

  a2~a8 r a4
  c,2 c4 c
  f4. f8 f4 f
  c4. c8 c4 c

  f2 f4 r8. <d f>16
  <d f>4.. <d f>16 <bes f'>4.. <b f'>16
  <c f>2 <d f>4 <d f>
  <bes f'>2 <c e>4 \tuplet 3/2 {<g' bes>4 \(<g bes>8\)}
}

VoiceB = \relative c {\clef bass \key f \major \stemDown

}


TextU = \lyricmode {
θά -- ρι στῶν εὐ -- γε -- νῶν ἀ -- γώ -- νων _ λά -- ψε τὴν ὁρ -- μὴ και μὲ _ τὸ  ἀ -- μά -- ραν -- το στε -- φά -- νω -- σε _ κλο _ -- νά -- ρι καὶ σι -- δε -- ρέ -- νιο πλᾶ -- σε καὶ ἄ -- ξιο τὸ _ κορ
}

TextL = \lyricmode {
θά -- ρι στῶν εὐ -- γε -- νῶν ἀ -- γώ -- νων _ λά -- ψε τὴν ὁρ -- μὴ και μὲ τὸ  ἀ -- μά -- ραν -- το στε -- φά -- νω -- σε  κλο  -- νά -- ρι καὶ σι -- δε -- ρέ -- νιο πλᾶ -- σε καὶ ἄ -- ξιο τὸ κορ
}


upper = \relative c'' {\key f \major \once \override Score.MetronomeMark #'transparent = ##t {\tempo 4=120}
  <e, g>2 <e g>4 r8. <e g>16
  <f a>4.. <f a>16 <f a c>4 <f a c d>
  <e a cis e>2 <fis a cis>
  << {b4 cis8 d cis4 cis} \\ {<d, fis>2 <d gis>} >>

  <cis e a>2~ <cis e a>8 r a'4
  <bes, g' bes>4. (<a fis' a>8 < bes g' bes> <c a' c> <d bes' d> <e c' e>
  <f d' f>4. <e c' e>8) <d bes' d>4 <f d' f> 
  <e c' e>4. (<d bes' d>8 <c a' c> <bes g' bes> <c a' c> <d bes' d>)

  <c a' c>2 <c f a>4 r8. <f a d>16
  <f a d>4.. <f a d>16 <f bes d>4.. <f gis d'>16
  <f a c>2 <f a f'>4 <d f a>
  <f bes d>2 <e g c>4 \tuplet 3/2 {<e g c>8 (<e g d'> <g c e>)}
}

lower = \relative c'' {\clef "bass" \key f \major
  c,16 c,, e g c c e g c8 r8 r8. <c, c'>16
  <f c'>4.. <f c'>16 <f c'>4 <f c'>
  <e a cis>2 <fis a cis>
  <d fis b> <e gis>

  a,8 r16 a' e8. cis16 a8 r a'4
  \set Staff.connectArpeggios = ##t
  <<{g4. (fis8 g a bes c d4.\arpeggio c8) bes4\arpeggio d c4. (bes8 a g a bes a2\arpeggio f4 r8. <d f a>16} \\ {c2 c4 c <f, f'>\arpeggio s4 f\arpeggio s4 c'2 c4 c f,2\arpeggio f4 s4}>>

  <d' f a>4.. <d f a>16 <bes f' bes>4.. <b f' b>16
  <c f c'>2 <d f a>4 <d f a>
  <bes f' d'>2 <c g' bes c>4 \tuplet 3/2 {<c g' bes c>8 (<c g' bes c> <c g' bes c>)}
}

\score {
 <<
  \new Staff <<
  \new Voice = "soprano" { \VoiceS} 
  \new Voice = "alto" { \VoiceA}
  \new Lyrics \lyricsto alto \TextU
  >>
  \new Staff <<
  \new Voice = "tenor" { \VoiceT}
  \new Voice = "bass" { \VoiceB}
  \new Lyrics \lyricsto tenor\TextL
  >>
  \new PianoStaff <<
    \new Staff = "upper" \upper
    \new Staff = "lower" \with {\consists "Span_arpeggio_engraver"} \lower
  >>
 >>
  \layout { }
}

\score {
  << \unfoldRepeats {\upper }
  \unfoldRepeats { \lower} 
   \new Staff << \set Staff.midiInstrument = #"oboe" \VoiceS >>
   \new Staff << \set Staff.midiInstrument = #"oboe" \VoiceA >>
   \new Staff << \set Staff.midiInstrument = #"basoon" \VoiceT >>
   \new Staff << \set Staff.midiInstrument = #"basoon" \VoiceB >>  
  >>
  \midi { }
}