\version "2.22.0" #(set-default-paper-size "a4") #(set-global-staff-size 16.1) #(ly:set-option 'point-and-click #f) %mobile -s10.3 -i2.5 -m6 italicas=\override LyricText.font-shape = #'italic rectas=\override LyricText.font-shape = #'upright ss=\once \set suggestAccidentals = ##t incipitwidth = 22 mtempo={\tempo 4 = 150} mtempob={\tempo 4 = 75} mtempoc={\tempo 4 = 150} mt=#(define-music-function (offset) (number?) ; move lyric text #{ \once \override LyricText.X-offset = -$offset #}) #(define ((add-three-time-signature glyph) grob) (grob-interpret-markup grob (markup #:musicglyph glyph #:raise -0.75 #:musicglyph "three"))) htitle="Missa pro victoria: Sanctus" hcomposer="Victoria" \header { title=\markup{\fontsize #3 "4. Sanctus"} subtitle="de la Missa pro victoria" % subsubtitle=\markup{\null \vspace #1 } composer=\markup{"Tomás Luis de Victoria (c.1548-1611)"} pdfauthor=\composer %opus="(-)" poet=\markup{"1600a"} copyright=\markup{ \fill-line {"Transcribed and edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"} } % tagline="" } global={ \key f \major \time 3/4 \skip 1*3/4*3 \mtempo \time 2/2 \skip 1*3 \time 3/4 \mtempoc \skip 1*3/4*3 \time 2/2 \mtempo \skip 1*23 \time 3/4 \mtempoc \skip 1*3/4*13 \bar "|." } cantus=\relative c'' { R1*3/4 | R1*3/4 | R1*3/4 | \once \override TextScript.X-offset = #-3.5 s4*0^\markup{\musicglyph "timesig.mensural44"} R1*4/4 | %5 c2 c4 c | d4. c8 bes4 g | a4 c2 | % no ennegrecidas a4 c2 | % ennegrecidas a4 c c | % ennegrecidas %10 c2 c | R1*4/4 | c2 c4 c | c4. c8 c4 b | c c4. c8 c4 | %15 d c bes g | a1 | R1*4/4 | bes2 c4 c | d2 c | %20 R1*4/4 | %\break r2 c | c c | c1 | c2 c | %25 c1 | d2 d | d d | d1 | d | %30 R1*4/4 | R1*4/4 | R1*4/4 | R1*3/4 | R1*3/4 | %35 R1*3/4 | R1*3/4 | r4 g, c ~ | c a d | es d4. c8 | %40 c2 b4 | c g c | a d d | c2. ~ | c | %45 \mtempob c\breve*3/8 } cantusdos=\relative c'' { c2 a4 | r c2 | % ennegrecida a4 d2 | % no ennegrecidas c1^\markup{\hspace #.3 \fontsize #2 \override #'(style . neomensural) \note {1} #UP } %5 a2 a4 a | bes4. c8 d4 c | c a2 | f4 f2 | f4 f f | %10 e2 e | R1*4/4 | g2 g4 g | a4. g8 a4 g | g a4. a8 a4 | %15 bes c d c | c2 c | c c | d c | R1*4/4 | %20 bes2 c4 c | d2 c | r f, | g4 g a2 | g g | %25 a1 | bes2 bes | bes bes | a1 | b | %30 r2 c | c4 bes a g | f e d2 | e2. R1*3/4 | %35 R1*3/4 | R1*3/4 | r4 r g4 | a2 a4 | bes2 a4 | %40 g f8 e f4 | g c2 | % ennegrecidas c4 bes r | g2 a4 | a g8 f g4 | %45 a\breve*3/8 } altus=\relative c' { R1*3/4 | R1*3/4 | R1*3/4 | r2 f ~ | %5 f4 f f2 | f4. f8 f4 e | f f2 | c4 a2 | % ennegrecidas f4 a a | %10 g2. c4 | R1*4/4 | e2 e4 e | f4. g8 f4 d | e f4. f8 f4 | %15 f4. f8 f4 e | f1 | r2 f | d4 d f2 | f f | %20 d4 d f2 | f1 | r2 c | c4 c c4. d8 | e f g4 e e | %25 f1 | f2 f4. f8 | g2 g ~ | g fis | g1 ~ | %30 g | R1*4/4 | R1*4/4 | R1*3/4 | R1*3/4 | %35 R1*3/4 | R1*3/4 | r4 r c,4 | f2 d4 | g2 f4 | %40 e d8 c d4 | c2 e4 | f2 g4 | e2 f4 | f2 e4 | %45 f\breve*3/8 } tenor=\relative c { R1*3/4 | R1*3/4 | R1*3/4 | R1*4/4 | %5 f2 f4 f | bes4. a8 bes4 c | f, c2 | % ennegrecidas c4 c2 | c4 c c | %10 c8 d e f g2 | f r | c' c4 c | c4. c8 c4 g | c1 | %15 R1*4/4 | R1*4/4 | R1*4/4 | R1*4/4 | R1*4/4 | %20 r2 f, | bes,!4 bes f'2 | c4 c' a a | c2 a | c1 | %25 c | bes2 d | g,4 a bes g | a1 | g2 r | %30 c c4 bes | a g f g | a8 \noBeam bes c2 b4 | c2. R1*3/4 | %35 R1*3/4 | R1*3/4 | R1*3/4 | R1*3/4 | R1*3/4 | %40 R1*3/4 | r4 r g4 | a f r | g2 f4 | c'2. | %45 c\breve*3/8 } bassus=\relative c, { R1*3/4 | R1*3/4 | R1*3/4 | R1*4/4 | %5 R1*4/4 | R1*4/4 | r4 f2 | % ennegrecida f4 f2 | f4 f f | %10 c'2 c | R1*4/4 | c2 c4 c | f4. e8 f4 g | c, f4. f8 f4 | %15 bes a bes c | f,1 | R1*4/4 | bes2 a4 a | bes2 f | %20 bes a4 a | bes2 f | r f | e4 e f2 | c c | %25 f1 | bes,2 bes' | bes4 a g g, | d'1 | g,4 g' g f | %30 e d c2 | f f4 e | d c g'2 | c,2. R1*3/4 | %35 R1*3/4 | R1*3/4 | R1*3/4 | R1*3/4 | R1*3/4 | %40 R1*3/4 | r4 r c4 | f d g | c,8 d e c f4 ~ | f c2 | % ennegrecidas, parece ligadura pero no lo es, por la letra %45 f\breve*3/8 } cantustres=\relative c'' { R1*3/4 | c2 a4 | c2 b4 | c2 a | %5 R1*4/4 | R1*4/4 | a2 f4 | a2 f4 | a2 f4 | %10 g2 g4 g | a4. g8 a4 g | g1 | R1*4/4 | R1*4/4 | %15 R1*4/4 | r2 f | g4 g a2 | f r | bes c4 c | %20 d2 c | r f, | g4 g a2 | g f | e4. f8 g2 | %25 f f | f4 f f2 | bes, bes'4 bes8 \noBeam c | d4 a a2 | r g %30 g4 f e d | c1 | R1*4/4 | R1*3/4 | R1*3/4 | %35 R1*3/4 | c4 f d4 | e4. f8 g4 | f2 r4 | R1*3/4 | %40 c4 f d4 | % ennegrecidas e4. f8 g4 | f f bes | g c a | c4. bes16 a g4 | %45 f\breve*3/8 } altusdos=\relative c' { R1*3/4 | R1*3/4 | R1*3/4 | R1*4/4 | %5 R1*4/4 | R1*4/4 | f2 c4 | f2 c4 | f2 c4 | %10 e2 e4 e | f4. g8 f4 d | e1 | R1*4/4 | R1*4/4 | %15 R1*4/4 | r2 c | g4 g c2 | bes f' | d4 d f2 | %20 f1 | r2 c | c4 c c2 | c c | c1 | %25 a | d | d2 d | d1 | d | %30 R1*4/4 | R1*4/4 | R1*4/4 | r4 g, c ~ | c a d | %35 es d4. c8 | c2 b4 | c2. R1*3/4 | R1*3/4 | %40 R1*3/4 | R1*3/4 | c4 d bes | c2 \[c4 | % 2 compases ennegrecidos a\] c2 | %45 a\breve*3/8 } tenordos=\relative c' { R1*3/4 | R1*3/4 | R1*3/4 | R1*4/4 | %5 R1*4/4 | R1*4/4 | c2 a4 | c2 a4 | c2 a4 | %10 c2 c4 c | c4. c8 c4 b | c1 | R1*4/4 | R1*4/4 | %15 R1*4/4 | c2 a4 a | c2. f,4 | r2 f | bes,!4 bes f'2 | %20 bes,! r | bes' a4 a | c2. f,4 | r2 f | g8 f e d e2 | %25 c f | f4 e d2 | g d | d4 d d2 | d1 | %30 R1*4/4 | R1*4/4 | R1*4/4 | r4 r g4 | a2 a4 | %35 bes2 a4 | g f8 e f4 | g2. R1*3/4 | R1*3/4 | %40 R1*3/4 | R1*3/4 | a4 bes d8 \noBeam d, | e4 g r | f8 \noBeam f \[g4 c,\] %45 c\breve*3/8 } bassusdos=\relative c { R1*3/4 | R1*3/4 | R1*3/4 | R1*4/4 | %5 R1*4/4 | R1*4/4 | f2 f4 | f2 f4 | f2 f4 | %10 c2 c4 c | f4. e8 f4 g | c,1 | R1*4/4 | R1*4/4 | %15 R1*4/4 | r2 f | e4 e f2 | bes, r | bes' a4 a | %20 bes2 f | r f | e4 e f2 | c f, | c'1 | %25 f, | bes2 bes4 a | \[g1 | d\] g | %30 R1*4/4 | R1*4/4 | R1*4/4 | r4 r c4 | f2 d4 | %35 g2 f4 | e d8 c d4 | c2. R1*3/4 | R1*3/4 | %40 R1*3/4 | R1*3/4 | f,4 bes g | c2 f,4 ~ | % 2 compases ennegrecidos f c'2 | %45 f,\breve*3/8 } textocantus=\lyricmode{ Do -- mi -- nus De -- us sa -- ba -- oth, San -- ctus, \italicas San -- ctus, \rectas San -- ctus, San -- ctus Do -- mi -- nus De -- us sa -- ba -- oth, Do -- mi -- nus De -- us sa -- ba -- oth. Ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li et ter -- ra, glo -- ri -- a tu -- a. Ho -- \mt #1 san -- _ na in ex -- cel -- _ _ _ sis, % Osanna ho -- san -- na in ex -- cel -- _ sis. } textocantusdos=\lyricmode{ San -- ctus San -- ctus, \italicas San -- ctus, \rectas Do -- mi -- nus De -- us sa -- ba -- oth, San -- ctus, \italicas San -- ctus, \rectas San -- ctus, \italicas San -- ctus \rectas Do -- mi -- nus De -- us sa -- ba -- oth, \italicas Do -- mi -- nus De -- us sa -- ba -- oth. \rectas Ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li \italicas ple -- ni sunt cæ -- li \rectas et ter -- ra, glo -- ri -- a tu -- a glo -- ri -- a tu -- _ _ _ _ a. Ho -- san -- na in ex -- \mt #.5 cel -- _ _ _ sis, ho -- san -- na in ex -- \mt #.5 cel -- _ _ _ sis. } textoaltus=\lyricmode{ Do -- _ mi -- nus De -- us sa -- ba -- oth, San -- ctus, San -- ctus, San -- ctus, San -- ctus Do -- mi -- nus De -- us sa -- ba -- oth, Do -- mi -- nus De -- us sa -- ba -- oth. Ple -- ni sunt cæ -- li, ple -- ni sunt cæ -- li ple -- ni sunt cæ -- _ _ _ _ li et ter -- ra, glo -- ri -- a tu -- _ _ a. _ % falta la a Ho -- san -- na in ex -- \mt #.5 cel -- _ _ _ sis, ho -- san -- na in ex -- cel -- _ sis. } textotenor=\lyricmode{ Do -- mi -- nus De -- us sa -- ba -- oth, San -- ctus, San -- ctus, San -- ctus, San -- _ _ _ _ ctus Do -- mi -- nus De -- us Sa -- ba -- oth. Ple -- ni sunt cæ -- li, ple -- ni sunt cæ -- li et ter -- ra, glo -- ri -- a tu -- _ _ a glo -- ri -- a tu -- _ a, glo -- ri -- a tu -- _ a. Ho -- san -- na in ex -- cel -- sis. } textobassus=\lyricmode{ San -- ctus, \italicas San -- ctus, San -- ctus, \rectas San -- ctus Do -- mi -- nus De -- us sa -- ba -- oth, \italicas Do -- mi -- nus De -- us sa -- ba -- oth. \rectas Ple -- ni sunt cæ -- li, \italicas ple -- ni sunt cæ -- li \rectas ple -- ni sunt cæ -- li et ter -- ra, glo -- ri -- a tu -- _ _ a, glo -- ri -- a tu -- _ a, glo -- ri -- a tu -- _ _ a. Ho -- san -- na in ex -- _ _ _ _ _ cel -- sis. } textocantustres=\lyricmode{ San -- ctus, San -- ctus, San -- ctus San -- ctus, San -- ctus, San -- ctus, Do -- mi -- nus De -- us sa -- ba -- oth. Ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li et ter -- _ _ ra, glo -- ri -- a tu -- a, glo -- ri -- a tu -- _ a glo -- ri -- a tu -- _ a. Ho -- san -- na in ex -- cel -- sis ho -- \mt #.3 san -- na in ex -- cel -- sis, ho -- san -- na in ex -- cel -- _ _ _ sis. } textoaltusdos=\lyricmode{ San -- ctus, San -- ctus, San -- ctus, Do -- mi -- nus De -- us sa -- ba -- oth. Ple -- ni sunt cæ -- li, ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li et ter -- ra, glo -- ri -- a tu -- a. Ho -- san -- _ na in ex -- \mt #.2 cel -- _ _ _ sis ho -- san -- na in ex -- _ cel -- sis. } textotenordos=\lyricmode{ San -- ctus, San -- ctus, San -- ctus, Do -- mi -- nus De -- us sa -- ba -- oth. Ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li et \mt #.3 ter -- _ _ _ _ ra, glo -- ri -- a tu -- a, glo -- ri -- a tu -- a. Ho -- san -- na in ex -- \mt #.5 cel -- _ _ _ sis ho -- san -- na, ho -- san -- na in ex -- cel -- _ sis. } textobassusdos=\lyricmode{ San -- ctus, San -- ctus, San -- ctus, Do -- mi -- nus De -- us sa -- ba -- oth. Ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li ple -- ni sunt cæ -- li et ter -- ra, glo -- ri -- a tu -- _ a. Ho -- san -- na in ex -- \mt #.5 cel -- _ _ _ sis ho -- san -- na in ex -- _ cel -- sis. } incipitcantus=\markup{ \score{ { \set Staff.instrumentName=\markup{\column{"Cantus 1a " \raise #.5 \fontsize #-3 "(Cantus I)"}} \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c1" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 c''2 } \layout { line-width=\incipitwidth indent = 0 } } } incipitcantusdos=\markup{ \score{ { \set Staff.instrumentName=\markup{\column{"Cantus 1b " \raise #.5 \fontsize #-3 "(Cantus II)"}} \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c1" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 c''\breve } \layout { line-width=\incipitwidth indent = 0 } } } incipitaltus=\markup{ \score{ { \set Staff.instrumentName="Altus 1 " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c3" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 f'2. } \layout { line-width=\incipitwidth indent = 0 } } } incipittenor=\markup{ \score{ { \set Staff.instrumentName="Tenor 1 " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c4" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 f2 } \layout { line-width=\incipitwidth indent=0 } } } incipitbassus=\markup{ \score{ { \set Staff.instrumentName="Bassus 1 " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-f4" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 f,\breve % ennegrecida } \layout { line-width=\incipitwidth indent = 0 } } } incipitcantustres=\markup{ \score{ { \set Staff.instrumentName=\markup{\column{"Cantus 2 " \raise #.5 \fontsize #-3 "(Cantus III)"}} \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c1" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 c''\breve } \layout { line-width=\incipitwidth indent = 0 } } } incipitaltusdos=\markup{ \score{ { \set Staff.instrumentName="Altus 2 " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c3" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 f'\breve } \layout { line-width=\incipitwidth indent = 0 } } } incipittenordos=\markup{ \score{ { \set Staff.instrumentName="Tenor 2 " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c4" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 c'\breve } \layout { line-width=\incipitwidth indent=0 } } } incipitbassusdos=\markup{ \score{ { \set Staff.instrumentName="Bassus 2 " \override NoteHead.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-f4" \key f \major \override Score.TimeSignature.stencil = #(add-three-time-signature "timesig.mensural22") \time 3/2 f\breve } \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 StaffGroup %\with {systemStartDelimiter = #'SystemStartBrace } %<< %\override Score.BarLine.allow-span-bar=##f \new Staff <<\global \new Voice="v1" { \set Staff.instrumentName=\incipitcantus \set Staff.shortInstrumentName=\markup{\fontsize #-2 "C1a"} \clef "treble" \cantus } \new Lyrics \lyricsto "v1" {\textocantus } >> \new Staff <<\global \new Voice="v9" { \set Staff.instrumentName=\incipitcantusdos \set Staff.shortInstrumentName=\markup{\fontsize #-2 "C1b"} \clef "treble" \cantusdos } \new Lyrics \lyricsto "v9" {\textocantusdos } >> %>> \new Staff <<\global \new Voice="v2" { \set Staff.instrumentName=\incipitaltus \set Staff.shortInstrumentName="A1" \clef "G_8" \altus } \new Lyrics \lyricsto "v2" {\textoaltus } >> \new Staff <<\global \new Voice="v3" { \set Staff.instrumentName=\incipittenor \set Staff.shortInstrumentName="T1" \clef "G_8" \tenor } \new Lyrics \lyricsto "v3" {\textotenor } >> \new Staff <<\global \new Voice="v4" { \set Staff.instrumentName=\incipitbassus \set Staff.shortInstrumentName="B1" \clef "bass" \bassus } \new Lyrics \lyricsto "v4" {\textobassus } >> >> \new ChoirStaff<< \new Staff <<\global \new Voice="v5" { \set Staff.instrumentName=\incipitcantustres \set Staff.shortInstrumentName="C2" \clef "treble" \cantustres } \new Lyrics \lyricsto "v5" {\textocantustres } >> \new Staff <<\global \new Voice="v6" { \set Staff.instrumentName=\incipitaltusdos \set Staff.shortInstrumentName="A2" \clef "G_8" \altusdos } \new Lyrics \lyricsto "v6" {\textoaltusdos } >> \new Staff <<\global \new Voice="v7" { \set Staff.instrumentName=\incipittenordos \set Staff.shortInstrumentName="T2" \clef "G_8" \tenordos } \new Lyrics \lyricsto "v7" {\textotenordos } >> \new Staff <<\global \new Voice="v8" { \set Staff.instrumentName=\incipitbassusdos \set Staff.shortInstrumentName="B2" \clef "bass" \bassusdos } \new Lyrics \lyricsto "v8" {\textobassusdos } >> >> >> } % transpose \layout{ \context {\Lyrics \override VerticalAxisGroup.staff-affinity = #UP \override VerticalAxisGroup.nonstaff-relatedstaff-spacing = #'((basic-distance . 0) (minimum-distance . 0) (padding . .5)) \override VerticalAxisGroup.nonstaff-unrelatedstaff-spacing = #'((basic-distance . 10) (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 {\ChoirStaff \override StaffGrouper.staffgroup-staff-spacing = #'((basic-distance . 12) (minimum-distance . 0) (padding . 1)) \override StaffGrouper.staff-staff-spacing = #'((basic-distance . 10) (minimum-distance . 0) (padding . 1)) } \context {\Staff %\RemoveEmptyStaves %\override VerticalAxisGroup.remove-first = ##t \consists Ambitus_engraver \override LigatureBracket.padding = #1 } } %\midi { \mtempoc } } \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.9\cm system-system-spacing = #'((basic-distance . 18) (minimum-distance . 0) (padding . 5)) top-system-spacing = % header #'((basic-distance . 8) (minimum-distance . 0) (padding . 0)) last-bottom-spacing = % footer #'((basic-distance . 11) (minimum-distance . 0) (padding . 0)) markup-system-spacing.padding = #1.5 }