\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.4)
#(ly:set-option 'point-and-click #f)
%mobile -s14.4 -i3.0

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
incipitwidth = 20
mtempo={\tempo 4 = 100}
mtempob={\tempo 4 = 50}

htitle="Sestina 1 - Incenerite spoglie"
hcomposer="Monteverdi"

\header {
	title=\markup{\fontsize #3 "1. Incenerite spoglie"}
	subtitle="Sestina"
	subsubtitle=\markup{\column {"Lagrime d'Amante al sepolcro dell'Amata" }}
	composer="Claudio Monteverdi (1567-1643)"
        pdfauthor=\composer
	%opus="(-)"
	poet=\markup{\smaller "Il sesto libro de madrigali, 1614"} % Venecia, Ricciardo Amadino
	%poet=\markup{"Scipione Agnelli (1586-1653)"}
	copyright=\markup{
		\fill-line {"Transcribed and edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}


% no incluyo la parte del continuo
% "Con is suo Basso continuo per poterli concertare nel Clavacembano, et altri Stromenti"
% es básicamente un basso seguente, con unas pocas indicaciones de cifrado


global={\key c \major \time 4/4  \skip 1*50 \bar "|."
}

cantus={
	R1*4/4
	r2 f' ~
	f'4 f'8 f' f'4. f'8
	f'2 f'
%5
	r r4 fis'
	g'4. g'8 a'2 ~
	a' a' ~
	a' r
	a'4 a'8 a' a'4 b'
%10
	c''4. c''8 c''4 c''
	d''1
	cis''
	R1*4/4
	R1*4/4
%15
	r2 r4 e'' ~
	e''2 a' ~
	a' gis'
	 r4 e'' c''2
	b' r4 b'
%20
	e'4. e'8 e'4 d'
	c'2 c'4 e'
	c'4. c'8 c'4 c'
	b b b2
	a r4 a'
%25
	a'2 a'4 a'8 a'
	a'2 a'
	a'4 a' a'2
	g' r8 b' b' c''
	d''4 d'' d''4. d''8
%30
	d''4 c''  c'' b'
	c'' r8 e'' d''4. c''8
	e''2 ~ e''8 e'' e''  d''
	c''4. b'8  b'2
	a'4 r8 a' g'4. f'8
%35
	a'2 ~ a'8 a' a' g'
	f'4. e'8 e'2
	fis' r
	R1*4/4
	r4 d'' c''4.  b'8
%40
	d''2 ~ d''8 d'' d'' c''
	b'4. g'8 a'2
	g' r
	R1*4/4
	r4 r8 c'' b'4. a'8
%45
	c''2 ~ c''8 c'' c'' b'
	a'4 a' b'2
	e'8 a' g'8. fis'16 a'2 ~
	a'8 a' a' g' f'4  f'
	e'1
%50
	fis'\breve*1/2 
}

cantusdos={
	R1*4/4
	r2 d' ~
	d'4 d'8 d' d'4. d'8
	d'2 d'
%5
	r r4 d'
	d'4. e'8 fis'2 ~
	fis' fis' ~
	fis' r
	\ss f'!4 f'8 f' f'4 f'
%10
	a'4. a'8 a'4 a'
	f'2 g'
	a'1
	r4 a' f'2
	e'1
%15
	r4 a' f' e' ~
	e'  d'8[ c'] d'2
	e' r4 e'
	c'4. c'8 c'4 a
	b2. b4
%20
	b1
	a2 r
	R1*4/4
	R1*4/4
	R1*4/4
%25
	r4 f' f'2
	f'4 f'8 f' f'4. f'8
	e' f' g'2 fis'4
	g'2 r8 d'' d'' c''
	b'4 b' b'4. b'8
%30
	b'4 a'  d''2
	c''4 r8 c'' b'4. a'8
	c''2 ~ c''8 c'' c''  b'
	b'4 a'  a'4. gis'8
	a'2 r8 e' e' d'
%35
	cis'4 cis' cis'4. cis'8
	cis'4 b e'2
	d' r
	R1*4/4
	r4 b' a'4.  g'8
%40
	b'2 ~ b'8 b' b' c''
	d''4. b'8 c''2
	b' r
	r r8 c'' b'8. a'16
	c''4 c'' r2
%45
	R1*4/4
	r4 a' gis'4. fis'8
	a'2 ~ a'8 a' a' g'
	f'4 e'2  d'4 ~
	d'  cis'8[ b] cis'2
%50
	d'\breve*1/2
}

altus={
	R1*4/4
	R1*4/4
	a2. a8 a
	a4. a8 a4 a
%5
	r2 r4 a
	bes4. bes8 a2 ~
	a a
	R1*4/4
	a4 a8 a a4 d'
%10
	e'4. e'8 e'4 f'
	d'1
	e'2. e'4
	a1 ~
	a2 gis
%15
	r c'
	a2. b4
	c'2 b
	 r r4 a
	e4. e8 e4 e
%20
	e2 e ~
	e4 e' a4. a8
	a2. a4
	gis4. gis8 gis2
	a1
%25
	r4 d' d'2
	d'4 d'8 d' d'4. d'8
	cis'4 cis' d'2
	g r
	R1*4/4
%30
	R1*4/4
	R1*4/4
	R1*4/4
	R1*4/4
	r2 r8 cis' cis' d'
%35
	e'4 e' e'4. e'8
	e'4 d' d' cis'
	d' r8 d' c'4. b8
	d'2 ~ d'8 d' d' c'
	b4. c'8  a8.[ b16]  c'4
%40
	b1
	R1*4/4
	r8 e' d'8. c'16 e'8. e'16 e'8 f'
	g'4 e' f'2
	e' r
%45
	r8 c' b8. a16 c'8. c'16 c'8 d'
	e'4 c' d'2
	e' r8 e' e' d'
	d'4 cis'  a2 ~
	a1
%50
	a\breve*1/2
}

tenor={
	a2. a8 a
	a4. a8 a2
	a r
	r4 a d4. d8
%5
	a2 a
	R1*4/4
	R1*4/4
	a4 a8 a a4 a
	d'2. d'4
%10
	c'2. c'4
	bes4. c'8 d'2
	a1
	r4 e' c'2
	b2. e'4 
%15
	a1 ~
	a
	e ~
	 e
	R1*4/4
%20
	r2 r4 b
	e4. e8 e4 e
	e2. e4
	e1
	e
%25
	R1*4/4
	R1*4/4
	R1*4/4
	r4 g g2
	g4 g8 g g4. g8
%30
	fis4 fis  g2
	c r
	R1*4/4
	R1*4/4
	r4 a a2
%35
	a4 a8 a a4. a8
	g4 g a2
	d r8 fis fis g
	a4 a a4. a8
	a4 g g  fis
%40
	g2 r
	r4 b a4. g8
	b2 ~ b8 b b a
	c'4 g a  g8[ f]
	g4 r8 g fis4. e8
%45
	g2 ~ g8 g g f
	e4 e b b
	r8 c' b8. a16 c'8. c'16 c'8 b
	a2.  d4
	e1
%50
	d\breve*1/2
}

bassus={
	R1*4/4
	r2 d ~
	d4 d8 d d4. d8
	d2 d
%5
	r r4 d
	g,4. g,8 d2 ~
	d d ~
	d r
	d4 d8 d d4 d
%10
	a4. a8 a4 a
	bes1
	a
	R1*4/4
	R1*4/4
%15
	r2 a 
	f1
	e2 r4 e
	a,4. a,8 a,4 a,
	gis,1 ~
%20
	gis,
	a, ~
	a,
	e,
	a,
%25
	R1*4/4
	R1*4/4
	R1*4/4
	R1*4/4
	R1*4/4
%30
	R1*4/4
	r4 e e2
	e4 e8 e e4.  e8
	d4 d e2
	 a,1
%35
	R1*4/4
	R1*4/4
	r2 r8 a a g
	fis4 fis fis4. fis8
	g4 g  a2
%40
	g r
	r4 g fis4. e8
	g2 ~ g8 g g f
	e4. d8 d2
	c4 r8 e d4. c8
%45
	e2 ~ e8 e e d
	c2 b,
	a,1 ~
	a, ~
	 a,
%50
	d\breve*1/2
}

textocantus=\lyricmode{
In -- _ ce -- ne -- ri -- te spo -- glie
a -- va -- ra tom -- _ ba _
Fat -- ta del mio bel sol ter -- re -- no cie -- lo.
Ahi _ las -- _ so
\italicas ahi las -- so \rectas
i' ve -- gno~ad in -- chi -- nar -- vi, 
\italicas i' ve -- gno~ad in -- chi -- nar -- \rectas vi~in ter -- ra! % vi italicas
Con voi chius' è~il mio cor a -- mar -- mi~in se -- no % e'l mio cor'
E not -- te~e gior -- no vi -- ve~in
pian -- to~in fo -- _ co
In duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co 
\italicas 
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co
\rectas
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co, 
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co.
}

textocantusdos=\lyricmode{
In -- _ ce -- ne -- ri -- te spo -- glie
a -- va -- ra tom -- _ ba _
Fat -- ta del mio bel sol ter -- re -- no cie -- _ lo.
Ahi las -- so
ahi las -- _ _ _ _ _ so
i' ve -- gno~ad in -- chi -- nar -- vi~in ter -- ra!
Con voi chius' è~il mio cor a -- mar -- mi~in se -- _ no
E not -- te~e gior -- no vi -- ve~in pian -- to~in fo -- co
In duo -- lo~in i -- _ ra~il tor -- men -- ta -- to Glau -- _ co
e not -- te~e gior -- no vi -- ve~in pian -- to~in fo -- co
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co
in duol' in i -- ra
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- _ _ _ _ co.
}

textoaltus=\lyricmode{
In -- ce -- ne -- ri -- te spo -- glie
a -- va -- ra tom -- _ ba
Fat -- ta del mio bel sol ter -- re -- no cie -- lo.
Ahi las -- _ so
ahi las -- _ _ so
i' ve -- gno~ad in -- chi -- nar -- vi, _
i' ve -- gno~ad in -- chi -- nar -- vi~in ter -- ra!
Con voi chius' è~il mio cor a -- mar -- mi~in se -- no
E not -- te~e gior -- no vi -- ve~in pian -- to~in fo -- _ co
In duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- _ _ co
\italicas
in duol' in i -- ra~il tor -- men -- ta -- to Glau -- co
\rectas
in duol' in i -- ra~il tor -- men -- ta -- to Glau -- co
il tor -- men -- ta -- to Glau -- _ co.
}

textotenor=\lyricmode{
In -- ce -- ne -- ri -- te spo -- glie a -- va -- ra tom -- ba
Fat -- ta del mio bel sol ter -- re -- no cie -- _ _ lo.
Ahi las -- so,
\italicas ahi las -- _ so _ \rectas
i' ve -- gno~ad in -- chi -- nar -- vi~in ter -- ra!
Con voi chius' è~il mio cor a -- mar -- mi~in se -- no
\italicas
con voi chius' è~il mio cor a -- mar -- mi~in se -- no 
\rectas
E not -- te~e gior -- no vi -- ve~in pian -- to~in fo -- _ co
In duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- _ _ co
\italicas
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co
\rectas
in duol' in i -- ra~il tor -- men -- ta -- to Glau -- co.
}

textobassus=\lyricmode{
In -- _ ce -- ne -- ri -- te spo -- glie 
a -- va -- ra tom -- _ ba _
Fat -- ta del mio bel sol ter -- re -- no cie -- lo.
Ahi las -- so 
i' ve -- gno~ad in -- chi -- nar -- _ vi~in _ ter -- ra!
Con voi chius' è~il mio cor a -- mar -- mi~in se -- no % core
E not -- te~e gior -- no vi -- ve~in pian -- to~in fo -- co
In duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- co
in duol' in i -- _ ra~il tor -- men -- ta -- to Glau -- _ _ co.
}


incipitcantus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Canto   "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c1"
		\key c \major
		\time 4/4
                f'2.
		} 

	\layout { line-width=\incipitwidth indent = 0 }
	}
}

incipitcantusdos=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Quinto  "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c1"
		\key c \major
		\time 4/4
                d'2.
		} 

	\layout { line-width=\incipitwidth indent = 0 }
	}
}

incipitaltus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Alto      "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c3"
		\key c \major
		\time 4/4
                a2.
		} 
	\layout { line-width=\incipitwidth indent = 0 }
	}
}


incipittenor=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Tenore "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c4"
		\key c \major
		\time 4/4
                a2.
		} 
	\layout { line-width=\incipitwidth indent=0 }
	}
}

incipitbassus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Basso   "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-f4"
		\key c \major
		\time 4/4
                d2.
		} 
	\layout { line-width=\incipitwidth indent = 0 }
	}
}

%\layout {
%       \context {\Voice
%               \remove Ligature~bracket_engraver
%               \consists Mensural_ligature~engraver
%       }
%       line-width=\incipitwidth
%       indent = 0
%}

\score {\transpose c' c'{
\new ChoirStaff<<

	\new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName=\incipitcantus
		\clef "treble"
		\cantus }
	\new Lyrics \lyricsto "v1" {\textocantus }
	>>
	
        \new Staff <<\global
	\new Voice="v5" {
		\set Staff.instrumentName=\incipitcantusdos
		\clef "treble"
		\cantusdos }
	\new Lyrics \lyricsto "v5" {\textocantusdos }
	>>
	
	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName=\incipitaltus
		\clef "G_8"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName=\incipittenor
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	>>

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName=\incipitbassus
		\clef "bass"
		\bassus }
	\new Lyrics \lyricsto "v4" {\textobassus }
	>>
	
>>

	} % transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override LyricText.font-size = #1.2
		\override LyricHyphen.minimum-distance = #0.5
	}
	\context {\Score 
		tempoHideNote = ##t
		\override BarNumber.padding = #2 
	}
	\context {\Voice 
		melismaBusyProperties = #'()
		autoBeaming = ##f
	}
	\context {\Staff 
                %\RemoveEmptyStaves
                %\override VerticalAxisGroup.remove-first = ##t
		\override VerticalAxisGroup.staff-staff-spacing =
			#'((basic-distance . 11) (minimum-distance . 0) (padding . 1))
		\consists Ambitus_engraver 
		\override LigatureBracket.padding = #1
	}
}

%\midi { \mtempo }

}


\paper{
	evenHeaderMarkup=\markup  \fill-line { \fromproperty #'page:page-number-string \htitle \hcomposer }
	oddHeaderMarkup= \markup  \fill-line { \on-the-fly #not-first-page \hcomposer \on-the-fly #not-first-page \htitle \on-the-fly #not-first-page \fromproperty #'page:page-number-string }
	%system-count=20
	%page-count = 8
	systems-per-page = 3
	ragged-last-bottom = ##f
	indent=3.4\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 10) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 13) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}