1 %% 6:59 AM Wednesday, January 26, 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 18)
  9 
 10 \paper {
 11         ragged-last-bottom = ##f
 12 }
 13 
 14 \header {
 15  dedication = "Text from Requiem-ceremony(part-of; Lacrimósa dies illa,)"
 16  title = \markup{ \line { \huge\bold  "Lacrimósa dies illa"} }
 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{ \line {\italic "Yukio Yoshida"}}
 23  arranger = "Jan. 08, JST 2010"
 24  poet = "Prayers"
 25  opus = "Op.42 Lacrimósa dies illa"
 26  meter = "Vivace"
 27  copyright = "public Domain"
 28 }
 29 
 30 %%%%%%%%% Add soprano solo(two singers alternating) %%%%%%%%%%%%%%%%%%%%%
 31 Addsoprano = {
 32    \override Staff.StaffSymbol #'color = #red
 33    \override Staff.LedgerLineSpanner #'color = #red
 34    \override NoteHead #'color = #red
 35    \override Stem #'color = #red
 36  %% 1-11
 37     R1. * 5 |
 38     \repeat volta 2 { R1. * 6 }
 39 %%  12-19
 40     R1. * 8 |
 41 %%  20-23
 42     b''2.^\markup { \teeny \italic "Solo(two singers alternating)" }
 43          _\markup { \teeny  \italic "Dó" } a''_\markup { \teeny  \italic "na" } |
 44     b''_\markup { \teeny  \italic "é" } a''_\markup { \teeny  \italic "is" } |
 45     b''_\markup { \teeny  \italic "Dó" } a''_\markup { \teeny  \italic "na" } |
 46     b''_\markup { \teeny  \italic "é" } a''_\markup { \teeny  \italic "is" } | \break
 47 %%  24-25
 48     \time 2/1 b''\breve_\markup { \teeny  \italic "A" } |
 49     \time 4/1 c'''\longa * 1/4_\markup { \teeny  \italic "men" } s\longa * 3/4
 50     \time 3/2 \bar "|." \break
 51 }
 52 
 53 %{
 54 AddsopranoL = \lyricmode {
 55     \override Score . LyricText #'font-shape = #'italic
 56     \teeny
 57     Dó -- na é -- is Dó -- na é -- is
 58     A -- men.
 59 }
 60 %}
 61 
 62 AddsopranoM = {
 63  %% 1-11
 64     R1. * 5 |
 65     \repeat volta 2 { \tempo 4 = 40 R1. * 5 | \tempo 4 = 68 R1. | }
 66 %%  12-19
 67     R1. * 8 |
 68 %%  20-23
 69     b''2. a'' | b'' a'' | b'' a'' | b'' a'' | \break
 70 %%  24-25
 71     \time 2/1 b''\breve | \time 4/1 c'''\longa \time 3/2 \bar "|." \break
 72 }
 73 
 74 %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
 75 soprano = { \hide Staff.BarLine
 76     \autoBeamOff
 77 %% 1-4
 78     d'2. e'8 f'4. g'4~ | g'4 a'2. b'8 c''4. | d''2 r4 d'2.^\sfz |
 79     r4 c'4-. r8 c'4-. r8 c'4-. r4 | \break
 80 %% 5-8
 81     \times 2/3 { d'4.-. r8 e'2-. f'-. } g'2-. |
 82     \repeat volta 2 { \times 2/3 {
 83     d'4.-.^\markup{ \hspace #-2 \italic "riten" } r8 d'2-. d'-. } d'2-. |
 84     r8 d''4.-. e''4-. f''4. g''4. | f''2 e'' f'' | \break
 85 %% 9-13
 86     e''4. r8 f''2 e'' | f''2 f''1 | R1. | }
 87     e''2.^\markup { \italic "a tempo" } c'' | a' f' | \break
 88 %% 14-19
 89     e'1 d'2~ | d' c'1 | g'1 f'2 | g'2 g'2. r4 | a'1  g'2 | a'2 a'2.. r8 | \break
 90 %% 20-23
 91     g'4.. a'8. g'4.. a' | c'2 d'8 e'2.. | a'4.. b'8. a'4.. b' |
 92     d'4. e'8 f'2.. r8 | \break
 93 %% 24-25
 94     \time 2/1 d'\breve | \time 4/1 c'\longa * 1/4 s\longa * 3/4
 95     \time 3/2 \undo \hide Staff.BarLine \bar "|." \break
 96 }
 97 
 98 sopranoL = \lyricmode {
 99     \override Score . LyricText #'font-shape = #'italic
100     \tiny
101     La -- cri ---- sa di -- es il -- la,
102     Qua re -- súr -- get ex fa -- vil -- la
103     Ju -- di -- cán -- dus hó -- mo ré -- us:
104 -- ic ér -- go pár -- ce Dé -- us.
105     Pi -- e-- su Dó -- mi -- ne,
106     La -- cri ---- sa di -- es il -- la,
107 -- na é -- is ré -- qui -- em
108 -- na é -- is ré -- qui -- em
109     A -- men.
110 }
111 
112 sopranoM = {
113     \autoBeamOff
114 %% 1-4
115     d'2. e'8 f'4. g'4~ | g'4 a'2. b'8 c''4. | d''2 r4 d'2.^\sfz |
116     r4 c'4-. r8 c'4-. r8 c'4-. r4 | \break
117 %% 5-8
118     \times 2/3 { d'4.-. r8 e'2-. f'-. } g'2-. |
119     \repeat volta 2 { \tempo 4 = 40
120     \times 2/3 { d'4.-. r8 d'2-. d'-. } d'2-. |
121     r8 d''4.-. e''4-. f''4. g''4. | f''2 e'' f'' | \break
122 %% 9-13
123     e''4. r8 f''2 e'' | f'' f''1 | \tempo 4 = 68 R1. | }
124     e''2. c'' | a' f' | \break
125 %% 14-19
126     e'1 d'2~ | d' c'1 | g'1 f'2 | g'2 g'2. r4 | a'1  g'2 | a'2 a'2.. r8 | \break
127 %% 20-23
128     g'4.. a'8. g'4.. a' | c'2 d'8 e'2.. | a'4.. b'8. a'4.. b' |
129     d'4. e'8 f'2.. r8 | \break
130 %% 24-25
131     \time 2/1 d'\breve | \time 4/1 c'\longa \time 3/2 \bar "|." \break
132 }
133 
134 %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%%
135 alto = { \hide Staff.BarLine
136      \autoBeamOff
137 %% 1-4
138     g2. a8 b4. c'4~ | c'4 d'2. e'8 f'4. | g'2 r4 g2.^\sfz |
139     r4 f4-. r8 f4-. r8 f4-. r4 | \break
140 %% 5-8
141     \times 2/3 { g4.-. r8 a2-. b-. } c'2-. |
142     \repeat volta 2 { \times 2/3 {
143     g4.-.^\markup{ \hspace #-2 \italic "riten" } r8 g2-. g-. } g2-. |
144     r8 g'4.-. a'4-. b'4. c''4. | b'2 b' b' | \break
145 %% 9-13
146     a'2 a' a'4. r8 | b'2 b'1 | R1. | }
147     a'2.^\markup { \italic "a tempo" } f' | d' b | \break
148 %% 14-19
149     g1 f2~ | f f1 | c'1 b2 | c'2 c'2. r4 | d'1  c'2 | d'2 d'2.. r8 | \break
150 %% 20-23
151     c'4.. d'8. c'4.. d' | f2 g8 a2.. | d'4.. e'8. d'4.. e' |
152     g4. a8 b2.. r8 | \break
153 %% 24-25
154     \time 2/1 d'\breve | \time 4/1 c'\longa * 1/4 s\longa * 3/4
155     \time 3/2 \undo \hide Staff.BarLine \bar "|." \break
156 }
157 
158 altoL = \lyricmode {
159     \override Score . LyricText #'font-shape = #'italic
160     \tiny
161     La -- cri ---- sa di -- es il -- la,
162     Qua re -- súr -- get ex fa -- vil -- la
163     Ju -- di -- cán -- dus hó -- mo ré -- us:
164 -- ic ér -- go pár -- ce Dé -- us.
165     Pi -- e-- su Dó -- mi -- ne,
166     La -- cri ---- sa di -- es il -- la,
167 -- na é -- is ré -- qui -- em
168 -- na é -- is ré -- qui -- em
169     A -- men.
170 }
171 
172 altoM = {
173      \autoBeamOff
174 %% 1-4
175     g2. a8 b4. c'4~ | c'4 d'2. e'8 f'4. | g'2 r4 g2.^\sfz |
176     r4 f4-. r8 f4-. r8 f4-. r4 | \break
177 %% 5-8
178     \times 2/3 { g4.-. r8 a2-. b-. } c'2-. |
179     \repeat volta 2 { \tempo 4 = 40
180     \times 2/3 { g4.-. r8 g2-. g-. } g2-. |
181     r8 g'4.-. a'4-. b'4. c''4. |  b'2 b' b' | \break
182 %% 9-13
183     a'2 a' a'4. r8 | b'2 b'1 | \tempo 4 = 68 R1. | }
184     a'2. f' | d' b | \break
185 %% 14-19
186     g1 f2~ | f f1 | c'1 b2 | c'2 c'2. r4 | d'1  c'2 | d'2 d'2.. r8 | \break
187 %% 20-23
188     c'4.. d'8. c'4.. d' | f2 g8 a2.. | d'4.. e'8. d'4.. e' |
189     g4. a8 b2.. r8 | \break
190 %% 24-25
191     \time 2/1 d'\breve | \time 4/1 c'\longa \time 3/2 \bar "|." \break
192 }
193 
194 %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
195 tenor = { \hide Staff.BarLine
196      \autoBeamOff
197 %% 1-4
198     e2. e8 f4. f4~ | f4 g2. g8 a4. | a2 r4 e2.^\sfz |
199     r4 d4-. r8 d4-. r8 d4-. r4 | \break
200 %% 5-8
201     e8-. r4 f8-. r4 g8-. r4 a8-. r4 |
202     \repeat volta 2 {
203     f4-.^\markup{ \hspace #-2 \italic "riten" } r8 g4-. r8 a4-. r8 b4-. r8 |
204     d'4-. r8 d'4-. r8 f'4 r8 g'4. | f'2 e' f' | \break
205 %% 9-13
206     e'4. r8 f'2 e' | f'2 f'1 | R1. | }
207     e'2.^\markup { \italic "a tempo" } d' | e' d' | \break
208 %% 14-19
209     e'1 d'2_~ | d' e'1 | a1 g2 | a2 a2. r4 | b1 a2 | b2 b2.. r8 | \break
210 %% 20-23
211     a4.. b8. a4.. b | d2 e8 f2.. | b4.. c'8. b4.. c' |
212     e4. f8 g2.. r8 | \break
213 %% 24-25
214     \time 2/1 d'\breve | \time 4/1 c'\longa * 1/4 s\longa * 3/4
215     \time 3/2 \undo \hide Staff.BarLine \bar "|." \break
216 }
217 
218 tenorL = \lyricmode {
219     \override Score . LyricText #'font-shape = #'italic
220     \tiny
221     La -- cri ---- sa di -- es il -- la,
222     Qua re -- súr -- get ex fa -- vil -- la
223     Ju -- di -- cán -- dus hó -- mo ré -- us:
224 -- ic ér -- go pár -- ce Dé -- us.
225     Pi -- e-- su Dó -- mi -- ne,
226     La -- cri ---- sa di -- es il -- la,
227 -- na é -- is ré -- qui -- em
228 -- na é -- is ré -- qui -- em
229     A -- men.
230 }
231 
232 tenorM = {
233      \autoBeamOff
234 %% 1-4
235     e2. e8 f4. f4~ | f4 g2. g8 a4. | a2 r4 e2.^\sfz |
236     r4 d4-. r8 d4-. r8 d4-. r4 | \break
237 %% 5-8
238     e8-. r4 f8-. r4 g8-. r4 a8-. r4 |
239     \repeat volta 2 { \tempo 4 = 40
240     f4-. r8 g4-. r8 a4-. r8 b4-. r8 |
241     d'4-. r8 d'4-. r8 f'4 r8 g'4. | f'2 e' f' | \break
242 %% 9-13
243     e'4. r8 f'2 e' | f' f'1 | \tempo 4 = 68 R1. | }
244     e'2. d' | e' d' | \break
245 %% 14-19
246     e'1 d'2~ | d' e'1 | a1 g2 | a2 a2. r4 | b1 a2 | b2 b2.. r8 | \break
247 %% 20-23
248     a4.. b8. a4.. b | d2 e8 f2.. | b4.. c'8. b4.. c' |
249     e4. f8 g2.. r8 | \break
250 %% 24-25
251     \time 2/1 d'\breve | \time 4/1 c'\longa \time 3/2 \bar "|." \break
252 }
253 
254 %%%%%%% bass; part %%%%%%%%%%%%%%%%
255 bass = { \hide Staff.BarLine
256    \autoBeamOff
257 %% 1-4
258     g,2. g,8 a,4. a,4~ | a,4 b,2. b,8 c4. | c2 r4 a,2.^\sfz |
259     r4 g,4-. r8 g,4-. r8 g,4-. r4 | \break
260 %% 5-8
261     a,8-. r4 b,8-. r4 c8-. r4 d8-. r4 |
262     \repeat volta 2 {
263     b,4-.^\markup{ \hspace #-2 \italic "riten" } r8 c4-. r8 d4-. r8 e4-. r8 |
264     g4-. r8 g4-. r8 b4 r8 c'4. |  b2 b2 b2 | \break
265 %% 9-13
266     a2 a2 a4. r8 | b2 b1 | R1. | }
267     a2.^\markup { \italic "a tempo" } a | a a | \break
268 %% 14-19
269     a1 g2_~ | g g1 | d1 c2 | d2 d2. r4 | e1 d2 | d2 d2.. r8 |\break
270 %% 20-23
271     d4.. e8. d4.. d | g,2 a,8 b,2.. | e4.. f8. e4.. e |
272     a,4. b,8 c2.. r8 | \break
273 %% 24-25
274     \time 2/1 d\breve | \time 4/1 c\longa * 1/4 s\longa * 3/4
275     \time 3/2 \undo \hide Staff.BarLine \bar "|." \break
276 }
277 
278 bassL = \lyricmode {
279     \override Score . LyricText #'font-shape = #'italic
280     \tiny
281     La -- cri ---- sa di -- es il -- la,
282     Qua re -- súr -- get ex fa -- vil -- la
283     Ju -- di -- cán -- dus hó -- mo ré -- us:
284 -- ic ér -- go pár -- ce Dé -- us.
285     Pi -- e-- su Dó -- mi -- ne,
286     La -- cri ---- sa di -- es il -- la,
287 -- na é -- is ré -- qui -- em
288 -- na é -- is ré -- qui -- em
289     A -- men.
290 }
291 
292 bassM = {
293    \autoBeamOff
294 %% 1-4
295     g,2. g,8 a,4. a,4~ | a,4 b,2. b,8 c4. | c2 r4 a,2.^\sfz |
296     r4 g,4-. r8 g,4-. r8 g,4-. r4 | \break
297 %% 5-8
298     a,8-. r4 b,8-. r4 c8-. r4 d8-. r4 |
299     \repeat volta 2 { \tempo 4 = 40
300     b,4-. r8 c4-. r8 d4-. r8 e4-. r8 |
301     g4-. r8 g4-. r8 b4 r8 c'4. |  b2 b2 b2 | \break
302 %% 9-13
303     a2 a2 a4. r8 | b2 b1 | \tempo 4 = 68 R1. | }
304     a2. a | a a | \break
305 %% 14-19
306     a1 g2~ | g g1 | d1 c2 | d2 d2. r4 | e1 d2 | d2 d2.. r8 | \break
307 %% 20-23
308     d4.. e8. d4.. d | g,2 a,8 b,2.. | e4.. f8. e4.. e |
309     a,4. b,8 c2.. r8 | \break
310 %% 24-25
311     \time 2/1 d\breve | \time 4/1 c\longa \time 3/2 \bar "|." \break
312 }
313 
314 
315 %%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
316 %% get sheet music ---------------------------------------------------------------
317 \score {
318          <<
319           \context Staff = "Add" {
320                    \set Staff.fontSize = #-4
321            \override Staff.StaffSymbol #'staff-space = #(magstep -4)
322            \override Staff.StaffSymbol #'thickness = #(magstep -4)
323                 \clef soprano \key c\major \time 3/2 \Addsoprano }
324            %%\new Lyrics = "AddSL" \lyricsto "Addsoprano" { \AddsopranoL }
325 %%   \context ChoirStaff = "FourPartStaffaddchorus" <<
326          \context StaffGroup <<
327    \new Voice = "soprano" { \clef soprano \key c\major \time 3/2
328                 \set Staff.instrumentName = "soprano" \soprano }
329                 \new Lyrics = "mainSL" \lyricsto "soprano" { \sopranoL }
330    \new Voice = "alto" { \clef alto \key c\major \time 3/2
331                 \set Staff.instrumentName = "alto   " \alto }
332                 \new Lyrics = "mainAL" \lyricsto "alto" { \altoL }
333    \new Voice = "tenor" { \clef tenor \key c\major \time 3/2
334                 \set Staff.instrumentName = "tenor  " \tenor }
335                 \new Lyrics = "mainTL" \lyricsto "tenor" { \tenorL }
336    \new Voice = "bass" { \clef bass \key c\major \time 3/2
337                 \set Staff.instrumentName = "bass   " \bass }
338                 \new Lyrics = "mainBL" \lyricsto "bass" { \bassL }
339                                    >>
340    %%\context PianoStaff = "PianoStaff" <<
341    %%\new Voice = "piano" { \clef treble \key c\major \time 3/2
342    %%             \set Staff.instrumentName = "piano  " \pianoUP }
343    %%\new Voice = "piano" { \clef bass \key c\major \time 3/2
344    %%             \set Staff.instrumentName = "piano  " \pianoDown }
345    %%                                   >>
346  >>
347   \layout {
348             \context { \RemoveEmptyStaffContext
349                        \override VerticalAxisGroup #'remove-first = ##t
350                       }
351            }
352 }
353 
354 %% get midi music ----------------------------------------------------------------
355 \score {
356          <<
357    \new Staff { \clef soprano \key c\major \time 3/2 \tempo 4 = 68
358                  \set Staff.midiInstrument = "pad 2 (warm)"
359                                  \unfoldRepeats       \AddsopranoM }
360    \new Staff { \clef soprano \key c\major \time 3/2 \tempo 4 = 68
361                  \set Staff.midiInstrument = "pad 2 (warm)"
362                                  \unfoldRepeats       \sopranoM }
363    \new Staff { \clef alto \key c\major \time 3/2 \tempo 4 = 68
364                  \set Staff.midiInstrument = "pad 2 (warm)"
365                                  \unfoldRepeats          \altoM }
366    \new Staff { \clef tenor \key c\major \time 3/2 \tempo 4 = 68
367                  \set Staff.midiInstrument = "pad 2 (warm)"
368                                  \unfoldRepeats       \tenorM }
369    \new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 68
370                 \set Staff.midiInstrument = "pad 2 (warm)"
371                                  \unfoldRepeats          \bassM }
372    %%\new Staff { \clef treble \key c\major \time 3/2 \tempo 4 = 68
373    %%             \set Staff.midiInstrument = "acoustic grand"
374    %%                                \unfoldRepeats       \pianoUPm }
375    %%\new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 68
376    %%             \set Staff.instrumentName = "acoustic grand"
377    %%                                \unfoldRepeats     \pianoDownm }
378  >>
379    \midi { tempoWholesPerMinute = #(ly:make-moment 68 4) }
380 }
381 
382 \markup { " " }
383 \markup { \column { \line {
384 About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
385 \line { \italic " Please, playing of \"longa and breve\" do in the members alternating(But, like Don't stand out). " } } }
386 \markup { " " }
387 \markup { " " }
388 \markup { \line {\bold "Prayers;(Latin)"} }
389 \markup {%%column * 2
390 \fill-line {
391  \column {
392  \line {
393    \column {
394 "Lacrimósa dies illa,"
395 "Qua resúrget ex favilla"
396 "Judicándus hómo réus:"
397 "Húic érgo párce Déus."
398 "Pie Jésu Dómine,"
399 "Dóna éis réquiem Amen."
400             }
401 \hspace #8
402    \column {
403       \column {
404 %{
405 
406 %}
407             } }
408         }
409 }}}