ave-annuciation.ly
%% Time-stamp: "Fri Feb 01 04:18:03 JST 2008" %% -*- Coding: utf-8 -*- \version "2.10.0" #(set-default-paper-size "a4") #(set-global-staff-size 17) \header { dedication = "The Source send a messenger angel;GAVURIERU to Ave Maria's left side of Nazareth" title = \markup{ \line { \huge\bold Ave Maria} } subtitle = \markup{ \line {\bold 1st \hspace #1 Movement; The Annunciation} } %% subsubtitle = #(string-append "LilyPond version " (lilypond-version)) subsubtitle = \markup\center-align { "soprano; C clef on 1th line, alto; C clef on 3th line." " bass; F clef on 4th line, tenor; C clef on 4th line."} composer = "Yukio Yoshida" arranger = "Fri 01 JST 2008" poet = "Yukio Yoshida" opus = "Op. 27, No.1" meter = "Largo" copyright = "Yukio Yoshida" } %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%% soprano = { %% 1- \autoBeamOff \repeat volta 2 { e''2^\<\melisma cis''4.. d''2\!^\pp\melismaEnd r16 | } \repeat volta 2 { c''8 e''2. d''2 r8 | } g'8 a'4. fis'16 a'4.. cis''2 | \break %% -5 e'4 e' a'8 a'4. e'4 a'8 a' | d''2 e''4. fis''2 r8 | %% 6-7(8) \new Voice = "sopranoTwo" \repeat volta 2 { c''8 e''2. d''2 r8 | } a'2 cis''1 | \break %% 8-9 R1. | R1. | \break %% 10-11 \stemDown fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16\melisma d'16 cis' d'\melismaEnd e' r16 g'4..\) | \break \transpose c f { fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16\melisma d'16 cis' d'\melismaEnd e' r16 g'4..\) | } \break %% 12-15 R1. | R1. | R1. | e''4.-. e''4-. e''-. e''-. e''4.-. | \break %% 16-19 r4 e''2. e''2 | r16 e''4.. e''4 e''2. | R1. | e''4.^\pp\>^\markup{ \hspace #-6 \column { \bold\italic "Tutti; f.o." " " } } e''4 e'' e'' e''4.\!\pppp \bar "|." } sopranoL = \lyricmode { %% 1- æ2 __ | Ma8 -- ri2. -- a!2 | was8 telling4. and16 Received4.. That2 | \break %% -5 frám4 SOURCE,4 To8 redeem4. people!4 To8 the8 | Lord's2 Bir4. -- th!2 | %% 6-7(8) received2 That.1 | %% 8-9 R1.*2 %% 10-11 So16 this8 time!8 She8 accepted8. Je16 __ sus's16 birth!4.. | So16 this8 time!8 She8 accepted8. Je16 __ sus's16 birth!4.. | \break %% 12-15 A4. ve4 Ma ri a!4. %% 16-19 A2. ve2 Ma4.. ri4 a!2. A4. ve4 Ma ri a!4. | } sopranoLROne = \lyricmode { Ma8 -- ri2. -- a!2 } sopranoLRTwo = \lyricmode { æ8 __ _ } %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%% alto = { %% 1- \autoBeamOff \repeat volta 2 { a'2^\<\melisma fis'4.. g'2\!^\pp\melismaEnd r16 | } \repeat volta2 { f'8 a'2. g'2 r8 | } a8 b4. g16 b4.. d'2 | \break %% -5 fis4 fis4 b8 b4. fis4 b8 b | e'2 fis'4. g'2 r8 | %% 6-7(8) \new Voice = "altoTwo" \repeat volta2 { f'8 a'2. g'2 r8 | } b2 d'1 | \break %% 8-9 R1. | R1. | \break %% 10-11 \transpose c f, { fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16\melisma d'16 cis' d'\melismaEnd e' r16 g'4..\) | } fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16\melisma d'16 cis' d'\melismaEnd e' r16 g'4..\) | \break %% 12-15 R1. | R1. | a'4.-. a'4-. a'4-. a'-. a'4.-. | R1. | \break %% 16-19 r4 a'2. a'2 | r16 a'4.. a'4 a'2. | R1. | a'4.^\pp\> a'4 a' a' a'4.\!\pppp \bar "|." } altoL = \lyricmode { %% 1-3(5) æ2 __ | Ma8 -- ri2. -- a!2 | was8 telling4. and16 Received4.. That2 | \break %% -5 frám4 SOURCE,4 To8 redeem4. people!4 To8 the8 | Lord's2 Bir4. -- th!2 | %% 6-7(8) received2 That.1 | %% 8-9 R1.*2 %% 10-11 So16 this8 time!8 She8 accepted8. Je16 __ sus's16 birth!4.. | So16 this8 time!8 She8 accepted8. Je16 __ sus's16 birth!4.. | \break %% 12-15 A4. ve4 Ma4 ri4 a!4. \break %% 16-19 A2. ve2 Ma4.. ri4 a!2. A4. ve4 Ma4 ri4 a!4. | } altoLROne = \lyricmode { Ma8 -- ri2. -- a!2 } altoLRTwo = \lyricmode { æ8 __ _ } %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%% tenor = { %% 1-3(5) \autoBeamOff \repeat volta 2 { d'8-. cis'-. b-. cis'4-. r8 d'8^\( cis' b8. cis'4\) r16 | } \repeat volta 2 { \setTextDim bes8^\> d'2. cis'2\! r8 | } a8 b4. g16 b4.. d'2 | \break %% -5 fis4 fis4 b8 b4. fis4 b8 b | e'2 fis'4. g'2 r8 | %% 6-7(8) \new Voice = "tenorTwo" \repeat volta 2 { \setTextDim bes8^\> d'2. cis'2\! r8 | } b2^\< d'1\!^\pp | \break %% 8-9 \transpose c c' { d16-. d8-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\) | } \transpose c f' { d16-. d8-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\) | } \break %% 10-11 R1. | R1. | \break %% 12-15 R1. | d'4.-. d'4-. d'-. d'-. d'4.-. | R1. | R1.| \break %% 16-19 r4 d'2. d'2 | r16 d'4.. d'4 d'2. | R1. | d'4.\pp^\> d'4 d' d' d'4.\pppp\! \bar "|." } tenorL = \lyricmode { %% 1 Just8 at8 this8 moment!4 That8 was8 tell8.-- ing4 | óu __ _ _ | %% 3 was8 telling4. and16 Received4.. That2 | \break %% 4-5 frám4 SOURCE,4 To8 redeem4. people!4 To8 the8 | Lord's2 Bir4. -- th!2 | %% 6-7(8) received2 That.1 | \break %%8- So16 this time8 she8 received8. to16 the con -- cep -- tion of Jesus. | So16 this time8 she8 received8. to16 the con -- cep -- tion of Jesus. | \break %% 10-11 %% R1 * 2 | %%\break %% 12-15 A4. ve4 Ma4 ri4 a!4. \break %% 16-19 A2. ve2 Ma4.. ri4 a!2. A4. ve4 Ma4 ri4 a!4. | } tenorLR = \lyricmode { %% 2Repeat-part Fró8 -- m8 the8 Source4 to8 Ma8 -- ri8. -- a!4 | Ma8 -- ri2. -- a!2 | } tenorLROne = \lyricmode { óu __ _ _ } tenorLRTwo = \lyricmode { Ma8 -- ri2. -- a!2 } %%%%%%% bass; part %%%%%%%%%%%%%%%% bass = { %% 1-3(5) \autoBeamOff \repeat volta 2 { d8-. cis-. b,-. cis4-. r8 d8^\( cis b,8. cis4\) r16 | } \repeat volta 2 { \setTextDim bes,8^\> d2. cis2\! r8 | } e8 fis4. d16 fis4.. a2 | \break %% -5 cis4 cis fis8 fis4. cis4 fis8 fis | b2 cis'4. d'2 r8 | %% 6-7(8) \new Voice = "bassTwo" \repeat volta 2 { \setTextDim bes,8^\> d2. cis2\! r8 | } fis2^\< a1\!^\pp | \break %% 8-9 \stemDown d16-. d8-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\) | \transpose c f { d16-. d8-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\) | } \break %% 10-11 R1. | R1. | \break %% 12-15 d4.-. d4-. d-. d-. d4.-. | R1. | R1. | R1. | \break %% 16-19 r4 d2. d2 | r16 d4.. d4 d2. | R1. | d4.\pp^\> d4 d d d4.\pppp\! \bar "|." } bassL = \lyricmode { %% 1 Just8 at8 this8 moment!4 That8 was8 tell8.-- ing4 | óu __ _ _ | %% 3 was8 telling4. and16 Received4.. That2 | \break %% 4-5 frám4 SOURCE,4 To8 redeem4. people!4 To8 the8 | Lord's2 Bir4. -- th!2 | %% 6-7(8) received2 That.1 | \break %% 8-9 So16 this time8 she8 received8. to16 the con -- cep -- tion of Jesus. | So16 this time8 she8 received8. to16 the con -- cep -- tion of Jesus. | \break %% 10-11 %% R1 * 2 | %%\break %% 12-15 A4. ve4 Ma4 ri4 a!4. \break %% 16-19 A2. ve2 Ma4.. ri4 a!2. A4. ve4 Ma4 ri4 a!4. | } bassLR = \lyricmode { %% 2Repeat-part Fró8 -- m8 the8 Source4 to8 Ma8 -- ri8. -- a!4 | Ma8 -- ri2. -- a!2 | } bassLROne = \lyricmode { óu __ _ _ } bassLRTwo = \lyricmode { Ma8 -- ri2. -- a!2 } %%%%%%%%%% midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% sopranoM = { %% 1- \autoBeamOff \repeat volta 2 { e''2\pppp cis''4..\ppp d''2\ppp r16 | } \repeat volta 2 { c''8 e''2. d''2 r8 | } e'8 fis'4. d'16 fis'4.. a'2 | \break %% -5 cis'4 cis'4 fis'8 fis'4. cis'4 fis'8 fis' | b'2 cis''4. d''2 r8 | %%6-7(8) \repeat volta 2 { c''8 e''2. d''2 r8 | } fis'2 a'1 | \break %% 8-9 R1. | R1. | \break %% 10-11 fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16 d'16 cis' d' e' r16 g'4..\) | \transpose c c' { fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16 d'16 cis' d' e' r16 g'4..\) | } \break %% 12-15 R1. | R1. | R1. | e''4.-. e''4-. e''-. e''-. e''4.-. | \break %% 16-19 r4 e''2. e''2 | r16 e''4.. e''4 e''2. | R1. | e''4.\ppp e''4 e''\pppp e'' e''4.\pppp \bar "|." } altoM = { %% 1- \autoBeamOff \repeat volta 2 { a'2\pppp fis'4..\ppp g'2\ppp r16 | } \repeat volta2 { f'8 a'2. g'2 r8 | } a8 b4. g16 b4.. d'2 | \break %% -5 fis4 fis4 b8 b4. fis4 b8 b | e'2 fis'4. g'2 r8 | %% 6-7(8) \repeat volta2 { f'8 a'2. g'2 r8 | } b2 d'1 | \break %% 8-9 R1. | R1. | \break %% 10-11 \transpose c c' { fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16 d'16 cis' d' e' r16 g'4..\) | } fis'16-. fis'8-. e'8-. r16 cis'8\( d'8. e'16 d'16 cis' d' e' r16 g'4..\) | \break %% 12-15 R1. | R1. | a'4.-. a'4-. a'4-. a'-. a'4.-. | R1. | \break %% 16-19 r4 a'2. a'2 | r16 a'4.. a'4 a'2. | R1. | a'4.\ppp a'4 a'\pppp a' a'4.\pppp \bar "|." } tenorM = { %% 1- \autoBeamOff \repeat volta 2 { d'8-.\sf cis'-.\sf b-.\sf cis'4-.\sf r8 d'8\mp cis'\p b8.\p cis'4\pp r16 | } \repeat volta 2 { b8\pppp d'2.\pppp cis'2\pppp r8 | } a8 b4. g16 b4.. d'2 | \break %% -5 fis4 fis4 b8 b4. fis4 b8 b | e'2 fis'4. g'2 r8 | %% 6-7(8) \repeat volta 2 { b8\pppp d'2.\pppp cis'2\pppp r8 | } b2\ppp d'1\pp | \break %% 8-9 \transpose c c' { d8-. d16-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\) | } \transpose c f' { d8-. d16-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\) | } \break %% 10-11 R1. | R1. | \break %% 12-15 R1. | d'4.-. d'4-. d'-. d'-. d'4.-. | R1. | R1.| \break %% 16-19 r4 d'2. d'2 | r16 d'4.. d'4 d'2. | R1. | d'4.\ppp d'4 d'\pppp d' d'4.\pppp \bar "|." } bassM = { %% 1- \autoBeamOff \repeat volta 2 { d8-.\sf cis-.\sf b,-.\sf cis4-.\sf r8 d8\mp cis\p b,8.\p cis4\pp r16 | } \repeat volta 2 { b,8\pppp d2.\pppp cis2\pppp r8 | } e8 fis4. d16 fis4.. a2 | \break %% -5 cis4 cis fis8 fis4. cis4 fis8 fis | b2 cis'4. d'2 r8 | %% 6-7(8) \repeat volta 2 { bes,8\pppp d2.\pppp cis2\pppp r8 | } fis2\ppp a1\pp | \break %% 8-9 d16\sf-. d8-. cis8-. r16 b,8 cis8. d16 cis16 b, cis d e16 fis4..\ff | \transpose c f { d16\sf-. d8-. cis8-. r16 b,8^\( cis8. d16 cis16 b, cis d e16 fis4..\ff\) | } \break %% 10-11 R1. | R1. | \break %% 12-15 d4.-. d4-. d-. d-. d4.-. | R1. | R1. | R1. | \break %% 16-19 r4 d2. d2 | r16 d4.. d4 d2. | R1. | d4.\ppp d4 d\pppp d d4.\pppp \bar "|." } %% get sheet music -------------------------------------------------------- \score { << \context ChoirStaff = "FourPartStaffaddchorus" << \new Voice = "soprano" { \clef soprano \key d\major \time 3/2 \set Staff.instrumentName = "soprano" \soprano } \new Lyrics = "mainSL" \lyricsto "soprano" { \sopranoL } \context Lyrics = "mainSL" \lyricsto "sopranoTwo" { \sopranoLROne } \new Lyrics = "bassTwoR" \lyricsto "sopranoTwo" { \set stanza = "repeat-part; " \sopranoLRTwo } \new Voice = "alto" { \clef alto \key d\major \time 3/2 \set Staff.instrumentName = "alto " \alto } \new Lyrics = "mainAL" \lyricsto "alto" { \altoL } \context Lyrics = "mainAL" \lyricsto "altoTwo" { \altoLROne } \new Lyrics = "bassTwoR" \lyricsto "altoTwo" { \set stanza = "repeat-part; " \altoLRTwo } \new Voice = "tenor" { \clef tenor \key d\major \time 3/2 \set Staff.instrumentName = "tenor " \tenor } \new Lyrics = "mainTL" \lyricsto "tenor" { \tenorL } \new Lyrics = "repeatTR" \lyricsto "tenor" { \set stanza = "repeat-part; " \tenorLR } \context Lyrics = "mainTL" \lyricsto "tenorTwo" { \tenorLROne } \new Lyrics = "bassTwoR" \lyricsto "tenorTwo" { \set stanza = "repeat-part; " \tenorLRTwo } \new Voice = "bass" { \clef bass \key d\major \time 3/2 \set Staff.instrumentName = "bass " \bass } \new Lyrics = "mainBL" \lyricsto "bass" { \bassL } \new Lyrics = "repeatBR" \lyricsto "bass" { \set stanza = "repeat-part; " \bassLR } \context Lyrics = "mainBL" \lyricsto "bassTwo" { \bassLROne } \new Lyrics = "bassTwoR" \lyricsto "bassTwo" { \set stanza = "repeat-part; " \bassLRTwo } >> %%\context PianoStaff = "PianoStaff" << %%\new Voice = "piano" { \clef treble \key d\major \time 3/2 %% \set Staff.instrumentName = "piano " \pianoUP } %%\new Voice = "piano" { \clef bass \key d\major \time 3/2 %% \set Staff.instrumentName = "piano " \pianoDown } %% >> >> \layout { \context { \RemoveEmptyStaffContext } } } %% get midi music --------------------------------------------------------- \score { << \new Staff { \clef soprano \key d\major \time 3/2 \tempo 4 = 40 \set Staff.midiInstrument = "pad 4 (choir)" \unfoldRepeats \sopranoM } \new Staff { \clef alto \key d\major \time 3/2 \tempo 4 = 40 \set Staff.midiInstrument = "pad 4 (choir)" \unfoldRepeats \altoM } \new Staff { \clef tenor \key d\major \time 3/2 \tempo 4 = 40 \set Staff.midiInstrument = "pad 4 (choir)" \unfoldRepeats \tenorM } \new Staff { \clef bass \key d\major \time 3/2 \tempo 4 = 40 \set Staff.midiInstrument = "pad 4 (choir)" \unfoldRepeats \bassM } %%\new Staff { \clef treble \key d\major \time 3/2 \tempo 4 = 40 %% \set Staff.midiInstrument = "acoustic grand" %% \unfoldRepeats \pianoUPm } %%\new Staff { \clef bass \key d\major \time 3/2 \tempo 4 = 40 %% \set Staff.instrumentName = "acoustic grand" %% \unfoldRepeats \pianoDownm } >> \midi { tempoWholesPerMinute = #(ly:make-moment 40 4) } }