\version "2.18.0"

#(set-default-paper-size "a4")
#(set-global-staff-size 16.7)
#(ly:set-option 'point-and-click #f)
%mobile -s12.5 -i1.0

ss=\once \set suggestAccidentals = ##t

htitle="Más vale trocar"
hcomposer="Encina"


\header {
	title=\markup{\larger \larger \larger \larger "190. Más vale trocar" }
	composer=\markup{"Juan del Encina (c.1469-1530)"}
        pdfauthor=\composer
	subtitle = "Cancionero de Palacio"
	%opus="(-)"
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
	tagline=""
}


global={\key f \major \time 3/4 \partial 4 \skip 4
                \skip 1*3/4*9 \bar "||" \break
		\skip 1*3/4*8 \skip 2 \bar "|."
}

cantus={
	d'4 |
	e' e' f' |
	g'2 g'4 |
	a' a' \ss b' |
%5
	c'' a'2 |
	d''4. c''8 bes' a' |
	g'4 f' g' |
	a'4. g'8 f' e' |
	d'4 e'2 |
%10
	d'2. |
	\override Score.RehearsalMark.break-visibility = #begin-of-line-invisible
	\override Score.RehearsalMark.self-alignment-X = #right
	\mark \markup{"Fin"}
	r2 a'4 |
	a' a' a' |
	bes' g' d'' |
	d'' d'' c'' |
%15
	a'2 
	a'4 |
	a' a' a' |
	bes' g' d'' |
	d'' d'' c'' |
%20
	a'2
	\mark \markup{"D.C."}
}

altus={
	d'4 |
	c' c' d' |
	e'2 e'4 |
	f' f' g' |
%5
	e' f'2 |
	f'2. |
	e'4 d' e' |
	f'4. e'8 d' c' |
	d'2 cis'4 |
%10
	d'2. |
	r2 f'4 |
	f' f' f' |
	f' e' f' |
	f' d' e' |
%15
	f'2
	f'4 |
	f' f' f' |
	f' e' f' |
	f' d' e' |
%20
	f'2
}

tenor={
	a4 |
	a a a |
	c'2 c'4 |
	c' d' d' |
%5
	c' c'2 |
	bes4. c'8 d'4 |
	c' bes c' |
	c' d' a |
	g a2 |
%10
	a2. |
	r2 c'4 |
	c' c' c' |
	d' c' d' |
	d' bes c' |
%15
	c'2
	c'4 |
	c' c' c' |
	d' c' d' |
	d' bes c' |
%20
	c'2
}

bassus={
	d4 |
	a, a, d |
	c2 c4 |
	f d g |
%5
	c f2 |
	bes,4. a,8 bes,4 |
	c d c |
	f d4. a,8 |
	bes,4 a,2 |
%10
	d2. |
	r2 f4 |
	f f f |
	bes, c bes, |
	bes bes a |
%15
	f2 f4 |
	f f f |
	bes, c bes, |
	bes bes a |
%20
	f2
}

textocantus=\lyricmode{
Más va -- le tro -- car pla -- cer por do -- lo -- res
que es -- _ _ tar sin a -- mo -- _ _ _ _ _ res.
Don -- de~es gra -- de -- ci -- do es dul -- ce~el mo -- rir,
vi -- vir en ol -- vi -- do a -- quel no~es vi -- vir.
}
textocantusb=\lyricmode{
Me -- jor es su -- frir pa -- sión y do -- lo -- res
que es -- _ _ tar sin a -- mo -- _ _ _ _ _ res.
Es vi -- da per -- di -- da vi -- vir sin a -- mar,
y más es que vi -- da sa -- ber -- la~em -- ple -- ar.
}
textocantusc=\lyricmode{
Más va -- le pe -- nar su -- frien -- do do -- lo -- res
que es -- _ _ tar sin a -- mo -- _ _ _ _ _ res.
A -- mor que no pe -- na no pi -- da pla -- cer,
pues ya le con -- de -- na su po -- co que -- rer. % lo condena ?
}
textocantusd=\lyricmode{
Me -- jor es per -- der pla -- cer por do -- lo -- res
que es -- _ _ tar sin a -- mo -- _ _ _ _ _ res.
}

textoaltus=\lyricmode{
Más va -- le tro -- car pla -- cer por do -- lo -- res
que~es -- tar sin a -- mo -- _ _ _ _ _ res.
Don -- de~es gra -- de -- ci -- do es dul -- ce~el mo -- rir,
vi -- vir en ol -- vi -- do a -- quel no~es vi -- vir.
}
textoaltusb=\lyricmode{
Me -- jor es su -- frir pa -- sión y do -- lo -- res
que~es -- tar sin a -- mo -- _ _ _ _ _ res.
Es vi -- da per -- di -- da vi -- vir sin a -- mar,
y más es que vi -- da sa -- ber -- la~em -- ple -- ar.
}
textoaltusc=\lyricmode{
Más va -- le pe -- nar su -- frien -- do do -- lo -- res
que~es -- tar sin a -- mo -- _ _ _ _ _ res.
A -- mor que no pe -- na no pi -- da pla -- cer,
pues ya le con -- de -- na su po -- co que -- rer.
}
textoaltusd= \lyricmode{
Me -- jor es per -- der pla -- cer por do -- lo -- res
que~es -- tar sin a -- mo -- _ _ _ _ _ res.
}

textotenor=\lyricmode{
Más va -- le tro -- car pla -- cer por do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
Don -- de~es gra -- de -- ci -- do es dul -- ce~el mo -- rir,
vi -- vir en ol -- vi -- do a -- quel no~es vi -- vir.
}
textotenorb=\lyricmode{
Me -- jor es su -- frir pa -- sión y do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
Es vi -- da per -- di -- da vi -- vir sin a -- mar,
y más es que vi -- da sa -- ber -- la~em -- ple -- ar.
}
textotenorc=\lyricmode{
Más va -- le pe -- nar su -- frien -- do do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
A -- mor que no pe -- na no pi -- da pla -- cer,
pues ya le con -- de -- na su po -- co que -- rer.
}
textotenord=\lyricmode{
Me -- jor es per -- der pla -- cer por do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
}

textobassus=\lyricmode{
Más va -- le tro -- car pla -- cer por do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
Don -- de~es gra -- de -- ci -- do es dul -- ce~el mo -- rir,
vi -- vir en ol -- vi -- do a -- quel no~es vi -- vir.
}
textobassusb=\lyricmode{
Me -- jor es su -- frir pa -- sión y do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
Es vi -- da per -- di -- da vi -- vir sin a -- mar,
y más es que vi -- da sa -- ber -- la~em -- ple -- ar.
}
textobassusc=\lyricmode{
Más va -- le pe -- nar su -- frien -- do do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
A -- mor que no pe -- na no pi -- da pla -- cer,
pues ya le con -- de -- na su po -- co que -- rer. 
}
textobassusd=\lyricmode{
Me -- jor es per -- der pla -- cer por do -- lo -- res
que es -- _ tar sin a -- mo -- _ _ _ _ res.
}


\score {
\new ChoirStaff<<

	\new Staff <<\global
	\new Voice="v1" {
		\set Staff.instrumentName="Cantus " 
		\clef "treble"
		\cantus }
	\new Lyrics \lyricsto "v1" {\textocantus }
	\new Lyrics \lyricsto "v1" {\textocantusb }
	\new Lyrics \lyricsto "v1" {\textocantusc }
	\new Lyrics \lyricsto "v1" {\textocantusd }
	>>

	
	\new Staff << \global
	\new Voice="v2" {
		\set Staff.instrumentName="Altus "
		\clef "treble" 
		\altus}
	\new Lyrics \lyricsto "v2" {\textoaltus }
	\new Lyrics \lyricsto "v2" {\textoaltusb }
	\new Lyrics \lyricsto "v2" {\textoaltusc }
	\new Lyrics \lyricsto "v2" {\textoaltusd }
	>>

	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName="Tenor "
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	\new Lyrics \lyricsto "v3" {\textotenorb }
	\new Lyrics \lyricsto "v3" {\textotenorc }
	\new Lyrics \lyricsto "v3" {\textotenord }
	>>
	

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

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
		\override VerticalAxisGroup.nonstaff-nonstaff-spacing = %notablet
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1.2)) %notablet
		\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
	ragged-last-bottom = ##f
	indent=1.8\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 9) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 16) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}