\version "2.18.0"

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

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


htitle="4. Sanctus de la Missa Brevis en Re menor"
hcomposer="Lotti"

% messa del primo tuono
% valores a la mitad, salvo benedictus, a la cuarta parte
% armadura sin bemol

\header {
	title=\markup{\fontsize #3 "4. Sanctus et Benedictus"}
	subtitle="de la Missa Brevis en Re menor"
	subsubtitle=\markup{\column{" "}}
	composer="Antonio Lotti (1667-1740)"
        pdfauthor=\composer
	%opus="(-)"
	%poet=\markup{}
	copyright=\markup{
		\fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"}
	}
	%tagline=""
}



global =  {\time  2/2 \key c \major  \skip 1*29 \bar "||" \break
           \override Score.TimeSignature.break-visibility = #'#(#f #t #t)
           \time 3/4 \mtempob
           \skip 4*3*26  \bar "|."}

cantus = {
	R1*4
%5
	r4 a'2 g'4 |
	a'8 b' c''4 bes'2 |
	a'4 a'4. g'8 f'4 |
	g' a' bes'4. bes'8 |
	a'4 r r2 |
%10
	R1 |
	r4 a' a' a' |
	g'4. e'8 f'4 g' |
	a'4. g'16 f' e'2 |
	r r4 d'' |
%15
	c'' a' c''2 |
	b'4 a'2 gis'4 |
	a'2. r4 |
	R1 |
	r2 r4 a' |
%20
	bes'4. a'8 g'4 bes' |
	a'4. g'8 f'4 d'' |
	cis''2. r4 |
	R1 |
	r4 a' bes'4. a'8 |
%25
	g'4 bes' a' g' |
	f'4. g'8 a'4. bes'8 |
	a'1 ~ |
	a' |
	a'\breve*1/2 |
%30
	% valores reducidos a 1/4
	R1*3/4*6
	r4 a' a' |
	b' b' b' |
	cis'' a' d'' |
	d'' c'' c'' |
%40
	b'2 a'4 ~ |
	a' gis'2 |
	a'2. ~ |
	a'2 r4 | % en todas las voces 2.
	R1*3/4*4
	a'4 a' a' |
	bes' a'2 |
%50
	g'4. a'8 bes'4 |
	a'2 g'4 |
	f' f' f' | % f'2.
	e' f'2 |
	e'2. |
%55
	fis'\breve*3/8
}



altus = {
	R1*3
	r4 d'2 cis'4 |
%5
	d'8 e' f'4 e'2 |
	d'4 a'2 g'4 |
	f' f'4. e'8 d'4 |
	e' fis' g'4. g'8 |
	f'4 r r2 |
%10
	R1 |
	r4 f' f' f' |
	e'4. cis'8 d'4 d' | % c8 en la otra version
	cis' d' cis'2 |
	r r4 f' |
%15
	e' e' e'2 ~ |
	e'1 |
	e'4 e' f'4. e'8 |
	d'4 f' e' d' |
	cis'8 d' e'4 a2 |
%20
	r4 f' g'4. f'8 |
	e'4 e' f'8 g' a' bes' |
	a'2. r4 |
	R1 |
	r4 e' f' f' |
%25
	g'4. f'8 e'4 cis' |
	d' a'8 g' f'2 |
	e' f'8 e' d'4 ~ |
	d' cis'8 b cis'2 |
	d'\breve*1/2 |
%30
	R1*3/4*4
	r4 d' d' |
%35
	e' e' e' |
	f' d' a' |
	a' g' g' |
	e' f'2 |
	e'2. ~ |
%40
	e' ~ |
	e'2 e'4 |
	e'2. ~ |
	e'2 r4 |
	R1*3/4*3
	e'4 e' e' |
	f'2 e'4 |
	d'4. e'8 f'4 |
%50
	cis'2 d'4 |
	e'4. d'8 cis'4 |
	d' d' d' | % d'2.
	cis' d'2 ~ |
	d'4 cis'2 |
%55
        \mtempo
	d'\breve*3/8
}



tenor = {
	R1 |
	r4 a2 g4 |
	a8 b c'4 bes2 |
	a g |
%5
	f4 d' c'4. bes8 |
	a4 f'2 e'8 d' |
	c'4 c'4. c'8 a4 |
	c' c' d'4. d'8 |
	d'4 d' d' d' |
%10
	c'4. a8 bes4 c' | % b cis
	d'4. c'16 bes a4 d' | % d'4 c'8 bes
	cis'8 b a2 d4 |
	e f8 g a4 cis' |
	cis' e' a4. b8 |
%15
	c'4 c' a a |
	gis a b2 |
	cis' r4 a |
	bes4. a8 g4 bes |
	a4. g8 f e d4 |
%20
	r d' cis'4. d'8 |
	e'4 cis' d' d' |
	r e' f'4. e'8 |
	d'4 f' e' d' |
	cis'2 d'4 d' |
%25
	cis'4. d'8 e'4 e' |
	a f'8 e' d'2 |
	cis'4. b8[ a g] f4 | % bes en la otra edicion
	e1 |
	fis\breve*1/2 |
%30
	R1*3/4*2
	r4 a a |
	b b b |
	cis' a d' |
%35
	d' cis' cis' |
	d'2. ~ |
	d' |
	cis'4 d' b |
	gis a2 |
%40
	gis4 a8 b c'4 |
	b2 b4 |
	cis'2. |
	e'4 e' e' |
	f'2 e'4 |
%45
	d'4. e'8 f'4 |
	e'2 d'4 |
	cis'2. |
	d'2 cis'4 |
	f'4. e'8 d'4 |
%50
	g g f |
	e4. f8 g4 |
	a2. | % la ligado hasta el final
	a4 a a |
	a2. |
%55
	a\breve*3/8 
}



bassus =  {
        r4 d2 cis4 |
	d8 e f4 e2 |
	f4 c d e |
	f2 e |
%5
	d e |
	f g4 c |
	f f4. c8 d4 |
	c a g4. g8 |
	d4 d f g |
%10
	a4. f8 g4 e |
	d4. e8 f4 d |
	e a d bes, |
	a,2. a4 |
	g e f4. g8 |
%15
	a4 a a, a, |
	e1 |
	a,2. r4 |
	R1*2
%20
	r4 d e4. d8 |
	cis4 e d8 e f g |
	a2 r4 a |
	bes4. a8 g4 bes |
	a8 g f e d4 d |
%25
	e4. d8 cis4 e |
	d4. e8 f4. g8 |
	a2 d |
	a,1 |
	d\breve*1/2 |
%30
	r4 d d |
	e e e |
	f d a |
	a g g |
	a f d |
%35
	g a2 |
	d f4 |
	g g g |
	a f d |
	e a a, |
%40
	e2. |
	e2 e4 |
	a,2. ~ |
	a,2 r4 |
	a a a |
%45
	bes2 a4 |
	g4. a8 bes4 |
	a4. g8 f e |
	d2 a4 |
	d d d |
%50
	e2 d4 |
	cis4. d8 e4 |
	d4. e8 f g |
	a4 f d |
	a,2. |
%55
	d\breve*3/8
}


textocantus=\lyricmode {
San -- _ _ _ _ _ ctus
Do -- mi -- nus De -- us Sa -- ba -- oth.
Ple -- ni sunt cæ -- _ li et ter -- _ _ ra
glo -- ri -- a tu -- _ _ _ a.
Ho -- san -- na in ex -- cel -- _ _ _ sis
ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ sis.
Be -- ne -- di -- ctus, 
qui ve -- nit in no -- mi -- ne Do -- _ _ mi -- ni. _
Ho -- san -- na in ex -- cel -- _ _ _ _ sis,
in ex -- cel -- _ _ sis.
}


textoaltus=\lyricmode {
San -- _ _ _ _ _ ctus,
San -- _ ctus
Do -- mi -- nus De -- us Sa -- ba -- oth.
Ple -- ni sunt cæ -- _ li et ter -- _  ra
glo -- ri -- a tu -- _ a.
Ho -- san -- na in ex -- cel -- _ _ _ _ sis
ho -- san -- na in ex -- cel -- _ _ _ sis
ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ _ _ _ _ _ _  sis.
Be -- ne -- di -- ctus, 
qui ve -- nit in no -- mi -- ne Do -- _ _ _ _ mi -- ni. _
Ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ sis,
in ex -- cel -- _ _ _ sis.
}


textotenor=\lyricmode {
San -- _ _ _ _ _ ctus,
San -- _ _ _ _ _ _ _ _ ctus
Do -- mi -- nus De -- us Sa -- ba -- oth.
Ple -- ni sunt cæ -- _ li et ter -- _ _ _ _ _ _ _ _ _ _ _  ra,
glo -- ri -- a tu -- _ a,
glo -- ri -- a tu -- _ _ a.
Ho -- san -- na in ex -- cel -- _ _ _ sis
ho -- san -- na in ex -- cel -- sis
ho -- san -- na in ex -- cel -- _ _  sis,
ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ _ _ sis.
Be -- ne -- di -- ctus, 
qui ve -- nit in no -- mi -- ne Do -- _ _ _ _ _ _ _ _ _ _ _ mi -- ni. 
Ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ _ _ sis,
ho -- san -- na in _ ex -- cel -- sis, 
in ex -- cel -- sis.
}


textobassus=\lyricmode { 
San -- _ _ _ _ _ ctus,
San --  _ _ _ _ ctus,
San -- _ _ _ ctus
Do -- mi -- nus De -- us Sa -- ba -- oth.
Ple -- ni sunt cæ -- _ li et ter -- _ _ _ _ _ _ _ ra,
glo -- ri -- a tu -- _ a,
glo -- ri -- a tu -- a.
Ho -- san -- na in ex -- cel -- _ _ _ sis
ho -- san -- na in ex -- cel -- _ _ _ sis,
ho -- san -- na in ex -- cel -- _ _ _ _ _ _  sis.
Be -- ne -- di -- ctus, 
qui ve -- nit in no -- mi -- ne Do -- _ _ _ mi -- ni,
in no -- mi -- ne Do -- _ _ _ _ mi -- ni,
Do -- mi -- ni. _
Ho -- san -- na in ex -- cel -- _ _ _ _ _ _ _ sis,
ho -- san -- na in  ex -- cel -- _ _ _ _ _ _ _ _ _ _ sis.
}


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

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

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

	\new Staff <<\global
	\new Voice="v4" {
		\set Staff.instrumentName="B "
		\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 . .7))
		%\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=20
	page-count = 2
	ragged-last-bottom = ##f
	indent=0.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 . 12) (minimum-distance . 0) (padding . 0))


first-page-number=11
}