1 %% 1:11 AM Wednesday, February 2, 2022
  2 %% Yukio Yoshida
  3 %% Part Vocal;; Start: \hide Staff.BarLine
  4 %%              and end: \undo \hide Staff.BarLine \bar "|." \break 
  5 %%              And have to "Score" { \context StaffGroup << 
  6 \version "2.22.1"
  7 #(set-default-paper-size "letter")
  8 #(set-global-staff-size 16)
  9 
 10 \paper {
 11         %%ragged-last-bottom = ##f
 12 }
 13 
 14 \header {
 15  dedication = "Text from Requiem-ceremony(part-of; Confutátis)"
 16  title = \markup{ \line { \huge\bold  "Confutátis"} }
 17  subtitle = \markup{ \line {\bold "2010" }}
 18  %% subsubtitle = #(string-append "LilyPond version " (lilypond-version))
 19  subsubtitle = \markup{\center-column {
 20                    "soprano; C clef on 1st line,       alto; C clef on 3rd line."
 21                    "       bass; F clef on 4th line,    tenor; C clef on 4th line."}}
 22  composer = \markup { \hspace #-26 "Yukio Yoshida" }
 23  arranger = "Dec. 15, 2010"
 24  poet = \markup { \hspace #40 \tiny \italic \column {
 25                           " "
 26                           \line { \hspace #-20 \bold "Prayers;(Latin)"}
 27                           "Confutátis maledictis,"
 28                           "Flámmis ácribus addictis,"
 29                           "Vóca me cum benedictis."
 30                           "Oro súpplex et acclinis"
 31                           "Cor contritum quási cinis:"
 32                           "Gére cúram méi finis."
 33                           \line { \hspace #20 \normal-text "from; Requem-ceremony" }
 34                                                   " " }
 35                            }
 36  opus = "Op.54 Confutátis"
 37  meter = "Vivace"
 38  copyright = "public Domain"
 39 }
 40 
 41 %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
 42 soprano = { \hide Staff.BarLine
 43     \autoBeamOff
 44 %% 1-4
 45    c''2^\markup { \tiny \italic "like fire" } d''4 e''2. | f''1 r4 e''4( |
 46    f''2) b'4 f'( e' d') | r4 c'1~ c'4-- | \break
 47 %% 5-8
 48    c'4. c''4. r4 a'2 | f'4 d'2. r4 a'4~ | a'4 b'2 e'2.~ | e'2-- r1 | \break
 49 %% 9-12
 50    r2. c''4( d''8) e'' f''4 | g''2. r2. | e'2 e' e' | f''1. | \break
 51 %% 13-16
 52    f''1.\melisma | d'' | b' | g'1. | \break
 53 %% 17-21
 54    g'4\melismaEnd r2 c'2. | c'2 c'' d'' | e''2. e'' | a'2. g'4_( f' e' | c'1.) |
 55    \break
 56 %% 22-26
 57    r2. c''2. | d'' d'' | e''1 r4 e''4~ | e''4. f''2. g''4. | a''1. | \break
 58 %% 27
 59    \time 4/1 a''\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
 60 }
 61 
 62 sopranoL = \lyricmode {
 63     \override Score . LyricText #'font-shape = #'italic
 64     \tiny
 65 Con -- fu ---- tis ma -- le -- di -- ctis,
 66 Flám -- mis á -- cri -- bus ad -- di -- ctis,
 67 -- ca me cum be -- ne -- di -- ctis.
 68 %% O -- ro súp -- plex et ac -- cli -- nis
 69 á __
 70 Cor con -- tri -- tum quá -- si ci -- nis:
 71 -- re cú -- ram mé -- i fi -- nis.
 72 }
 73 
 74 sopranoM = {
 75     \autoBeamOff
 76 %% 1-4
 77    c''2 d''4 e''2. | f''1 r4 e''4( | f''2) b'4 f'( e' d') | r4 c'1~ c'4-- | \break
 78 %% 5-8
 79    c'4. c''4. r4 a'2 | f'4 d'2. r4 a'4~ | a'4 b'2 e'2.~ | e'2-- r1 | \break
 80 %% 9-
 81    r2. c''4( d''8) e'' f''4 | g''2.  r2. | e'2 e' e' | f''1. | \break
 82 %% 13-16
 83    f''1.\melisma | d'' | b' | g' | \break
 84 %% 17-21
 85    g'4\melismaEnd r2 c'2. | c'2 c'' d'' | e''2. e'' | a'2. g'4( f' e' | c'1.) |
 86    \break
 87 %% 22-26
 88    r2. c''2. | d'' d'' | e''1 r4 e''4~ | e''4. f''2. g''4. | a''1. | \break
 89 %% 27
 90    \time 4/1 a''\longa \bar "|." \time 3/2 \break
 91 }
 92 
 93 %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%%
 94 alto = { \hide Staff.BarLine
 95      \autoBeamOff
 96 %% 1-4
 97    c'2-.^\markup { \tiny \italic "heat of anger" } c'4-. c'2.-. |
 98    c'1-. c'2-.( | c'2-.) r4 a4-. a2-.( | a4-.) r4 g1-. | \break
 99 %% 5-8
100    r8 f2..-. g2-. | a8-. a4-. f2..-. r4 | g2-. g-. f-.~ | f2-.-- r1 | \break
101 %% 9-12
102    r2. a2 a4~ | a4 a2 b'2. | r2. c'4( d'8) e' f'4 | g'1. | \break
103 %% 13-16
104    g'1.\melisma | e' | c' | a | \break
105 %% 17-21
106    a4\melismaEnd r2. f2 | f2 f' g' | a'2. a' | d'2. a2.( | f1.) | \break
107 %% 22-26
108    r2 c'2. d'4~ | d'4. d'2. e'4.~ | e'2.. r4 e'4.~ | e'4. f'2. g'4. | a'1. | \break
109 %% 27
110    \time 4/1 a'\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
111 }
112 
113 altoL = \lyricmode {
114     \override Score . LyricText #'font-shape = #'italic
115     \tiny
116 Con -- fu ---- tis ma -- le -- di -- ctis,
117 Flám -- mis á -- cri -- bus ad -- di -- ctis,
118 -- ca me cum be -- ne -- di -- ctis.
119 %% O -- ro súp -- plex et ac -- cli -- nis
120 á __
121 Cor con -- tri -- tum quá -- si ci -- nis:
122 -- re cú -- ram mé -- i fi -- nis.
123 }
124 
125 altoM = {
126      \autoBeamOff
127 %% 1-4
128    c'2-. c'4-. c'2.-. | c'1-. c'2-.( | c'2-.) r4 a4-. a2-.( |
129    a4-.) r4 g1-. | \break
130 %% 5-8
131    r8 f2..-. g2-. | a8-. a4-. f2..-. r4 | g2-. g-. f-.~ | f2-.-- r1 | \break
132 %% 9-12
133    r2. a2 a4~ | a4 a2 b'2. | r2. c'4( d'8) e' f'4 | g'1. | \break
134 %% 13-16
135    g'1.\melisma | e' | c' | a | \break
136 %% 17-21
137    a4\melismaEnd r2. f2 | f2 f' g' | a'2. a' | d'2. a2.( | f1.) | \break
138 %% 22-26
139    r2 c'2. d'4~ | d'4. d'2. e'4.~ | e'2.. r4 e'4.~ | e'4. f'2. g'4. | a'1. | \break
140 %% 27
141    \time 4/1 a'\longa \bar "|." \time 3/2 \break
142 }
143 
144 %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
145 tenor = { \hide Staff.BarLine
146      \autoBeamOff
147 %% 1-4
148    R1. | f4.-.^\markup { \tiny \italic "heat of anger" } a8-. c'4-. f2.-. |
149    R1. | g4.-. b8-. d'4-. g2.-. | \break
150 %% 5-8
151    r8 d'2..-. e'2-. | c'2-. a-. f-. | r4 c'4-. r4 a4-. r4 f4-. | R1. | \break
152 %% 9-12
153    g1.\melisma | a | b | c' | \break
154 %% 13-16
155    c'4\melismaEnd r2 e'2. | e'2. c'2 c'4~ | c'2 b4 a2. | a2 f1 | \break
156 %% 17-21
157    r4 f2. f2 | f'2. g' | R1. | c'2. a | f2 d1 | \break
158 %% 22-26
159    c'2. c' | d' d' | r2. e'2. | e'  f' | g'1. | \break
160 %% 27
161    \time 4/1 g'\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
162 }
163 
164 tenorL = \lyricmode {
165     \override Score . LyricText #'font-shape = #'italic
166     \tiny
167 Con -- fu ---- tis ma -- le -- di -- ctis,
168 Flám -- mis á -- cri -- bus ad -- di -- ctis,
169 %%Vó -- ca me cum be -- ne -- di -- ctis.
170 ó __
171 O -- ro súp -- plex et ac -- cli -- nis
172 Cor con -- tri -- tum quá -- si ci -- nis:
173 -- re cú -- ram mé -- i fi -- nis.
174 }
175 
176 tenorM =  {
177      \autoBeamOff
178 %% 1-4
179    R1. | f4.-. a8-. c'4-. f2.-. | R1. | g4.-. b8-. d'4-. g2.-. | \break
180 %% 5-8
181    r8 d'2..-. e'2-. | c'2-. a-. f-. | r4 c'4-. r4 a4-. r4 f4-. | R1. | \break
182 %% 9-12
183    g1.\melisma | a | b | c' | \break
184 %% 13-16
185    c'4\melismaEnd r2 e'2. | e'2. c'2 c'4~ | c'2 b4 a2. | a2 f1 | \break
186 %% 17-21
187    r4 f2. f2 | f'2. g' | R1. | c'2. a | f2 d1 | \break
188 %% 22-26
189    c'2. c' | d' d' | r2. e'2. | e'  f' | g'1. | \break
190 %% 27
191    \time 4/1 g'\longa \bar "|." \time 3/2 \break
192 }
193 
194 %%%%%%% bass; part %%%%%%%%%%%%%%%%
195 bass = { \hide Staff.BarLine
196    \autoBeamOff
197 %% 1-4
198    r8^\markup { \tiny \italic "like fire" } b,4 d8 f4 b,2. | R1. |
199    r8 c4 e8 g4 c2. | R1. | \break
200 %% 5-8
201    g2.. a2 r8 | f4. r8 d4. r8 b,4. r8 | c2 d b, | R1. | \break
202 %% 9-12
203    c1.\melisma | d | e | f | \break
204 %% 13-16
205    f4\melismaEnd r2 a2. | a2. f2 f4~ | f2 e4 d2. | d2 b,1 | \break
206 %% 17-21
207    r4 b,2 b,2. | b c' | R1. | f2. d | b,1. | \break
208 %% 22-26
209    c2. c | d d | r2. e2. | e  f | g1. | \break
210 %% 27
211    \time 4/1 g\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
212 }
213 
214 bassL = \lyricmode {
215     \override Score . LyricText #'font-shape = #'italic
216     \tiny
217 Con -- fu ---- tis ma -- le -- di -- ctis,
218 Flám -- mis á -- cri -- bus ad -- di -- ctis,
219 %%Vó -- ca me cum be -- ne -- di -- ctis.
220 ó __
221 O -- ro súp -- plex et ac -- cli -- nis
222 Cor con -- tri -- tum quá -- si cinis:
223 -- re cú -- ram mé -- i fi -- nis.
224 }
225 
226 bassM = {
227    \autoBeamOff
228 %% 1-4
229    r8 b,4 d8 f4 b,2. | R1. | r8 c4 e8 g4 c2. | R1. | \break
230 %% 5-8
231    g2.. a2 r8 | f4. r8 d4. r8 b,4. r8 | c2 d b, | R1. | \break
232 %% 9-12
233    c1.\melisma | d | e | f | \break
234 %% 13-16
235    f4\melismaEnd r2 a2. | a2. f2 f4~ | f2 e4 d2. | d2 b,1 | \break
236 %% 17-21
237    r4 b,2 b,2. | b c' | R1. | f2. d | b,1. | \break
238 %% 22-26
239    c2. c | d d | r2. e2. | e  f | g1. | \break
240 %% 27
241    \time 4/1 g\longa \bar "|." \time 3/2 \break
242 }
243 
244 
245 %%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
246 %% get sheet music ---------------------------------------------------------------
247 \score {
248          <<
249 %%           \context ChoirStaff = "FourPartStaffaddchorus" <<
250              \context StaffGroup <<
251            \new Voice = "soprano" { \clef soprano \key c\major \time 3/2
252                         \set Staff.instrumentName = "soprano" \soprano }
253                         \new Lyrics = "mainSL" \lyricsto "soprano" { \sopranoL }
254 
255            \new Voice = "alto" { \clef alto \key c\major \time 3/2
256                         \set Staff.instrumentName = "alto   " \alto }
257                         \new Lyrics = "mainAL" \lyricsto "alto" { \altoL }
258 
259            \new Voice = "tenor" { \clef tenor \key c\major \time 3/2
260                         \set Staff.instrumentName = "tenor  " \tenor }
261                         \new Lyrics = "mainTL" \lyricsto "tenor" { \tenorL }
262 
263            \new Voice = "bass" { \clef bass \key c\major \time 3/2
264                         \set Staff.instrumentName = "bass   " \bass }
265                         \new Lyrics = "mainBL" \lyricsto "bass" { \bassL }
266                                            >>
267 
268            %%\context PianoStaff = "PianoStaff" <<
269            %%\new Voice = "piano" { \clef treble \key c\major \time 3/2
270            %%             \set Staff.instrumentName = "piano  " \pianoUP }
271            %%\new Voice = "piano" { \clef bass \key c\major \time 3/2
272            %%             \set Staff.instrumentName = "piano  " \pianoDown }
273            %%                                   >>
274 
275          >>
276 
277   \layout {
278             \context { \RemoveEmptyStaffContext
279                        \override VerticalAxisGroup #'remove-first = ##t
280                       }
281            }
282 }
283 
284 %% get midi music ----------------------------------------------------------------
285 \score {
286          <<
287            \new Staff { \clef soprano \key c\major \time 3/2 \tempo 4 = 68
288                          \set Staff.midiInstrument = "pad 2 (warm)"
289                                          \unfoldRepeats       \sopranoM }
290 
291            \new Staff { \clef alto \key c\major \time 3/2 \tempo 4 = 68
292                          \set Staff.midiInstrument = "pad 2 (warm)"
293                                          \unfoldRepeats          \altoM }
294 
295            \new Staff { \clef tenor \key c\major \time 3/2 \tempo 4 = 68
296                          \set Staff.midiInstrument = "pad 2 (warm)"
297                                          \unfoldRepeats       \tenorM }
298 
299            \new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 68
300                          \set Staff.midiInstrument = "pad 2 (warm)"
301                                          \unfoldRepeats          \bassM }
302 
303            %%\new Staff { \clef treble \key c\major \time 3/2 \tempo 4 = 68
304            %%             \set Staff.midiInstrument = "acoustic grand"
305            %%                                \unfoldRepeats       \pianoUPm }
306            %%\new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 68
307            %%             \set Staff.instrumentName = "acoustic grand"
308            %%                                \unfoldRepeats     \pianoDownm }
309          >>
310 
311    \midi { tempoWholesPerMinute = #(ly:make-moment 68 4) }
312 }
313 
314 \markup { " " }
315 \markup { \column { \line {
316 About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
317 \line { \italic " Please, playing of \"longa and breve\" do in the members alternating(But, like Don't stand out). " } } }
318 \markup { " " }