\version "2.18.0"

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

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}
letrachica=\override LyricText.font-size=#-1
letragrande=\revert LyricText.font-size

htitle="Si no os hubiera mirado"
hcomposer="Anónimo"

\header {
	title=\markup{\fontsize #3 "13. Si no os hubiera mirado"}
	subtitle="Cancionero de Uppsala"
	subsubtitle=\markup{\null \vspace #3 }
	composer=\markup{\right-column{"Anónimo" "Texto: Juan Boscán (1492-1542)"}}
        pdfauthor=\composer
	% atribuido a Morales o a Juan Vasquez
	%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*27 \bar ".|:-||" \break
        \skip 1*12 \bar ":|."
}


altus=\relative c{
	e2 a ~
	a4 a g2
	a4 c2 b8 a
	b2 a
	r4 c d e ~
	e8 d c b a2
	R1
	r4 e'2 e4
	d c r2
	r r4 e ~
	e e d c ~
	c8[ b] g[ a b c] d4 ~
	d8 \noBeam c c2 b4
	c1
	R1*2
	r4 e e d
	f4. e8 d4 c ~
	c b8 a b2
	b4 b a c
	b a2 \ss gis4
	a4 c c b
	d2 c
	r4 e e d
	f2 e
	d4 c b2
	a\breve*1/2
	\override Score.RehearsalMark.self-alignment-X=#right
	\override Score.RehearsalMark.break-visibility=#'#(#t #t #f)
	\mark \markup{"Fin"}
	R1*2
	e'2. e4
	d b c2
	c d4 e 
	d b c4. c8
	d2 c
	r4 e2 d4
	f2 e
	d4 c b2
	a4 c2 b8 a
	b\breve*1/2
	\mark \markup{"D.C"}
}

tenor=\relative c{
	R1
	r2 e
	a2. a4
	g2 a4 c ~
	c b8 a b4. a8
	c2 r4 f,
	g a2 \ss gis4
	a1
	r2 e'2
	e4 d c2
	r2 r4 e4 ~
	e e d b
	c4. c8 d2
	c2 r4 c
	c b a c
	b a2 \ss gis4
	a4 c c b
	d4. c8 b4 a4 ~
	a \ss gis8 \ss fis gis2
	R1*2
	r4 e' e d
	f2 e
	r4 c c b
	d2 c
	b4 a2 \ss gis4
	a\breve*1/2
	r2 e' ~
	e4 e d b
	c4. c8 b4 g8 a
	b c d e f4 e ~
	e d8 \noBeam c b4 c
	b d4. c8 c4 ~
	c b c2
	r4 c2 b4
	d2 c4 c
	b a2 \ss gis4
	a2. \ss gis8 \ss fis
	gis\breve*1/2
}

bassus=\relative c{
	R1*3
	e2 a ~
	a4 a g2
	a4 e f8 e d c
	b4 a b2
	a1
	r4 a'2 a4
	g f a2
	a4 g f a ~
	a8 g e f g2
	a2 g
	r2 r4 e
	e d f4. e8
	d4 c b2
	a2 r
	R1
	r2 r4 e'
	e4 d f4. e8
	d4 c b2
	a r
	r r4 a4 ~
	a8[ b] c[ d e f] g4
	d8 e f g a4 e
	g4 a e2
	a,\breve*1/2
	a'2. a4
	g e g4. g8
	a2 e
	r2 a ~
	a4 a g e
	g4. g8 a2
	g r4 a4 ~
	a8 \noBeam g8 a4 e g
	d8 e f g a4 a,
	b c d e
	f1 % parece ligada con la siguiente
	e\breve*1/2
}

%{
Si no os hubiera mirado,
no penara,
pero tampoco os mirara.

Veros harto mal ha sido,
mas no veros peor fuera.
No quedara tan perdido,
pero mucho más perdiera.

¿Qué viera aquél que no os viera?
¿Cuál quedara,
señora, si no os mirara?

[Los 2 versos iniciales son anteriores a Boscán]
%}

% el original pone "duo" pero es un trío
textoaltus=\lyricmode{
Si n'os hu -- bie -- ra mi -- _ _ ra -- do
\italicas % no en original
mi -- ra -- do __ _ _ _ _
\rectas
no pe -- na -- ra
no pe -- na -- ra, __ _
\italicas
no __ _ _ _ _ pe -- na -- _ ra
\rectas
pe -- ro tam -- po -- c'os mi -- ra -- _ _ ra, % tan poco
\italicas
pe -- ro tam -- po -- c'os mi -- ra -- ra,
\rectas
pe -- ro tam -- po -- co
pe -- ro tam -- po -- co os mi -- ra -- ra.
Ve -- ros har -- to mal ha si -- _ _ _ do,
\italicas % no
ha si -- do
\rectas
mas no ve -- ros pe -- or fue -- _ _ _ _ ra.
}
textoaltusb=\lyricmode{
Qué vie -- ra~a -- quél que n'os __ _ _ vie -- ra
\italicas % no
n'os vie -- ra? __ _ _ _ _ 
\rectas
\letrachica
% en las demás voces no aparece este verso, creo que es mejor quitarlo
cuál que -- da -- ra
cuál que -- da -- ra, __ _ 
\italicas
cuál __ _ _ _ _  que -- da -- _ ra
\rectas
% este verso no viene en el original, en ninguna voz:
\italicas
[se -- ño -- ra si n'os mi -- ra -- _ _ ra,
se -- ño -- ra si n'os mi -- ra -- ra,
se -- ño -- ra si no
se -- ño -- ra si no os mi -- ra -- ra?]
\letragrande
\rectas
No que -- da -- ra tan per -- di -- _ _ _ do,
\italicas % no
per -- di -- do
\rectas
pe -- ro mu -- cho más per -- die -- _ _ _ _ ra.
}

textotenor=\lyricmode{
Si n'os hu -- bie -- ra mi -- _ _ ra -- _ do
\italicas % no
mi -- ra -- _ _ do
\rectas
no pe -- na -- ra
no pe -- na -- ra,
\italicas
no pe -- na -- ra
\rectas
pe -- ro tam -- po -- c'os mi -- ra -- _ ra,
pe -- ro tam -- po -- c'os mi -- ra -- _ _ ra
pe -- ro tam -- po -- co
pe -- ro tam -- po -- c'os mi -- ra -- _ ra.
Ve -- ros har -- to mal ha si -- do, __ _ _ _ _ _ 
\italicas % no
ve -- ros har -- to mal ha si -- _ _ _ _ do
\rectas
mas no ve -- ros pe -- or fue -- _ _ _ _ ra.
}
textotenorb=\lyricmode{
Qué vie -- ra~a -- quél que n'os __ _ _ vie -- _ ra
\italicas
n'os vie -- _ _ ra?
\rectas
\letrachica
\italicas
[cuál que -- da -- ra
cuál que -- da -- ra,
cuál que -- da -- ra
se -- ño -- ra si n'os mi -- ra -- _ ra,
se -- ño -- ra si n'os mi -- ra -- _ _ ra
se -- ño -- ra si no
se -- ño -- ra si n'os mi -- ra -- _ ra?]
\letragrande
\rectas
No que -- da -- ra tan per -- di -- do, __ _ _ _ _ _ 
\italicas
no que -- da -- ra tan per -- di -- _ _ _ _ do
\rectas
pe -- ro mu -- cho más per -- die -- _ _ _ _ ra.
}

textobassus=\lyricmode{
Si n'os hu -- bie -- ra mi -- ra -- _ _ _ _ _ _ do
no pe -- na -- ra,
no pe -- na -- ra,
\italicas
no __ _ _ _ pe -- na -- ra
\rectas
pe -- ro tam -- po -- co os mi -- ra -- ra
pe -- ro tam -- po -- co os mi -- ra -- ra
pe -- _ ro __ _ _ _ _ tam -- _ _ _ _ po -- co's mi -- ra -- ra.
Ve -- ros har -- to mal ha si -- do
ve -- ros har -- to mal ha si -- do
mas no ve -- ros pe -- or __ _ _ _ fue -- ra,
\italicas
pe -- _ _ or fue -- ra.
}
textobassusb=\lyricmode{
Qué vie -- ra~a -- quél que n'os vie -- _ _ _ _ _ _ ra?
\letrachica
\italicas
[cuál que -- da -- ra,
cuál que -- da -- ra,
cuál __ _ _ _ que -- da -- ra
se -- ño -- ra si __ _ no's mi -- ra -- ra
se -- ño -- ra si __ _ no's mi -- ra -- ra
se -- _ ño -- _ _ _ _ ra __ _ _ _ _ si no's mi -- ra -- ra?]
\letragrande
\rectas
No que -- da -- ra tan per -- di -- do
no que -- da -- ra tan per -- di -- do
pe -- ro mu -- cho más per -- _ _ _ die -- ra,
\italicas
mu -- cho más per -- die -- ra.
}


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


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

incipitbassus=\markup{
	\score{
		{ 
		\set Staff.instrumentName="Bassus    "
		\override NoteHead.style = #'neomensural
		\override Staff.TimeSignature.style = #'neomensural
		\cadenzaOn 
		\clef "petrucci-f4"
		\key c \major
		\time 4/4
                e1
		} 
	\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="v2" {
		\set Staff.instrumentName=\incipitaltus
		\clef "G_8"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	\new Lyrics \lyricsto "v2" {\textoaltusb }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName=\incipittenor
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	\new Lyrics \lyricsto "v3" {\textotenorb }
	>>

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

	} % 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
	ragged-last-bottom = ##f
	indent=3.6\cm
	system-system-spacing =
	#'((basic-distance . 20) (minimum-distance . 0) (padding . 5))
	top-system-spacing = % header
	#'((basic-distance . 8) (minimum-distance . 0) (padding . 0))
	last-bottom-spacing = % footer
	#'((basic-distance . 12) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}