\version "2.22.0" #(set-default-paper-size "a4") #(set-global-staff-size 17.0) #(ly:set-option 'point-and-click #f) %mobile -s15.0 -i3.0 italicas=\override LyricText.font-shape = #'italic rectas=\override LyricText.font-shape = #'upright ss=\once \set suggestAccidentals = ##t incipitwidth = 20 mt=#(define-music-function (offset) (number?) ; move lyric text #{ \once \override LyricText.X-offset = -$offset #}) htitle="Veni creator Spiritus" hcomposer="Guerrero" \header { title=\markup{\fontsize #4 "Veni creator Spiritus"} subtitle="In festo Pentecostes" subsubtitle=\markup{\null \vspace #1 } composer="Francisco Guerrero (1528-1599)" pdfauthor=\composer poet=\markup{"Liber vesperarum, Roma 1584"} copyright=\markup{ \fill-line {"Edited by Nancho Alvarez" \typewriter "http://tomasluisdevictoria.org"} } % tagline="" } %tablet \markup{\null \vspace #7 } \markup{" "} \markup{" "} \markup{" "} \markup{\larger \line{\bold "1." "Veni, creator Spiritus, mentes tuorum visita imple superna gratia, quæ tu creasti, pectora."}} \markup{" "} \markup{\larger \line{\bold "3." "Tu septiformis munere, dextræ Dei tu digitus, tu rite promissum Patris sermone ditans guttura."}} \markup{" "} \markup{\larger \line{\bold "5." "Hostem repellas longius pacemque dones protinus, ductore sic te prævio vitemus omne noxium."}} \markup{" "} \markup{" "} %tablet \pageBreak global={\key c \major \time 2/2 \skip 1*34 \bar "||" \break \skip 1*29 \bar "||"} cantus=\relative c''{ g1 a \[g f\] g2 \[a g\] c ~ c \[d c\] a4 c ~ c4 b c2 d g, ~ g r R1 r4 g'2 d4 e g2 f4 e8 d c b a g c4 b4 a8[ b c d] e4 ~ e8 d d2 cis4 d1 r2 r4 a a4 b c b ~ b \[a2 g4 ~ \] g4 \ss fis g d' d2 b ~ b4 g b c ~ c8 b a g a4 g f2 e \[e'2 f\] d4. d8 e4 a, c4 d2 cis4 d4 d,8[ e f g] a4 ~ a g a4. b8 c4 b2 a4 ~ a8 g g2 \ss fis4 g\breve*1/2 g2 \[a g2.\] fis4 g2 \[a g\] \[c d\] c ~ c b c r \[c b\] g2 a c d c d ~ d e d1 R1 \[c2 d\] e2. d4 \[c2 a\] b d ~ d g, \[g a\] c1 ~ c r2 \[b c\] a \[g f\] a \[bes a\] g ~ g fis g\breve*1/2 } altus=\relative c''{ r2 g d f e4 d8 c d2 ~ d c4. d8 e f g e f e d c b4 e2 e4 ~ e8 d c2 b4 a8 b c d e4 f g g2 f8 e f4 d e2 r4 g2 d4 e4 g f e8 d e2 d ~ d4 cis d a' ~ a e f g ~ g f e4. f8 g4 g a2 r4 a a b c a4. g8 f e f2 g ~ g4 f2 e4 d1 b2 r4 g' g e2 e4 e c4. d8 e c d4 d g, \[g' ~ g a2\] f4 g2. f4 ~ f f g g a8 g f e d4 f d8 c d e f4 c8 d e \parenthesize f g4 d f e c d2 d\breve*1/2 r4 g, c d e8 f g e a4 a g8 f e d c4 d e2 g4 a ~ a g e4. d8 e4 \ss fis g2 ~ g r4 g e c g'2 d4 e fis fis g2 r4 g e e f4. e16 d f8 g a4 b c a2 r4 g e f g2 e4 a2 g8 f e4. d8[ e c] f4 e2 r r4 d d g, d'8 c b a b4 c d4 e f2 e4 a g2 r4 c, e g f8 g a f g4 g e2 f d1 fis2 g ~ g4 f e d e2 d d\breve*1/2 } tenor=\relative c'{ R1*2 g1 a \[g2 f\] g1 \[a2 g\] c1 \[d2 c ~ \] c4 b c2 R1*2 \[c2 b\] g a c1 \[d2 c\] d e d1 c \[d2 e\] \[d c\] \[a b\] d1 g,2 g ~ g4 a4. b8 c4 ~ c b c2 R1 \[b2 c\] a \[g f\] a \[bes a\] g2. \parenthesize f4 %? fis4 g2 a g\breve*1/2 R1 r4 g c d e g g fis g8 f e d e4 c c b c8 d e f g4 c, d4. d8 c4 e d b c e2 d8 c b4 b d2 e d r4 a a a d f e g ~ g fis g2 R1 r4 c, a b c a c d e g e \ss fis g2 g,4 b ~ b8 c d e d4 c ~ c b c d c f2 e8 d e2 r4 c d f e d c8 b a g a4 c ~ c b a2 r4 d g, g d'2 b c a g\breve*1/2 } bassus=\relative c'{ R1*2 r2 g d f \[e2 d\] e c r2 r4 g' a2. a4 g4. f8 e4 f d d c2 \[c' b\] g2 a4 c c,8 d e f g4. f8 e4 e d2 a'4. g8 f4 e d2 a' g4 bes a2 r4 d, f g a8 g f e f2 d2 c8 d e f g4 d f c d2 g r4 g g2 e2. c4 c f2 e4 d2 c \[c' d\] g,2 e4 f ~ f d e e d1 r4 g d f c8 d e f g4 d e2 d g\breve*1/2 R1*3 r4 c,2 f4 ~ f g a c ~ c8 b a4 g g c, c' b g a2 e4 g ~ g8 f e4 d d c c' b g a2 d, d4 d'2 c4 d2 r4 g, g a b c c8 b a g f4 g c, c' a b c4. b8 c4 d g,1 r4 g g c, g'2 f4 d a'4. b8 c4 c c,1 r2 r4 g' a c f, f g4. g8 d2 ~ d r r4 d e g c, c d4. d8 g\breve*1/2 } textocantus=\lyricmode{ \set stanza = "2." Qui Pa -- ra -- _ cli -- tus __ _ di -- _ _ _ _ _ _ ce -- ris do -- num De -- i al -- tis -- _ _ _ _ _ _ _ _ _ _ _ _ _ _ si -- mi fons vi -- vus i -- gnis cha -- _ ri -- tas, fons vi -- vus i -- gnis cha -- _ _ _ _ _ ri -- tas, et __ _ spi -- ri -- ta -- lis un -- _ cti -- o, et __ _ _ _ _ spi -- ri -- _ _ ta -- lis __ _ \italicas un -- \rectas cti -- o. \set stanza = "4." Ac -- cen -- _ de lu -- men __ _ sen -- _ _ si -- bus in -- _ fun -- de a -- mo -- rem cor -- di -- bus in -- _ fir -- ma no -- _ _ stri cor -- po -- _ ris vir -- _ tu -- te __ _ fir -- mans __ _ per -- pe -- ti. } textoaltus=\lyricmode{ \set stanza = "2." Qui Pa -- ra -- cli -- _ _ _ tus __ _ _ _ _ _ _ _ _ _ _ di -- ce -- _ _ _ ris, __ _ _ _ _ _ _ di -- _ _ _ ce -- ris do -- num De -- i al -- _ _ _ tis -- si -- mi, do -- num De -- i al -- tis -- _ _ si -- mi fons vi -- vus i -- gnis __ _ _ _ _ cha -- ri -- _ _ tas fons vi -- vus i -- gnis cha -- _ _ _ _ ri -- tas, et __ _ spi -- ri -- ta -- lis un -- cti -- o, __ _ _ _ _ et spi -- _ _ _ _ ri -- _ _ _ _ ta -- lis un -- _ cti -- o. \set stanza = "4." Ac -- cen -- de lu -- _ _ _ _ men sen -- _ _ _ _ si -- bus, ac -- cen -- de lu -- men sen -- si -- bus in -- fun -- de a -- mo -- rem cor -- di -- bus a -- mo -- rem cor -- _ _ _ _ _ _ di -- bus in -- fir -- ma no -- stri cor -- _ _ _ _ _ _ po -- ris in -- fir -- ma no -- _ _ _ _ stri cor -- po -- ris, cor -- po -- ris vir -- tu -- te fir -- _ _ _ _ mans per -- pe -- ti, vir -- tu -- te fir -- mans per -- pe -- ti. } textotenor=\lyricmode{ \set stanza = "2." Qui Pa -- ra -- _ cli -- tus __ _ di -- ce -- _ _ ris do -- _ num De -- i al -- _ tis -- si -- mi, fons vi -- _ vus __ _ i -- _ gnis cha -- ri -- _ _ _ _ tas et __ _ spi -- ri -- _ ta -- lis __ _ un -- _ _ cti -- o. \set stanza = "4." Ac -- cen -- de lu -- men sen -- si -- bus, __ _ _ _ _ ac -- cen -- de lu -- _ _ _ _ men sen -- si -- bus, in -- fun -- de a -- mo -- _ _ _ rem cor -- di -- bus in -- fun -- de a -- mo -- rem cor -- di -- bus in -- fir -- ma no -- stri cor -- po -- ris, in -- fir -- ma no -- stri cor -- _ _ _ _ _ po -- ris, cor -- po -- ris __ _ _ _ vir -- tu -- te fir -- mans per -- _ _ _ _ _ pe -- ti vir -- tu -- te fir -- mans per -- pe -- ti. } textobassus=\lyricmode{ \set stanza = "2." Qui Pa -- ra -- cli -- _ _ tus qui Pa -- ra -- cli -- _ _ tus di -- ce -- ris, do -- _ num De -- i al -- _ _ _ _ _ tis -- si -- mi, do -- \mt #2.9 num De -- _ i al -- tis -- si -- mi fons vi -- vus i -- _ _ _ _ gnis cha -- _ _ _ _ _ _ _ ri -- tas fons vi -- vus i -- gnis cha -- _ ri -- tas, et __ _ spi -- ri -- ta -- lis un -- cti -- o et spi -- ri -- ta -- _ _ _ _ lis un -- cti -- o. \set stanza = "4." Ac -- cen -- de lu -- men __ _ _ sen -- si -- bus, in -- fun -- de a -- mo -- rem __ _ _ cor -- di -- bus, in -- fun -- de a -- mo -- rem cor -- di -- bus in -- fir -- ma no -- stri cor -- _ _ _ _ po -- ris, in -- fir -- ma no -- stri cor -- po -- ris in -- fir -- ma no -- stri __ _ cor -- _ _ po -- ris vir -- tu -- te fir -- mans per -- pe -- ti vir -- tu -- te fir -- mans per -- pe -- ti. } incipitcantus=\markup{ \score{ { \set Staff.instrumentName="Cantus " \override NoteHead.style = #'neomensural \override Rest.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-g" \key c \major \time 2/2 g'\breve } \layout { \context {\Voice \remove Ligature_bracket_engraver \consists Mensural_ligature_engraver } line-width=\incipitwidth indent = 0 } } } incipitaltus=\markup{ \score{ { \set Staff.instrumentName="Altus " \override NoteHead.style = #'neomensural \override Rest.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c2" \key c \major \time 2/2 g'1 } \layout { \context {\Voice \remove Ligature_bracket_engraver \consists Mensural_ligature_engraver } line-width=\incipitwidth indent = 0 } } } incipittenor=\markup{ \score{ { \set Staff.instrumentName="Tenor " \override NoteHead.style = #'neomensural \override Rest.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c3" \key c \major \time 2/2 g\breve } \layout { \context {\Voice \remove Ligature_bracket_engraver \consists Mensural_ligature_engraver } line-width=\incipitwidth indent=0 } } } incipitbassus=\markup{ \score{ { \set Staff.instrumentName="Bassus " \override NoteHead.style = #'neomensural \override Rest.style = #'neomensural \override Staff.TimeSignature.style = #'neomensural \cadenzaOn \clef "petrucci-c4" \key c \major \time 2/2 g1 } \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 Staff <<\global \new Voice="v2" { \set Staff.instrumentName=\incipitaltus \clef "treble" \altus } \new Lyrics \lyricsto "v2" {\textoaltus } >> \new Staff <<\global \new Voice="v3" { \set Staff.instrumentName=\incipittenor \clef "G_8" \tenor } \new Lyrics \lyricsto "v3" {\textotenor } >> \new Staff <<\global \new Voice="v4" { \set Staff.instrumentName=\incipitbassus \clef "bass" \bassus } \new Lyrics \lyricsto "v4" {\textobassus } >> >> }%transpose \layout{ \context {\Lyrics \override VerticalAxisGroup.minimum-Y-extent = #'(-0.0 . 0.0) %\override LyricText.font-size = #1.2 \override LyricHyphen.minimum-distance = #0.33 } \context {\Score \override BarNumber.padding = #2 } \context {\Voice %melismaBusyProperties = #'() } %\context { \Staff \RemoveEmptyStaves } \context {\Staff \override VerticalAxisGroup.staff-staff-spacing = #'((basic-distance . 11) (minimum-distance . 0) (padding . 1)) \consists Ambitus_engraver \override LigatureBracket.padding = #1 } } %\midi {} } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% global={\key c \major \time 2/2 \skip 1*30 \bar "|." } cantus=\relative c''{ \set Score.currentBarNumber = #64 \bar "" r2 g a g4. a8 b c d2 cis4 d2 r r4 d d b ~ b e2 c4 d8 a d4. c8 b a b g g'4. f8 e4 ~ e8 d c2 b4 c2 r4 d e8 d e f g4 f ~ f4 e f c d2 c4 c ~ c a b8 c d e f4 e f g e f4. e8 d4 ~ d cis d2 r4 a c d f e g d ~ d8 \ss cis16 b cis4 d a b2 r4 e e e c d ~ d b2 b4 c2 r4 g g g c4. b8 a4 a d2 r4 e f f e a, \[d2 e\] a, b\breve*1/2 } cantusdos=\relative c''{ s4*0^\markup{"Resolutio"} R1*2 r2 g \[a g ~ \] g4 fis g2 ~ g \[a ~ a g ~ \] g c ~ c \[d c2.\] b4 c1 r2 \[c b\] g a r c d ~ d4 c d2 e d ~ d r c \[d e\] \[d ~ d c ~ \] c a b4 d g,2 a4 c2 b4 c2 r r \[b c\] a g4 f a b ~ b8 a g4. \ss fis8 fis4 g\breve*1/2 } altus=\relative c'{ s4*0^\markup{"Canon in diatesaron"} R1*2 d2 \[e d2.\] cis4 d1 \[e d\] g \[a2 g ~ \] g4 fis g2 ~ g r \[g2 f\] d e r g a2. g4 a2 b a1 r2 g \[a b\] \[a1 g\] e2 f4 a d,2 e4 g ~ g fis g2 R1 \[f2 g\] e2 d4 c e4 f4. e8 d4 ~ d8 \ss cis cis4 d2 ~ d\breve*1/2 } tenor=\relative c'{ d2 e d b4 c %! b4( c) g2 r4 g' ~ g8 \ss fis16 e fis!4 g g, a2 b ~ b \[c a\] b4. c8 d2 c R1 c2 d c4 c2 a4 c4. b8 a4 a g g'4. f8 e d c4 f d2 R1*2 r4 e f f f4. f8 e4 d c2 r r4 a2 d4 ~ d4 b c8 d e f g4 c,2 f4 g2. g,4 \[c2 d\] c4 e e e c4. c8 d4 d c2 r4 a c8 \noBeam g d'4. c8 b a g4 g a4. a8 g\breve*1/2 } bassus=\relative c{ R1*3 d2 e d g e \[a d,\] g ~ g c, r g' a g c,4. d8 e4 f c4 c f2 r4 g c4. b8 a4 f g b a2 r R1 a2 d4 d d4. d8 c4 b a2 g r2 d g4 g c,2 ~ c4 c f d g2 e a g r4 c, c c f a g4. g8 c,4 c d f c d f g \[e2 d\] g\breve*1/2 } textocantus=\lyricmode{ \set stanza = "6." Per te sci -- _ _ _ a -- _ mus per te sci -- a -- mus da __ _ _ _ _ _ _ _ Pa -- _ _ _ _ _ trem no -- sca -- _ _ _ _ _ _ mus, no -- sca -- mus at -- que Fi -- _ _ _ _ li -- um, at -- que Fi -- _ _ li -- um te u -- tri -- u -- sque Spi -- _ _ _ _ _ ri -- tum te u -- tri -- u -- sque Spi -- ri -- tum cre -- da -- mus o -- mni tem -- po -- re cre -- da -- mus o -- mni tem -- _ po -- re. } textocantusdos=\lyricmode{ \set stanza = "6." Per te __ _ sci -- a -- mus __ _ da Pa -- _ _ trem no -- _ sca -- mus at -- que __ _ Fi -- li -- um te u -- _ tri -- _ u -- sque __ _ Spi -- _ _ ri -- tum cre -- _ da -- mus o -- mni tem -- _ _ _ po -- re. } textoaltus=\lyricmode{ \set stanza = "6." Per te __ _ sci -- a -- mus __ _ da Pa -- _ _ trem no -- _ sca -- mus at -- que __ _ Fi -- li -- um te u -- _ tri -- _ u -- sque __ _ Spi -- _ _ ri -- tum cre -- _ da -- mus o -- mni tem -- _ _ _ po -- re. } textotenor=\lyricmode{ \set stanza = "6." Per te sci -- a -- _ mus per __ _ _ _ te sci -- a -- mus da __ _ Pa -- _ _ trem no -- sca -- mus at -- que Fi -- _ _ li -- um, Fi -- _ _ _ _ li -- um te u -- tri -- u -- sque Spi -- ri -- tum te u -- tri -- u -- _ _ _ _ sque Spi -- ri -- _ _ _ tum, cre -- da -- mus o -- mni tem -- po -- re cre -- da -- mus o -- _ _ _ _ mni tem -- po -- re. } textobassus=\lyricmode{ \set stanza = "6." Per te sci -- a -- mus da __ _ Pa -- trem no -- sca -- mus at -- _ _ que Fi -- li -- um no -- sca -- mus at -- que Fi -- li -- um te u -- tri -- u -- sque Spi -- ri -- tum __ _ te u -- tri -- u -- sque Spi -- ri -- tum, Spi -- ri -- tum cre -- da -- mus o -- mni tem -- po -- re, cre -- da -- mus o -- mni tem -- _ po -- _ re. } \score {\transpose c' c'{ \new ChoirStaff<< \new Staff <<\global \new Voice="v1" { \set Staff.instrumentName="Cantus I " \clef "treble" \cantus } \new Lyrics \lyricsto "v1" {\textocantus } >> \new Staff <<\global \new Voice="v5" { \set Staff.instrumentName="Cantus II " \clef "treble" \cantusdos } \new Lyrics \lyricsto "v5" {\textocantusdos } >> \new Staff <<\global \new Voice="v2" { \set Staff.instrumentName="Altus " \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="Bassus " \clef "bass" \bassus } \new Lyrics \lyricsto "v4" {\textobassus } >> >> }%transpose \layout{ indent = 2\cm \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 systems-per-page = 3 ragged-last-bottom = ##f indent=3.5\cm system-system-spacing = #'((basic-distance . 20) (minimum-distance . 0) (padding . 5)) top-system-spacing = % header #'((basic-distance . 9) (minimum-distance . 0) (padding . 0)) last-bottom-spacing = % footer #'((basic-distance . 12) (minimum-distance . 0) (padding . 0)) markup-system-spacing.padding = #4 }