1 %% 11:18 AM Tuesday, February 1, 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 \header {
 11  dedication = " To Dear Madam "
 12  title = " Strangers of Earth 1 "
 13  %%subtitle = #(string-append "LilyPond version " (lilypond-version))
 14  subtitle = \markup { bes major(\italic "c d ees f g a bes") }
 15  subsubtitle = \markup{\center-column {
 16                    "soprano; C clef on 1st line,       alto; C clef on 3rd line."
 17                    "       bass; F clef on 4th line,    tenor; C clef on 4th line."}}
 18  %%composer = \markup{ \line {\italic "Yukio Yoshida"}}
 19  arranger = \markup{ \line {\italic "Yukio Yoshida"}}
 20  poet = \markup { \fontsize #-1.5
 21 \fill-line {
 22  \line { \italic
 23    \column \bold {
 24 " "
 25 " "
 26 "Descendants of the Earth!"
 27 "Please listen to our wishes, ...Please...Please"
 28 "Now Stand up and Go(float)... Go(float)...."
 29 "Now Stand up and Go(float)... Go(float)...."
 30 }}}}
 31  opus = "Op.44(May 19, 2010)"
 32  meter = "Prayer"
 33  copyright = "public Domain"
 34 }
 35 %%
 36 
 37 %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
 38 soprano = { \hide Staff.BarLine
 39     \autoBeamOff
 40 %% 1-4(5-8)
 41    \repeat volta 2 { R1. * 4 } \break
 42 \set Score.currentBarNumber = 9
 43 %% 9-12
 44    c''1. | a'1 bes'4. c''8 | d''4 ees''2 bes'4 d''2 | c''1. | \break
 45 %% 13-17
 46    c'1. | c'' | ees''2 f''8 g''2.. | bes'2 d'' f'' | g''1.( | \break
 47 %% 18-21
 48    f''1) }
 49    sopranoaddlyric = { \new Voice = "sopranoaddlyric" {
 50    c''2(~ | c'' bes'4) d''2. | ees''4 r4 f''1 | f''2 r4 g''2. | \break
 51 %% 22-26
 52    R1. * 5 | \break
 53 %% 27-31
 54    ees''1.\melisma | f''2\melismaEnd
 55    d''1 | ees''2. f'' | ees''4. f''1 g''8 | a''1.~ | \break
 56 %% 32-34
 57    a''2 r1 | \time 4/1 bes'\breve ees''\breve |
 58    bes''\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
 59 }}
 60 
 61 sopranoL = \lyricmode {
 62    \override Score . LyricText #'font-shape = #'italic
 63    \teeny
 64 S -- tand up and Go(float) Go(float)
 65 m __ De -- scen -- dan -- ts of the Earth!
 66 }
 67 
 68 sopranoM = {
 69     \autoBeamOff
 70 %% 1-4(5-8)
 71    \repeat volta 2 { R1. * 4 } \break
 72 %% 9-12
 73    c''1. | a'1 bes'4. c''8 | d''4 ees''2 bes'4 d''2 | c''1. | \break
 74 %% 13-17
 75    c'1. | c'' | ees''2 f''8 g''2.. | bes'2 d'' f'' | g''1. | \break
 76 %% 18-21
 77    f''1 c''2(~ | c'' bes'4) d''2. | ees''4 r4 f''1 | f''2 r4 g''2. | \break
 78 %% 22-26
 79    R1. * 5 | \break
 80 %% 27-31
 81    ees''1.\melisma | f''2\melismaEnd
 82    d''1 | ees''2. f'' | ees''4. f''1 g''8 | a''1.~ | \break
 83 %% 32-34
 84    a''2 r1 | \time 4/1 bes'\breve ees''\breve |
 85    bes''\longa \bar "|." \time 3/2 \break
 86 }
 87 
 88 %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%%
 89 alto = { \hide Staff.BarLine
 90      \autoBeamOff
 91 %% 1-4(5-8)
 92    \repeat volta 2 {
 93    f'2 g'4 a'8 g' f'2 | d'2 ees'4 f'8 ees' c'2 | ees'2 f'4 g'8 f' ees'2 |
 94    c'2 d'4 ees'8 d' c'2 } | \break
 95 %% 9-12
 96    c'1. | R1. * 3 | \break
 97 %% 13-17
 98    f1. | f'2 a' g' | d'16([ ees' f'] a'2..) bes'4.. |
 99    c''2..( bes'16[ g' ees']) c'4.. | a2. f( | \break
100 %% 18-21
101    g2) }
102    altoaddlyric = { \new Voice = "altoaddlyric" {
103    \autoBeamOff
104    bes1 | c'2 c' c'4 d'4~ | d'4. ees'8 f'1\( | g'1.\) | \break
105 %% 22-26
106    R1. * 5 | \break
107 %% 27-31
108    a'1.\melisma | bes'1\melismaEnd
109    g'2(~ | g' f'4) a'2. | bes'4 r4 c''1 | c''2 r4 d''2.~ | \break
110 %% 32-34
111    d''2 r1 | \time 4/1 bes\breve ees'\breve |
112    bes'\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
113 }}
114 
115 altoL = \lyricmode {
116    \override Score . LyricText #'font-shape = #'italic
117    \teeny
118 De -- scen -- dan -- ts of the Ear -- th!
119 m __ S -- tand up and Go(float) Go(float)
120 }
121 
122 altoM = {
123      \autoBeamOff
124 %% 1-4(5-8)
125    \repeat volta 2 {
126    f'2 g'4 a'8 g' f'2 | d'2 ees'4 f'8 ees' c'2 | ees'2 f'4 g'8 f' ees'2 |
127    c'2 d'4 ees'8 d' c'2 } | \break
128 %% 9-12
129    c'1. | R1. * 3 | \break
130 %% 13-17
131    f1. | f'2 a' g' | d'16([ ees' f'] a'2..) bes'4.. |
132    c''2..( bes'16[ g' ees']) c'4.. | a2. f( | \break
133 %% 18-21
134    g2) bes1 | c'2 c' c'4 d'4~ | d'4. ees'8 f'1\( | g'1.\) | \break
135 %% 22-26
136    R1. * 5 | \break
137 %% 27-31
138    a'1.\melisma | bes'1\melismaEnd
139    g'2(~ | g' f'4) a'2. | bes'4 r4 c''1 | c''2 r4 d''2.~ | \break
140 %% 32-34
141    d''2 r1 | \time 4/1 bes\breve ees'\breve | bes'\longa \bar "|." \time 3/2 \break
142 }
143 
144 %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
145 tenor = { \hide Staff.BarLine
146      \autoBeamOff
147 %% 1-4
148    \repeat volta 2 { R1. * 4 } \break
149 %% 9-12
150    c'2. bes | d'2 c' bes | c'2. d' | bes2 c' a | \break
151 %% 13-17
152    c1. | c'2 ees' d' | f'2. c' | ees' g' | ees'4. c' a f | \break
153 %% 18-21
154    R1. * 4 | \break
155 %% 22-26
156    bes1.\( | c'1\) }
157    tenoraddlyric = { \new Voice = "tenoraddlyric" {
158    c'2(~ | c' bes4) d'2. | ees'4 r4 f'1 | f'2 r4 g'2. | \break
159 %% 27-31
160    ees'1.\melisma | f'2\melismaEnd
161    d'1 | ees'2. f' | ees'4. f'1 g'8 | a'1.~ | \break
162 %% 32-34
163    a'2 r1 | \time 4/1 ees\breve bes\breve |
164    ees'\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
165 }}
166 
167 tenorL = \lyricmode {
168    \override Score . LyricText #'font-shape = #'italic
169    \teeny
170 S -- tand up and Go(float) Go(float)
171 m __ De -- scen -- dan -- ts of the Earth!
172 }
173 
174 tenorM = {
175     \autoBeamOff
176 %% 1-4(5-8)
177    \repeat volta 2 { R1. * 4 } \break
178 %% 9-12
179    c'2. bes | d'2 c' bes | c'2. d' | bes2 c' a | \break
180 %% 13-17
181    c1. | c'2 ees' d' | f'2. c' | ees' g' | ees'4. c' a f | \break
182 %% 18-21
183    R1. * 4 | \break
184 %% 22-26
185    bes1.\( | c'1\) c'2(~ | c' bes4) d'2. | ees'4 r4 f'1 | f'2 r4 g'2. | \break
186 %% 27-31
187    ees'1.\melisma | f'2\melismaEnd
188    d'1 | ees'2. f' | ees'4. f'1 g'8 | a'1.~ | \break
189 %% 32-34
190    a'2 r1 | \time 4/1 ees\breve bes\breve | ees'\longa \bar "|." \time 3/2 \break
191 }
192 
193 %%%%%%% bass; part %%%%%%%%%%%%%%%%
194 bass = { \hide Staff.BarLine
195    \autoBeamOff
196 %% 1-4(5-8)
197    \repeat volta 2 {
198    a,2 c4. bes,8( d bes,16) c16[ bes, a,8.]~ | a,2. a,8 bes, ees16[( d  c8]) bes,4 |
199    a,2. bes,2. | a,1. } | \break
200 %% 9-12
201    c1. | R1. *3 | \break
202 %% 13-17
203    g,1. | g2 c' bes | d4.. bes,16([ c d] ees2..) |
204    a,4.. ees2..( d16[ c bes,]) | a,2. g, | \break
205 %% 18-21
206    R1. * 4 | \break
207 %% 22-26
208    g,1.\( | a,2\) }
209    bassaddlyric = { \new Voice = "bassaddlyric" {
210    \autoBeamOff
211    bes,1 | c2 c c4 d4~ | d4. ees8 f1\( | g1.\) | \break
212 %% 27-31
213    a1.\melisma | bes1\melismaEnd
214    g2(~ | g f4) a2. | bes4 r4 c'1 | c'2 r4 d'2.~ | \break
215 %% 32-34
216    d'2 r1 | \time 4/1 ees,\breve bes,\breve |
217    ees\longa \undo \hide Staff.BarLine \bar "|." \time 3/2 \break
218 }}
219 
220 bassL = \lyricmode {
221    \override Score . LyricText #'font-shape = #'italic
222    \teeny
223 De -- scen -- dan -- ts of the Ear -- th!
224 m __ S -- tand up and Go(float) Go(float)
225 }
226 
227 bassM = {
228    \autoBeamOff
229 %% 1-4(5-8)
230    { \set Staff.midiInstrument = "clav"
231    \repeat volta 2 {
232    a,2 c4. bes,8( d bes,16) c16[ bes, a,8.]~ | a,2. a,8 bes, ees16[( d c8]) bes,4 |
233    a,2. bes,2. | a,1. } | \break
234 %% 9-12
235    c1. | R1. *3 | \break
236 %% 13-17
237    g,1. | } { \set Staff.midiInstrument = "bassoon"
238    g2 c' bes | } d4.. bes,16([ c d] ees2..) |
239    a,4.. ees2..( d16[ c bes,]) | a,2. g, | \break
240 %% 18-21
241    R1. * 4 | \break
242 %% 22-26
243    g,1.\( | a,2\) bes,1 | c2 c c4 d4~ | d4. ees8 f1\( | g1.\) | \break
244 %% 27-31
245    a1.\melisma | bes1\melismaEnd
246    g2(~ | g f4) a2. | bes4 r4 c'1 | c'2 r4 d'2.~ | \break
247 %% 32-34
248    d'2 r1 | \time 4/1 ees,\breve bes,\breve | ees\longa \bar "|." \time 3/2 \break
249 }
250 
251 
252 %%%%%%%%%% midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
253 %% get sheet music ---------------------------------------------------------------
254 \score {
255          <<
256 %%           \context ChoirStaff = "FourPartStaffaddchorus" <<
257 \context StaffGroup <<
258            \new Voice = "soprano" { \clef soprano \key bes\major \time 3/2
259             \set Staff.instrumentName = "soprano" \soprano \sopranoaddlyric }
260             \new Lyrics = "mainSL" \lyricsto "sopranoaddlyric" { \sopranoL }
261 
262            \new Voice = "alto" { \clef alto \key bes\major \time 3/2
263             \set Staff.instrumentName = "alto   " \alto \altoaddlyric }
264             \new Lyrics = "mainAL" \lyricsto "altoaddlyric" { \altoL }
265 
266            \new Voice = "tenor" { \clef tenor \key bes\major \time 3/2
267             \set Staff.instrumentName = "tenor  " \tenor \tenoraddlyric }
268             \new Lyrics = "mainTL" \lyricsto "tenoraddlyric" { \tenorL }
269 
270            \new Voice = "bass" { \clef bass \key bes\major \time 3/2
271             \set Staff.instrumentName = "bass   " \bass \bassaddlyric }
272             \new Lyrics = "mainBL" \lyricsto "bassaddlyric" { \bassL }
273                                             >>
274 
275            %%\context PianoStaff = "PianoStaff" <<
276            %%\new Voice = "piano" { \clef treble \key \major \time
277            %%             \set Staff.instrumentName = "piano  " \pianoUP }
278            %%\new Voice = "piano" { \clef bass \key \major \time
279            %%             \set Staff.instrumentName = "piano  " \pianoDown }
280            %%                                   >>
281 
282          >>
283 
284   \layout {
285             \context { \RemoveEmptyStaffContext
286                        %%\override VerticalAxisGroup #'remove-first = ##t
287                       }
288            }
289 }
290 
291 %% get midi music ----------------------------------------------------------------
292 \score {
293          <<
294           %% soprano class
295            \new Staff { \clef soprano \key bes\major \time 3/2 \tempo 4 = 52
296                          \set Staff.midiInstrument = "pad 2 (warm)"
297                                          \unfoldRepeats       \sopranoM }
298           %% alto class
299            \new Staff { \clef alto \key bes\major \time 3/2 \tempo 4 = 52
300                          \set Staff.midiInstrument = "pad 2 (warm)"
301                                          \unfoldRepeats          \altoM }
302 %%           \new Staff { \clef alto \key bes\major \time 3/2 \tempo 4 = 52
303 %%                         \set Staff.midiInstrument = "harpsichord"
304 %%                                         \unfoldRepeats          \altoM }
305 
306           %% tenor class
307            \new Staff { \clef tenor \key bes\major \time 3/2 \tempo 4 = 52
308                          \set Staff.midiInstrument = "pad 2 (warm)"
309                                          \unfoldRepeats       \tenorM }
310 
311           %% bass class
312 %%           \new Staff { \clef bass \key bes\major \time 3/2 \tempo 4 = 52
313 %%                        \set Staff.midiInstrument = "clav"
314 %%                                         \unfoldRepeats          \bassM }
315            \new Staff { \clef bass \key bes\major \time 3/2 \tempo 4 = 52
316                         \set Staff.midiInstrument = "bassoon"
317                                          \unfoldRepeats          \bassM }
318 
319            %%\new Staff { \clef treble \key \major \time \tempo 4 =
320            %%             \set Staff.midiInstrument = "acoustic grand"
321            %%                                \unfoldRepeats       \pianoUPm }
322            %%\new Staff { \clef bass \key \major \time \tempo 4 =
323            %%             \set Staff.instrumentName = "acoustic grand"
324            %%                                \unfoldRepeats     \pianoDownm }
325          >>
326 
327    \midi { tempoWholesPerMinute = #(ly:make-moment 52 4) }
328 }
329 
330 \markup { " " }
331 \markup { \column { \line {
332 About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
333 \line { \italic " Please, playing of \"longa and breve\" do in the members alternating(But, like Don't stand out). " } } }
334 \markup { " " }
335