\include "/home/eyolf/.templates/sheetLayout.ly"
%\include "/home/eyolf/.templates/chord-exceptions.ly"

\header {
 
  title = "Mia benigna fortuna"
  subtitle = ""
  composer = "Cipriano de Rore"
  poet = "Petrarca"
  tagline = ##f
}

genStuff = {
  \time 2/2
  \tempo 2=70
  \layoutTweaks
  %\set Score.measureLength = #(ly:make-moment 2 1)
%  \revert Score.BarLine #'transparent
}

dynamics = {
  s1\mf s1*3\f s1.*4
  s1*3
  % e le tranquile
  s1\p\> s s s\pp
  
  s\< s1*2\mf\< s1*3\f s\mf 
  % volti
  s\> s s\pp s2 s2\ff
}

melSop = \relative c' { 
  \genStuff
  \key g\dorian
\set Staff.midiInstrument = "clarinet"
  \clef treble
  d1 d2 f2. f4 e4 f2 e8 d8 e2
  \time 3/2 f1 r2 R1. r2 d' d c4 bes2 a4 bes2
  \time 2/2 r4 a g d'4 d8 c bes a g \ficta  fis g4 fis2 r
  g g4 g g2. f4 f2. e4 e2 r
  d2. d4 e2 f4 r8 g \ficta fis4 g r e
  e2. f4 g2 f4 a2 a4 a bes8 bes a4 a g a f4. g8 a4 a r a2 g4
  f f8 e g4 d r c2 a'2 g4 f2. e4 e2
  R1 r2 r4 e2 c'2 a4. a8 a4 bes2 g f4 ees4 f2 g
  R1 r4 e2 c'2 a4. a8 a4 bes2 g f4 ees4 f2 g1\fermata \fullBarFinal

\break
 % Crudele

 d2 b'1 a2. c2 c4 bes4 c d2. d,4 d4. e8 f2 e2
  R1
  a2 g4 a d d d2. c4 r a a a bes1 g2 aes2 aes4 aes2 g4 fis2
  g4 d f4 g a4 a a a g e f1 e2
  R1
   R1
  r4 d ees4 d c2 c r4 bes'4 a bes c2 bes4 a2 g8 f g2 a r r r4 f g f4. f8 e4 f2 r
  r4 f d d ees8 d d2 cis4 d4
  a'4 bes2 d c4 bes a2 r4 g a c2 bes4 aes4 g r4\once \set suggestAccidentals = ##t  a4 g f g4. f8 ees2 d4
  a'4 bes2 d c4 bes a2 r4 g a c2 bes4 aes4 g r4 f d d ees8 d d2 cis4
  d\longa*3/4 \fullBarFinal
   }

  

                                % for midi

textSop = \lyricmode {

  Mia be -- ni -- gna for -- tu -- _ _ _ na
  e’l vi -- ver lie -- _ to
  I chia -- ri gior -- _ _ _ _ _ _ ni e le tran -- quil -- le not -- _ ti
  E~i so -- a -- vi so -- spi -- ri e’l dol -- ce sti -- le
  Che so -- lea re -- so -- na -- re~in ver -- si~e ri -- _ _ me,
  Vol -- ti su -- bi -- ta -- men -- te in do -- glia~e’n pian -- _ to
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- te
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- te

  Cru -- de -- le~a -- cer -- ba,~in -- e -- so -- ra -- bil Mor -- _ _ te
in -- e -- so -- ra -- bil Mor -- te,
Ca -- gion mi dài di mai non es -- ser lie -- to
Ma di me -- nar tut -- ta mia vi -- ta~in pian -- to
E~i gior -- ni~o -- scu -- ri
e le do -- glio -- se not --  _ _ _ ti;
I mei gra -- vi so -- spir
non van -- no~in ri --  _ _ _ me,
E’l mio du -- ro mar -- tir,
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti --  _ _ le,
E’l mio du -- ro mar -- tir,
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti --  _ _ _ le,


}




melAlt = \relative c' {
  \genStuff
\set Staff.midiInstrument = "clarinet"
  \key g\dorian
\clef "G_8"

\set Staff.printKeyCancellation = ##f
    R1 r4 d2 d4 c2 c4 a c1 c2 r d d c4 bes2 a4 bes2 f'2 g2. g4 f2 f
  r4 f e4 f d1 d2 r4 ees4 \ficta ees2 ees \ficta ees2. d4 d2. cis4 \ficta cis2 r
  a2. bes4 c2 d4 r8 d d4 d r c c2. d4 bes4. c8 d4 c f f f f8 f f2 r4 f
  f d f e4 r2 r4 d2 c4 bes bes8 bes a4 g a4. bes8 c2. a4 a1 fis1
  r4 g2 g'2 e4. e8 e4 f2. f,4 g g aes4. g8 f2 bes



\set Staff.explicitKeySignatureVisibility = #begin-of-line-visible
  r d g2. e4. e8 e4 f2. f,4 g g aes4. g8 f2 bes1\fermata

  \key c\dorian
  r2 g d'1 c2 ees2. ees4 f f g2. fis4 a1 g2 r r4 a,4 bes4 a g f4 g2 a2 r4 a c c d d d d ees2 c f4 ees f ees d2 d r
  r4 a c d e2 r
  a,2 c4 c d c bes2. a4 a2
  r4 bes g g aes1 g2 r4
  f'4 f e f2 d d4 ees4 f2 ees4 d2 c8 bes c4 d d2 r4
  c4 bes a4. a8 g4 a4 c bes bes bes2 a a r4
  d2 f g f4 ees d d ees f2 ees4 d c2 r4 d c bes c2 a
  r4 d2 f g2 f4 ees d d ees f2 ees4 d c2 r4 bes bes bes a2 a4 a g f bes2.
  a4 a\breve*1/2
}


textAlt = \lyricmode {
  Mia be -- ni -- gna for -- tu -- na
  e’l vi -- ver lie -- _ to
  e’l vi -- ver lie -- to
  I chia -- ri gior -- ni e le tran -- quil -- le not -- _ ti
  E~i so -- a -- vi so -- spi -- ri e’l dol -- ce sti -- _ _ le
  Che so -- lea re -- so -- na -- re~in ver -- si~e ri -- me,
  Vol -- ti su -- bi -- ta -- men -- te~in do -- _ _  glia~e’n pian -- to
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- _ _ te
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- _ _ te

  Cru -- de -- le~a -- cer -- ba,~in -- e -- so -- ra -- bil Mor -- te
in -- e -- so -- ra -- bil Mor -- te,
Ca -- gion mi dài
Ca -- gion mi dài
di mai non es -- ser lie -- to
Ma di me -- nar tut -- ta mia vi -- ta~in pian -- _ to
E~i gior -- ni~o -- scu -- ri
E~i gior -- ni~o -- scu -- ri~e le do -- glio -- se not --  _ _ _ _ ti;
I mei gra -- vi so -- spir
non van -- no~in ri --  _ me,
E’l mio du -- ro mar -- tir,
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti -- le,
E’l mio du -- ro mar -- tir,
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti --  le,
vin -- ce~og -- ni sti --  _  le.
}



melTenor = \relative c' {
  \genStuff
\set Staff.midiInstrument = "oboe"
  \key g\dorian
  \clef "G_8"
  R1 a2. a4 f2 g4 f g1 a
  r2 R1. f'2 d2. bes4 ees4. d8 c2 bes
  r4 c c a bes8 c d c bes a bes4 a2 r4 c c c c2. bes4 bes2. a4 a1 r2
  f2 f4 g2 g4 r4 bes a g r2 g2. bes2 g4 bes a c c d d8 d c4 d d d d2. cis4 d2 c4 bes bes8 bes a4 g2
  r4 e2 f e d c4 c2
  r d b'1 c2. c4 c d2 d4 c bes c1 d2
  r4 d,2 b'2. c c4 c d2 d4 c bes4 c1 d\fermata


  R1*3 r2 d,2 b'1 a2. c2 c4 bes4 c d2. d,4 d1 e2
  r4 f e e f f2 g ees4 ees'4. d8 c2. bes4 a2 g4 bes bes bes a d,4 a'2 b4 c4.\once \set suggestAccidentals = ##t bes8 a g f4 a a a g e4 f1 e2
  r4 g g d ees2 f
  r4 d'4 d d a2 d,2 bes'1 a2 r
  r4 g2 a4 bes2 a4 g f2 r
  r4 a g f g4. f8 e8 d e4 f4. e16 f g2
  r4 a2 bes4 d2 c4 bes a g a d c bes a2 bes g4 g aes8 g g2 fis4 g2
  r4 a2 bes4 d2 c4 bes a g a d c bes a a g f4 g2 e r4
  f d d g2.\once \set suggestAccidentals = ##t fis4 fis\breve*1/2
  
  }

textTenor = \lyricmode {
  Mia be -- ni -- gna for -- tu -- na
  e’l vi -- ver lie -- _ _ to
  I chia -- ri gior -- _ _ _ _ _ _ ni e le tran -- quil -- le not -- _ ti
  E~i so -- a -- vi so -- spi -- ri e’l dol -- ce sti -- le
  Che so -- lea re -- so -- na -- re~in ver -- si~e ri -- me,
  Vol -- ti su -- bi -- ta -- men -- te in do -- glia~e’n pian -- _ to
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- te
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- te

  Cru -- de -- le,~a -- cer -- ba,~in -- e -- so -- ra -- bil Mor -- te
Ca -- gion mi dài di mai non es -- _ _ ser lie -- to
Ma di me -- nar
Ma di me -- nar __ _ _ _ _
tut -- ta mia vi -- ta~in pian -- to
E~i gior -- ni~o -- scu -- ri e le do -- glio -- se not -- ti;
I mei gra -- vi so -- spir
non van -- no~in ri --  _ _ _ _ me, __ _ _ _
E’l mio du -- ro mar -- tir,
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti -- _ _ _ le,
E’l mio du -- ro mar -- tir,
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti --   le,
vin -- ce~og -- ni sti --  _ le.
}


melBass = \relative c {
  \genStuff 
  \key c\dorian
  \set Staff.midiInstrument = "bassoon"
  \clef bass
  r2 d1 d2 f c4 d c1 f2 r4 f d2 bes ees4. d8 c2 bes2 r4 bes'4 g2 ees f bes,2
  r4 f'4 c d g1 d2 r4 c c2 c ees2. bes4 d2. a4 a2 r
  d2. g,4 c2 bes4 g d'4 g,4 r c c2. bes4 ees2 d4 f2 f4 d bes8 bes f'4 d g f
  bes2 a4 a g f f8 e  g4 d r r g,4
  c1 c2 a1 a2 r1
  g2 e'2. a,4. a8 a4 f'2 d4 d es2 aes,2 aes'2 g r
  g,2 e'2. a,4. a8 a4 f'2 d4 d es2 aes,2 aes'2 g1\fermata


  R1*4
  g,2 d'1 c2 ees2. ees4 f f g f bes,1 a2
  r4 d4 c c bes2 bes c2. aes4 aes'4. g8 f4 g d2 g,2 r
  r4 f'4 f f e4 a,2 d d4 c4. bes16 a bes4 c d1 a2
  r4 g c bes aes2 f g r
  R1
  r4 g'4 g g d2 g,2 ees'2. d4
  r bes4 c2 d c4 bes a2 bes g4 g a2 d g,4. a8 bes c d4 r2
  d2 ees4 g f ees d2
  R1 r2 ees2 c4 c d2 g,4. a8 bes c d4 r2
  d2 ees4 g f ees d2 r r bes g4 g a2 d bes g4 g d'2 d\breve*1/2
  

}
  

textBass = \lyricmode {
  Mia be -- ni -- gna for -- tu -- na
  e’l vi -- ver lie -- _ _ to
  e’l vi -- ver lie -- to
  I chia -- ri gior -- ni e le tran -- quil -- le not -- _ ti
  E~i so -- a -- vi so -- spi -- ri e’l dol -- ce sti -- le
  Che so -- lea re -- so -- na -- re~in ver -- si~e ri -- me,
  Vol -- ti su -- bi -- ta -- men -- te in do -- glia~e’n pian -- to
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- _ te
  O -- diar vi -- ta mi -- fan -- no~e bra -- mar mor -- _ te

  Cru -- de -- le,~a -- cer -- ba,~in -- e -- so -- ra -- bil Mor -- te
Ca -- gion mi dài di mai non es -- _ _ ser lie -- to
Ma di me -- nar  tut -- ta mia vi -- _ _ _ ta~in pian -- to
E~i gior -- ni~o -- scu -- _ ri e le do -- glio -- se not -- ti;
I mei gra -- vi so -- spir
non van -- no~in ri --  _  me, __ _ _ _ _
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti -- le,  __ _ _ _ _
E’l mio du -- ro mar -- tir,
vin -- ce~og -- ni sti -- le,
vin -- ce~og -- ni sti -- le.
}




 
  \score {
  <<
    \new StaffGroup <<
      \new Voice = "sop" \melSop
      \new Lyrics \lyricsto "sop" \textSop
      \new Voice = "alt" \melAlt
      \new Lyrics \lyricsto "alt" \textAlt
      \new Voice = "ten" \melTenor
      \new Lyrics \lyricsto "ten" \textTenor
      \new Voice = "bas" \melBass
    >>
      \new Lyrics \lyricsto "bas" \textBass
  >>
  \layout { indent = 0\cm
          ragged-last = ##t
			\context {
			  \Voice
			  \remove "Forbid_line_break_engraver"
			  }
  }
}
                                %for midi
  \score {
	<<
      \context Voice = "mdsop"  \melSop 
      \new Lyrics \lyricsto "mdsop" \textSop
      \new Voice = "alt" << \melAlt \\ \dynamics >>
      \new Voice = "ten" << \melTenor \\ \dynamics >>
      \new Voice = "bas" << \melBass  \\ \dynamics >>
	  >>
          \midi {}
}