\version "2.18.0"

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

italicas=\override LyricText.font-shape = #'italic
rectas=\override LyricText.font-shape = #'upright
ss=\once \set suggestAccidentals = ##t
mtempo={\tempo 4 = 90}
mtempob={\tempo 4 = 45}
pfermata=\markup{\hspace #-1.5 \concat{"(" \musicglyph #"scripts.ufermata" ")"}}


htitle="Serenísima una noche"
hcomposer="Fray Jerónimo"

\header {
	title=\markup{\fontsize #3 "Serenísima una noche"}
	subtitle="Villancico"
%	subsubtitle=\markup{\null \vspace #1 }
	composer=\markup{\right-column{"Fray Jerónimo González de Mendoza" "(siglo XVII)"}} % (floreciendo entre 1633 y 1662)
        pdfauthor=\composer
	%opus="(-)"
	poet=\markup{\raise #-1 "Puebla (México)" } % Convento de la Santísima Trinidad
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
%	tagline=""
}

global={\key d \major \time 6/8
        \partial 4. \skip 4.
        \skip 1*6/8*8
        \bar ":|."
        \skip 1*6/8*26
        \bar "|."
        \override Score.RehearsalMark.self-alignment-X=#right
        \mark \markup "D.C."
}

% He quitado todos los matices que imagino que son de la edición de Robert Stevenson

% Parece que hay una nueva transcripción en la revista Heterofonía, nº 141


cantus=\relative c''{
	\dynamicUp
	r8 a a
	d8. d16 d4 d4 ~
	d8 d d d4 e8
	e8 d cis cis b4
	cis4. r8 cis cis
	d4 cis8 b8. ais16 b8 ~
	b8 ais4 b8 cis4
	d8 e4 fis8 d4
	d8( cis4) d4.^\pfermata
	r8 fis,8 g a4 a8
	r8 fis g a4 a8
	r8 a8 a a4 a8
	r8 a a b8. b16 b8
	fis a a g8. g16 d'8
	b8 cis dis e8. e16 b8
	b8 a a a8. a16 a8
	b a a a4 a8
	r8 cis cis d4 d8
	r8 a a a8. a16 a8
	a8 a a fis8. fis16 b8
	b8 a a gis4 gis8 
	r4. r4 e'8
	e d d cis8. cis16 d8
	e8 cis cis d d b
	b d d e8. e16 a,8
	a a a a4 a8
	R1*6/8*2
	r8 a a d4 d8
	r8 a a d4 d8
	r8 fis, g a8. b16 a8
	a g g fis fis d'
	d8 c c b b e
	e d d
	cis8. cis16 d8 % c ?
	d8 cis cis d8.[ cis16] d8 % cis! ?
}

altus=\relative c'{
	\dynamicUp
	r8 d e
	fis8. fis16 fis4 g ~
	g8 fis fis fis4 e8
	e fis a a gis4
	a4. r8 a a
	a4 a8 fis8. fis16 d8
	e fis4 d8 a'4
	a8 b4 cis8 b4
	a4. a^\pfermata
	r8 a g fis4 d8
	r8 a' g fis4 d8
	r8 e e fis8. fis16 fis8
	fis8 e e d8. d16 fis8
	d8 e fis d8. d16 g8
	b8 a a g8. g16 g8
	g fis fis e8. e16 fis8
	fis e e fis8.[ e16] fis8
	r8 e e fis4 fis8
	r8 e e fis8. fis16 fis8
	fis8 e e d8. d16 d8
	d fis fis b,4 b8
	r4. r4 a'8
	a fis b b8. ais16 b8
	b8 b ais b b g
	g a a g8. g16 fis8
	fis e e fis8.[ e16] fis8
	r8 fis g a4 a8
	r8 fis g a4 a8
	R1*6/8*2
	r8 d, e fis8. g16 fis8 % fis16 ?
	fis8 fis e d d fis
	fis a a g8 g g
	g8 a b a8. g16 fis8
	e8 e e fis8.[ e16] fis8
}

tenor=\relative c'{
	\dynamicUp
	r8 fis e
	d8. d16 b4 b ~
	b8 b b d4 b8
	b d e e e4
	e4. r8 e e
	fis4 e8 d8. cis16 b8 ~
	b cis4 d8 e4
	fis8 g4 a8 g[ fis]
	e4. fis^\pfermata
	r8 d e fis4 fis8
	r8 d e fis4 fis8
	r8 d cis d8. d16 d8
	d e e fis8. fis16 d8
	d d c c8. c16 b8
	d fis fis g8. g16 e8
	e d d d8. cis16 d8
	d d cis d8.[ cis16] d8
	r8 e e b4 b8
	r8 cis cis d8. d16 d8
	d8 d cis b8. b16 b8
	d8 d d e8. e16 e8
	g8 fis e e8. d16 cis8
	cis b fis' fis8. fis16 fis8
	g8 fis fis fis g g
	d d d d8. cis16 d8
	d d cis d8.[ cis16] d8
	r8 d e fis4 fis8
	r8 d e fis4 fis8
	r8 fis fis fis4 fis8
	r8 fis fis fis4 fis8
	s4*0^\markup{\hspace #-3 "[Tacet]"} %notablet
	R1*6/8*5
}

bassus=\relative c{
	\dynamicUp
	r8 d a'
	d,8. d16 d'4 g, ~
	g8 d' d b4 g8
	g b a a e4
	a4. r8 a a
	d4 a8 b8. fis16 g8 ~
	g fis4 b8 a4
	d8 g,4 fis8 g4
	a4. d,^\pfermata
	r8 d d d'4 d8
	r8 d, d d'4 d8
	r8 a a d8. d16 d8
	d8 cis cis b8. b16 b8
	b a a g8. g16 g8
	g8 fis fis e8. e16 e8
	e fis g a8. a16 d,8
	g8 a a d,8.[ a16] d8
	r8 a' a d4 d8
	r8 a a d8. d16 d8
	d8 a a b8. b16 g8
	g fis fis e8. e16 e8
	e8 fis g a8. a16 a8
	a8 b b fis8. fis16 b8
	e,8 fis fis b g g
	g fis fis e8. e16 d8
	d a' a d,8.[ a16] d8
	d4. d
	d d
	d d
	d d
	d d ~
	d8 g4 d4. ~
	d g4 e8 % fis8 ?
	e8 fis g a8. a16 d,8
	g8 a a d,8.[ a16] d8
}

% hay 10 letras en total 

textocantus=\lyricmode{
Se -- re -- ní -- si -- ma~u -- na
no -- che
más que si fue -- ra~un in -- fan -- te
en lo cres -- po de di -- ciem -- bre
qui -- so
por di -- cha~es -- tre -- llar -- se.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do 
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
}

textoaltus=\lyricmode{
Se -- re -- ní -- si -- ma~u -- na
no -- che
más que si fue -- ra~un in -- fan -- te
en lo cres -- po de di -- ciem -- _ bre
qui -- so
por di -- cha~es -- tre -- llar -- se.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do,
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do 
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
}

textotenor=\lyricmode{
Se -- re -- ní -- si -- ma~u -- na
no -- che
más que si fue -- ra~un in -- fan -- te
en lo cres -- po de di -- ciem -- bre
qui -- so
por di -- cha~es -- tre -- llar -- se.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do,
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
}

textobassus=\lyricmode{
Se -- re -- ní -- si -- ma~u -- na
no -- che
más que si fue -- ra~un in -- fan -- te
en lo cres -- po de di -- ciem -- bre
qui -- so
por di -- cha~es -- tre -- llar -- se.
An -- de~el bai -- le
an -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do,
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de~el bai -- le
an -- de~el bai -- le
y~al sol que~ha na -- ci -- do
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men,
por Dios ver -- da -- de -- ro
hoy to -- dos le~a -- cla -- men.
An -- de,
an -- de,
an -- de,
an -- de,
an -- de~el bai -- le,
an -- de,~an -- de,
an -- de~el bai -- le
hoy to -- dos le~a -- cla -- men.
}



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

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

	\new Staff <<\global
	\new Voice="v2" {
		\set Staff.instrumentName="Alto "
		\clef "treble"
		\altus }
	\new Lyrics \lyricsto "v2" {\textoaltus }
	>>
	
	\new Staff <<\global
	\new Voice="v3" {
		\set Staff.instrumentName="Tenor "
		\clef "G_8"
		\tenor }
	\new Lyrics \lyricsto "v3" {\textotenor }
	>>

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName="Bajo "
		\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 %notablet
                %\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.7\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 . 14) (minimum-distance . 0) (padding . 0))
	markup-system-spacing.padding = #1.5
}