1 %% 2:45 AM Saturday, January 22, 2022
  2 %% Yukio Yoshida
  3 \version "2.22.1"
  4 #(set-default-paper-size "a4")
  5 #(set-global-staff-size 20)
  6 VoiceColorBlue = {
  7                    \override Staff.StaffSymbol #'color = #blue
  8                    \override Staff.LedgerLineSpanner #'color = #blue
  9                    \override Staff.Clef #'color = #blue
 10                    \override Staff.TimeSignature #'color = #blue
 11                    \override Staff.KeySignature #'color = #blue
 12                    \override Staff.BarLine #'color = #blue %%Don't use Score.BarLine!
 13                    \override Voice.NoteHead #'color = #blue
 14                    \override Voice.Rest #'color = #blue
 15                    \override Voice.Stem #'color = #blue
 16                    \override Voice.Beam #'color = #blue
 17                    \override Voice.Slur #'color = #blue
 18                    \override Voice.Tie #'color = #blue
 19                    \override Voice.Dots #'color = #blue
 20                    \override Voice.Script #'color = #blue
 21                    \override Voice.TupletNumber #'color = #blue
 22                    \override Voice.TupletBracket #'color = #blue
 23                    \override Voice.BreathingSign #'color = #blue
 24 }
 25 
 26 \include "sub-soprano-2.ly"
 27 
 28 \paper {
 29         %%ragged-last-bottom = ##f
 30 }
 31 
 32 \header {
 33  dedication = " To Dear your's Daughters "
 34  title = "Road-2; White Cloths"
 35  subtitle = \markup{ \line {\bold "2011" }}
 36  %% subsubtitle = #(string-append "LilyPond version " (lilypond-version))
 37  subsubtitle = \markup{ "Baritone; C clef on 5th line" "     "
 38                    "soprano; C clef on 1st line."
 39                    }
 40  composer = \markup{ \line {\italic "Yukio Yoshida"}}
 41  arranger = "Mar. 17, 2011"
 42  poet = \markup { \tiny "Text(soprano) from Réquiem-ceremony; kýrie" }
 43  opus = "Op.57"
 44  meter = \markup{ \column { "soprano; Animato" "bariton; Con anima" } }
 45  copyright = "public Domain"
 46 }
 47 
 48 
 49 %%%%%%%% baritone part %%%%%%%%%%%%%%%%%%%%%%%
 50 bariton = {
 51            %%\revert Score.BarLine #'color  %%Don't need
 52      \autoBeamOff
 53 %% 1-4
 54    r2 c'8 d'2.. | e'4( d'8) a4.( g2.) | f2 g4 a2( b4 | a2.) r8 c'4. c'4 | \break
 55 %% 5-9
 56    d'2. e'~ | e'2.. r8 a2 | c'4.( b8 a g f4) r8 f4. | g2 a b( |
 57    c'8 d'2) r8 c'4 d'2~ | \break
 58 %% 10-13
 59    d'4 r8 e'4 a8 b2 c'4 | d'4 e'4 d'8 c' b2 a4 | b2 a4 g2. | f2. e | \break
 60 %% 14-18
 61    d8 e2.( f8 d2) | R1. * 2 | d'8 e'2.( f'8 d'2) | R1. | \break
 62 %% 19-23
 63    R1. | d'8 e'2.( f'8 d'2) | R1. * 2 | d8 e2.( f8 d2) | \break
 64 %% 24-27
 65  \new Voice = "baritonII" { \autoBeamOff
 66    r4 e4. e8 e2. | d2 c8 d4. e8 f4. | g4.( d2) r8 d'2 | a4 e2 g4 d2 | \break
 67 %% 28-31
 68    g4. g4. g2. | a8 a2. e8 e2 ~ | e4 r8 b,4.. c2 c8. | d2. e | \break
 69 %% 32-35
 70    a1 g8 g a4~ | a4 b2. c'4 b4 | r8 c1 b,4 a,8 | a1. | \break
 71 %% 36
 72    \time 4/1 r1 c8 e2 d2 e4 f8 g2 r1 | \break
 73 %% 37
 74    r1 c'2 g2 f4 e2. r1 | \break
 75    \times 2/3 { d'\breve^\markup { \teeny \italic "The only instrument playing" }
 76    c'\breve f\breve } \bar "|." \break
 77 }}
 78 
 79 baritonL = \lyricmode {
 80     \override Score . LyricText #'font-shape = #'italic
 81     \tiny
 82 A man ap -- pear on the road
 83 on with white clothes,
 84 And being il -- lu -- mi -- nated by sun
 85 In the light dap -- pled,
 86 Step on the fall -- en leaves noisi -- ly;
 87 Coming closer to me.
 88 %%---
 89 to me, to me, to me.
 90 }
 91 baritonLII = \lyricmode {
 92     \override Score . LyricText #'font-shape = #'italic
 93     \tiny
 94 Did a man spend a glo -- ri -- ous days?
 95 Scat -- ter -- ing that's scent,
 96 Slow -- ly and as have the times
 97 Beside me in silence passing,
 98 Leaves with a re -- sound -- ing tread;
 99 Fade into the past.
100 %%---
101 A man appear on the road and Fade "into the" past.
102 }
103 
104 baritonM = {
105      \autoBeamOff
106 %% 1-4
107    r2 c'8 d'2.. | e'4( d'8) a4.( g2.) | f2 g4 a2( b4 | a2.) r8 c'4. c'4 | \break
108 %% 5-9
109    d'2. e'~ | e'2.. r8 a2 | c'4.( b8 a g f4) r8 f4. | g2 a b( |
110    c'8 d'2) r8 c'4 d'2~ | \break
111 %% 10-13
112    d'4 r8 e'4 a8 b2 c'4 | d'4 e'4 d'8 c' b2 a4 | b2 a4 g2. | f2. e | \break
113 %% 14-18
114    d8 e2.( f8 d2) | R1. * 2 | d'8 e'2.( f'8 d'2) | R1. | \break
115 %% 19-23
116    R1. | d'8 e'2.( f'8 d'2) | R1. * 2 | d8 e2.( f8 d2) | \break
117 %% 24-27
118    r4 e4. e8 e2. | d2 c8 d4. e8 f4. | g4.( d2) r8 d'2 | a4 e2 g4 d2 | \break
119 %% 28-31
120    g4. g4. g2. | a8 a2. e8 e2 ~ | e4 r8 b,4.. c2 c8. | d2. e | \break
121 %% 32-35
122    a1 g8 g a4~ | a4 b2. c'4 b4 | r8 c1 b,4 a,8 | a1. | \break
123 %% 36
124    \time 4/1 r1 c8 e2 d2 e4 f8 g2 r1 | \break
125 %% 37
126    r1 c'2 g2 f4 e2. r1 | \break
127 %% 38
128    \times 2/3 { d'\breve c'\breve f\breve } \bar "|." \break
129 }
130 
131 
132 %%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
133 %% get sheet music ---------------------------------------------------------------
134 \score {
135   \context ChoirStaff <<
136      \context Voice = "soprano" { \clef soprano \key d\major \time 3/2
137              \set Staff.fontSize = #-4
138              \override Staff.StaffSymbol #'staff-space = #(magstep -4)
139              \override Staff.StaffSymbol #'thickness = #(magstep -4)
140                   \set Staff.instrumentName = "soprano"  \soprano }
141              \new Lyrics = "mainSL" \lyricsto "soprano" { \sopranoL }
142      \context Voice = "bariton" { \clef baritone \key c\major \time 3/2
143              \set Staff.instrumentName = "baritone" \bariton }
144               \context Lyrics = "mainBL" \lyricsto "bariton" { \baritonL }
145               \context Lyrics = "mainBL" \lyricsto "baritonII" { \baritonLII }
146      %%\context PianoStaff = "PianoStaff" <<
147      %%\context Voice = "piano" { \clef treble \key \major \time
148      %%             \set Staff.instrumentName = "piano  " \pianoUP }
149      %%\context Voice = "piano" { \clef bass \key \major \time
150      %%             \set Staff.instrumentName = "piano  " \pianoDown }
151      %%                                   >>
152    >>
153   \layout {
154           \context { %%\RemoveEmptyStaffContext
155                      %%\override VerticalAxisGroup #'remove-first = ##t }
156                     }
157           }
158 }
159 
160 %% get midi music ----------------------------------------------------
161 \score {
162    <<
163      \context Staff { \clef soprano \key d\major \time 3/2 \tempo 4 = 46
164                    \set Staff.midiInstrument = "pad 2 (warm)"
165                                    \unfoldRepeats       \sopranoM }
166      \context Staff { \clef tenor \key c\major \time 3/2 \tempo 4 = 46
167                    \set Staff.midiInstrument = "pad 2 (warm)"
168                                    \unfoldRepeats       \baritonM }
169      %%\context Staff { \clef treble \key \major \time \tempo
170      %%             \set Staff.midiInstrument = "acoustic grand"
171      %%                                \unfoldRepeats       \pianoUPm }
172      %%\context Staff { \clef bass \key \major \time \tempo
173      %%             \set Staff.instrumentName = "acoustic grand"
174      %%                                \unfoldRepeats     \pianoDownm }
175    >>
176  \midi {
177          tempoWholesPerMinute = #(ly:make-moment 46 4)
178        }
179 }
180 \markup { " " }
181 \markup { \column { \line {
182 About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
183 \line { \italic " Please, playing of \"longa and breve\" do in the members alternating(But, like Don't stand out). " } } }
184 \markup { " " }
185 \markup { " " }
186 \markup { \line {\bold "Road(White Cloths)"} }
187 \markup {%%column * 2
188 \fill-line { \tiny \italic
189  \column {
190  \line {
191    \column {
192 \bold "2)"
193 "A man appear on the road"
194 "On with white clothes,"
195 "And being illuminated by sun"
196 "In the light dappled,"
197 "Step on the fallen leaves noisily;"
198 "Coming closer to me."
199             }
200 \hspace #14
201       \column {
202 \bold "2b)"
203 "Did a man spend a glorious days?"
204 "Scattering that's scent,"
205 "Slowly and as have the times"
206 "Beside me in silence passing,"
207 "Leaves with a resounding tread;"
208 "Fade into the past."
209             }
210         }
211 }}}