\version "2.18.0"

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

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

htitle="Andarán siempre mis ojos"
hcomposer="Anónimo"

\header {
	title=\markup{\fontsize #3 "8. Andarán siempre mis ojos"}
	subtitle="Cancionero de Uppsala"
	subsubtitle=\markup{\null \vspace #1 }
	composer="Anónimo" % letra de gabriel mena?
        pdfauthor=\composer
	%opus="(-)"
	poet=\markup{"Venecia 1556"}
	copyright=\markup{
		\fill-line {"Transcribed and edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
	tagline=""
}

global={\key c \major \time 2/2 \skip 1*16 \bar ".|:-||" \break
	\skip 1*12 \bar ":|."
}


cantus=\relative c'{
        R1
        g'4 g a2
        e4 g2 f4
        g4 c, d2
        c r4 g'4 ~
        g g4 a c4 ~
        c4 b8 a b4 a
        g2 f2
        e r4 g
        g4. f8 e4 d
        c f e c
        d2 c4 g'
        g4. f8 e4 d
        c f e d4 ~
        d8 c8 c2 b4
        c\breve*1/2
        \override Score.RehearsalMark.self-alignment-X=#right
        \override Score.RehearsalMark.break-visibility = #'#(#t #t #f)
	\mark \markup{"Fin"}
	% aqui cambia de clave a c2
        c'4 c b2
        a4 g2 f8 e
        f4 c8[ d e f] g4 ~
        g8 e8 f4 e d
        c4 b a2
        g4 g'2 e4
        f g c, g' % cambia otra vez a c1
        a b c b4 ~
        b8 a8 g2 f4 % \ss gis??
        g e f g
        c,2 d
        c\breve*1/2
	\mark \markup{"D.C."}
}

altus=\relative c''{
	g4 g a2
	e4 g2 f4
	g4 c, b4 d ~
	d8 c c2 b4
	c1
	r4 c2 c4
	d4 e d f ~
	f8 \noBeam e e2 d4
	e g g4. f8
	e4 d c f
	e d4. c8 c4 ~
	c b c2
	r4 g' g4. f8
	e4 d c f
	e c d2
	c\breve*1/2
	% aquí cambia de clave a c3
	R1
	c4 c b2
	a g4. a8
	b c d4 g, b
	a4 g2 \ss fis4
	g1
	r4 g'2 e4
	f g c, d4 ~
	d b c d
	g, c d e4 ~
	e8 d c2 b4
	c\breve*1/2
}

textocantus=\lyricmode{
An -- da -- rán siem -- pre __ _ _ mis o -- jos 
por la glo -- ria en __ _ _ que se vie -- ron
llo -- ran -- _ do pues la per -- die -- _ _ ron,
\italicas
llo -- ran -- _ do pues la per -- die -- _ _ _ _ ron.
% hay un ij mas
\rectas
Llo -- ra -- rán en con -- tem -- _ plar, __ _ _ _ _ _ _ _ _ 
\italicas
en con -- tem -- plar, __ _ 
\rectas
que el tiem -- _ po que la go -- za -- _ _ _ _ ban,
\italicas %no
que la go -- za -- _ ban,
}
textocantusb=\lyricmode{
Se -- a tan -- to su __ _ _ llo -- rar __ _ 
por el bien __ _ en __ _ _ que se vie -- ron
que çie -- _ guen pues la per -- die -- _ _ ron,
\italicas
que çie -- _ guen pues la per -- die -- _ _ _ _ ron.
\rectas
cuan -- to de pla -- cer llo -- _ ra -- ban, __ _ _ _ _ _ _ % cuando
\italicas de pla -- cer llo -- ra -- ban,
\rectas
tan -- to llo -- _ ran de pe -- _ sar __ _ _ _ _ _ 
\italicas %no
de __ _ _ pe -- _ sar.
}

textoaltus=\lyricmode{
An -- da -- rán siem -- pre mis o -- jos,
\italicas %no
mis o -- _ _ _ jos
\rectas
por la glo -- ria en que se vie -- _ ron,
llo -- ran -- _ do pues la per -- die -- _ _ _ _ ron
\italicas
llo -- ran -- _ do pues la per -- die -- _ _ ron.
% hay un ij mas
\rectas
Llo -- ra -- rán en con -- _ tem -- _ plar,
\italicas %no
en con -- tem -- plar __ _ _ 
\rectas
que el tiem -- _ po que la go -- za -- ban,
\italicas %no
que la go -- _ za -- _ ban,
}
textoaltusb=\lyricmode{
Se -- a tan -- to su llo -- rar, __ _ 
\italicas %no
su llo -- _ _ _ rar
\rectas
por el bien __ _ en que se vie -- _ ron,
que çie -- _ guen pues la per -- die -- _ _ _ _ ron
\italicas
que çie -- _ guen pues la per -- die -- _ _ ron.
\rectas
cuan -- to de pla -- cer __ _ llo -- _ ra -- ban,
\italicas llo -- ra -- _ _ ban %no
\rectas
tan -- to llo -- _ ran de pe -- _ _ sar,
\italicas %no
de __ _ _ _ pe -- _ sar.
}

incipitcantus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Cantus "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c1" % luego cambia a c2
		\key c \major
		\time 4/4
                g'2
		} 

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

incipitaltus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Altus   "
		\override NoteHead.style = #'neomensural 
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-c2" % luego cambia a c3
		\key c \major
		\time 4/4
                g'2
		} 
	\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 Lyrics \lyricsto "v1" {\textocantusb }
	>>

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

	} % transpose

\layout{ 
	\context {\Lyrics 
		\override VerticalAxisGroup.staff-affinity = #UP
		\override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
			#'((basic-distance . 0) (minimum-distance . 0) (padding . 1.5))
		%\override VerticalAxisGroup.nonstaff-nonstaff-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 . 12) (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=5
	page-count = 1
	ragged-last-bottom = ##f
	indent=3.1\cm
	system-system-spacing =
	#'((basic-distance . 19) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 8) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 17) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #2
}