1 %% 9:52 PM Tuesday, July 4, 2023
2 %% Yukio Yoshida
3 %% \pageBreak is at 13-bars on MezzoSoprano
4 \version "2.24.0"
5
6
7 VoiceColorBlue = {
8 \override Staff.StaffSymbol.color =
9 \override Staff.LedgerLineSpanner.color =
10 \override Staff.Clef.color =
11 \override Staff.TimeSignature.color =
12 \override Staff.KeySignature.color =
13 \override Staff.BarLine.color =
14 \override Voice.NoteHead.color =
15 \override Voice.Rest.color =
16 \override Voice.Stem.color =
17 \override Voice.Flag.color =
18 \override Voice.Beam.color =
19 \override Voice.Slur.color =
20 \override Voice.PhrasingSlur.color =
21 \override Voice.Tie.color =
22 \override Voice.Dots.color =
23 \override Voice.Script.color =
24 \override Voice.TupletNumber.color =
25 \override Voice.TupletBracket.color =
26 \override Voice.BreathingSign.color =
27 }
28 VoiceColorBlueRevert = {
29 \revert Voice.NoteHead.color
30 \revert Voice.Rest.color
31 \revert Voice.Stem.color
32 \revert Voice.Flag.color
33 \revert Voice.Beam.color
34 \revert Voice.Slur.color
35 \revert Voice.PhrasingSlur.color
36 \revert Voice.Tie.color
37 \revert Voice.Dots.color
38 \revert Voice.Script.color
39 \revert Voice.TupletNumber.color
40 \revert Voice.TupletBracket.color
41 \revert Voice.BreathingSign.color
42 }
43
44 BlueRest = { \override Voice.Rest.color =
45 \override Voice.Dots.color =
46 BlueOff = { \revert Voice.Rest.color
47 \revert Voice.Dots.color }
48
49 AddChorus = {
50 \override Staff.StaffSymbol.color =
51 \override Staff.LedgerLineSpanner.color =
52 \override Staff.Clef.color =
53 \override Staff.TimeSignature.color =
54 \override Staff.KeySignature.color =
55 \override Staff.BarLine.color =
56 \override Voice.NoteHead.color =
57 \override Voice.Rest.color =
58 \override Voice.Stem.color =
59 \override Voice.Flag.color =
60 \override Voice.Beam.color =
61 \override Voice.Slur.color =
62 \override Voice.PhrasingSlur.color =
63 \override Voice.Tie.color =
64 \override Voice.Dots.color =
65 \override Voice.Script.color =
66 \override Voice.TupletNumber.color =
67 \override Voice.TupletBracket.color =
68 \override Voice.BreathingSign.color =
69 }
70
71 \paper {
72 %% ragged-last-bottom =
73 }
74
75 \header {
76 dedication = \markup { "The Story of A Lady" }
77 title = \markup{ \line { \huge "Lights light the grave!"} }
78 subtitle = \markup{ \center-column {
79 \with-color
80 \raise
81 %% subsubtitle =
82 subsubtitle = \markup{\center-column { " "
83 \with-color
84 "soprano; C clef on 1st line, alto; C clef on 3rd line."
85 " bass; F clef on 4th line, tenor; C clef on 4th line."}}
86 composer = \markup{ \line {\italic "Yukio Yoshida"}}
87 arranger = "Jan 01, 2014"
88 poet = \markup { \line { \teeny \italic
89 { \hspace
90 \hspace
91 " "
92 "Anymore! Anymore! Anymore!"
93 "Not the light on to me!"
94 "This is what! This is what!"
95 "It's this darkness where I am!" }
96 \hspace
97 " "
98 "Come on, now"
99 "Time to die myself"
100 "And never, ever, never!"
101 "Lit lights are not..." }
102 } }
103 opus = "Op.79"
104 meter = " "
105 copyright = "public Domain"
106 %% tagline = " "
107 }
108
109 %%%%%%%%% mezzosoprano part %%%%%%%%%%%%%%%%%%%%%
110 mezzosoprano = {
111 \autoBeamOff
112 \partial 2 r2 |
113 %% 1-4
114 fis'2 ais'2 r2 | bis'2 gis'2. r4 | \noBreak ais'2 fis'2.. r8 | \noBreak
115 r8 fis'4. cis''4( dis''2) r16 dis''8. ~ | \break
116 %% 5-8
117 dis''8. cis''4.. cis'2.. ~ | cis'2.. r8 r2 | r1. | r1. | \break
118 %% 9-12
119 r1. | r1. | \noBreak r1. |
120 r2 dis''4^\markup { \bold \teeny \with-color
121 cis''4 bis'\melismaEnd r8 dis'8^\markup { \with-color
122 \pageBreak
123 %% 13-16
124 r16 gis'4.. r4 ais'8\(^\markup { \with-color
125 cis'4 bis8 bis4. ais2 r4 | \noBreak r4 dis'4 cis'8 cis'4. bis2 |
126 r8 ais4. eis'2 bis'2( | \break
127 %% 17-20
128 cis''2) r1 | bis4 ais8 cis'4. r4 ais2 | bis8 ais2 r8 bis4( cis'8 eis'8 fis' gis' ~ |
129 gis') ais'2( bis'8 cis''2.) | \break
130 %% 21-24
131 r2 fis'8 eis'4.\( ais'\) r8 | r1. | \noBreak ais1. | r2 eis'2\( bis'2\) | \break
132 %% 25-28
133 r1 fis'2 | bis'1 \times 2/3 {cis''4( bis' ais')} |
134 r8 gis'4.( \tupletDown \times 2/3 {eis'4 dis' cis'} bis2 | ais1.) | \break
135 %% 29-32
136 r2 cis'2 dis' | r8 dis'4 eis'( fis' gis' ais'4.) | bis'4. r8 cis''1( |
137 dis''4 eis'' fis''1) | \break
138 %% 33-34
139 %% Here play part---Only MezzoSoprano instruments(with One or Two, If you can, On Violin).---
140 \VoiceColorBlueRevert { \set Staff.fontSize =
141 fis'1.^\markup { \teeny \italic "Only Instrument(If you can, on Violin or something)" } |
142 \time 4/1 cis''\longa } \bar "|." \break
143 }%% end mezzospprano sheet
144
145 mezzosopranoL = \lyricmode {
146 \override Lyrics.LyricText.color =
147 \override Lyrics.LyricHyphen.color =
148 \override Lyrics.LyricExtender.color =
149 \override Score.LyricText.font-shape =
150 \tiny
151 Any -- more! Any -- more! Any -- more!
152 %% Not on the light I
153 %% I can't compartment lights.
154 "Not the" light on to me!
155 ə __
156 This's what! This is what!
157 "It's" this dark -- ness,
158 "It's" this dark -- ness where I am!
159 Come on, now
160 Time to die my -- self
161 And nev -- er, ever, nev -- er!
162 Lit lights are not __
163 Nev -- er! Lit lights are not __
164 }
165
166 mezzosopranoM = {
167 \autoBeamOff
168 \partial 2 r2 |
169 %% 1-4
170 fis'2 ais'2 r2 | bis'2 gis'2. r4 | ais'2 fis'2.. r8 |
171 r8 fis'4. cis''4( dis''2) r16 dis''8. ~ | \break
172 %% 5-8
173 dis''8. cis''4.. cis'2.. | cis'2.. r8 r2 | r1. | r1. | \break
174 %% 9-12
175 r1. | r1. | r1. | r2 dis''4^\pp\melisma cis''4 bis'^\ppp\melismaEnd r8 dis'8\fz | \break
176 %% 13-16
177 r16 gis'4.. r4 ais'8\fz\( fis'16\) dis'2 r16 |
178 cis'4 bis8 bis4. ais2 r4 | r4 dis'4 cis'8 cis'4. bis2 | r8 ais4. eis'2 bis'2( | \break
179 %% 17-20
180 cis''2) r1 | bis4 ais8 cis'4. r4 ais2 | bis8 ais2 r8 bis4( cis'8 eis'8 fis' gis' ~ |
181 gis') ais'2( bis'8 cis''2.) | \break
182 %% 21-24
183 r2 fis'8 eis'4.\( ais'\) r8 | r1. | ais1. | r2 eis'2\( bis'2\) | \break
184 %% 25-28
185 r1 fis'2 | bis'1 \times 2/3 {cis''4( bis' ais')} |
186 r8 gis'4.( \tupletDown \times 2/3 {eis'4 dis' cis'} bis2 | ais1.) | \break
187 %% 29-32
188 r2 cis'2 dis' | r8 dis'4 eis'( fis' gis' ais'4.) | bis'4. r8 cis''1( |
189 dis''4 eis'' fis''1) | \break
190 %% 33-34
191 %% Here play part---Only MezzoSoprano instruments(with One or Two, If you can, On Violin).---
192 fis'1. | \time 4/1 cis''\longa \bar "|." \break
193 }%% end mezzosoprano-midi
194
195 %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
196 soprano = {
197 \autoBeamOff
198 \partial 2 c'2 ~ |
199 %% 1-4
200 c'2\> d' g'_\( | fis'\)\! r1 | r1. | r1. | \break
201 %% 5-8
202 r1. | fis'4 g'8 a' b' r8 e'4 fis'8[ g' a'] r8 | \noBreak
203 r8 e''4-. c''4.-. a'-. g'8-.[ fis'-. e'-.] | d'2. c' ~ | \break
204 %% 9-12
205 <c' e' g'>2 <d' fis' a'> <e' g' b'>2 ~ | <b' g' e'> <fis' d'> <e' c'> ~ |
206 c'1. | r1. | \break
207 %% 13-16
208 r1. | r1. | r1. | r1. | \break
209 %% 17-20
210 r1. | r1. | r1. | r1. | \break
211 %% 21-24
212 r1. | c''2. c''? | e'1.^\>^\markup { \teeny \dynamic { pp } } |
213 c'2. fis'2. * 3/4 s2. * 1/4\!^\markup { \teeny \dynamic { pppp } } | \break
214 %% 25-28
215 r1. | r1. | r1. | r1. | \break
216 %% 29-32
217 r1. | r1. | r1. | r1. | \break
218 %% 33-34
219 r2 fis'1 | \time 4/1 c''\breve fis''\breve \bar "|."
220 }%% end soprano sheet
221
222 sopranoM = {
223 \autoBeamOff
224 \partial 2 c'2 ~ |
225 %% 1-4
226 <c' fis'>2\pp <d' g'> ~ g'\( | fis'\)\pppp r1 | r1. | r1. | \break
227 %% 5-8
228 r1. | fis'4\p g'8 a' b' r8 e'4 fis'8[ g' a'] r8 | \noBreak
229 r8 e''4-. c''4.-. a'-. g'8-.[ fis'-. e'-.] | d'2. c' | \break
230 %% 9-12
231 <c' e' g'>2 <d' fis' a'> <e' g' b'>2 ~ | <b' g' e'> <fis' d'> <e' c'> ~ |
232 c'1. | r1. | \break
233 %% 13-16
234 r1. | r1. | r1. | r1. | \break
235 %% 17-20
236 r1. | r1. | r1. | r1. | \break
237 %% 21-24
238 r1. | c''2. c''? | e'1.\pp\> | c'2. fis'\pppp\! | \break
239 %% 25-28
240 r1. | r1. | r1. | r1. | \break
241 %% 29-33
242 r1. | r1. | r1. | r1. | \break
243 %% 33-34
244 r2 fis'1 | \time 4/1 c''\breve fis''\breve \bar "|."
245 }%% end soprano-midi
246
247 %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%%
248 alto = {
249 \autoBeamOff
250 \partial 2 g2 ~ |
251 %% 1-4
252 g2_\> a d'_\( | c'\)\! r1 | r1. | r1. | \break
253 %% 5-8
254 r1. | c'4.-. d'-. e'-. fis'8-.[ g'-. a'-.] |
255 r8 a'8[ g' fis'] e'4 r8 g'8 fis' e' d'4 | fis1. | \break
256 %% 9-12
257 <fis a c'>4. <g b d'> <a c' e'> <b d' fis'> ~ | <fis' d' b> <e' c' a> <b g> <a fis> ~ |
258 fis1. | r1. | \break
259 %% 13-16
260 r1. | r1. | r1. | r1. | \break
261 %% 17-20
262 r1. | r1. | r1. | r1. | \break
263 %% 21-24
264 r1. | fis'2. f'? | a1.^\>^\markup { \teeny \dynamic { pp } } |
265 fis2. b2. * 3/4 s2. * 1/4\!^\markup { \teeny \dynamic { pppp } } | \break
266 %% 25-28
267 r1. | r1. | r1. | r1. | \break
268 %% 29-32
269 r1. | r1. | r1. | r1. | \break
270 %% 33-34
271 r2 b1 | \time 4/1 fis'\breve b'\breve \bar "|."
272 }%% end alto sheet
273
274 altoM = {
275 \autoBeamOff
276 \partial 2 g2 ~ |
277 %% 1-4
278 <g c'>2\pp <a d'> ~ d'\( | c'\)\pppp r1 | r1. | r1. | \break
279 %% 5-8
280 r1. | c'4.-.\p d'-. e'-. fis'8-.[ g'-. a'-.] |
281 r8 a'8[ g' fis'] e'4 r8 g'8 fis' e' d'4 | fis1. | \break
282 %% 9-12
283 <fis a c'>4. <g b d'> <a c' e'> <b d' fis'> ~ | <fis' d' b> <e' c' a> <b g> <a fis> ~ |
284 fis1. | r1. | \break
285 %% 13-16
286 r1. | r1. | r1. | r1. | \break
287 %% 17-20
288 r1. | r1. | r1. | r1. | \break
289 %% 21-24
290 r1. | fis'2. f'? | a1.\pp\> | fis2. b2.\pppp\! | \break
291 %% 25-28
292 r1. | r1. | r1. | r1. | \break
293 %% 29-32
294 r1. | r1. | r1. | r1. | \break
295 %% 33-34
296 r2 b1 | \time 4/1 fis'\breve b'\breve \bar "|."
297 }%% end alto-midi
298
299 %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
300 tenor = {
301 \autoBeamOff
302 \partial 2 d2 ~ |
303 %% 1-4
304 d2\> e a_\( | g\)\! r1 | r1. | r1. | \break
305 %% 5-8
306 r1. | g4 a8[ b] fis4 g8[ a] g4 a8[ b] | a4 b8[ c'] g4 a8[ b] fis4 g8[ a] | g2 d1 | \break
307 %% 9-12
308 <d g>8[ <e a> <fis b>] c'4. <b fis>8[ <a e> <g d>] c4. ~ |
309 <c fis>8-. <d g>-. <e a>-. <fis b>-. <g c'>-. e'4.-. <b fis>8 <a e> <g d> e |
310 d1. | r1. | \break
311 %% 13-16
312 r1. | r1. | r1. | r1. | \break
313 %% 17-20
314 r1. | r1. | r1. | r1. | \break
315 %% 21-24
316 r1. | c'2. c'? | a2^\>^\markup { \teeny \dynamic { pp } } g fis ~ |
317 fis g2 r2\!^\markup { \teeny \dynamic { pppp } } | \break
318 %% 25-28
319 r1. | r1. | r1. | r1. | \break
320 %% 29-32
321 r1. | r1. | r1. | r1. | \break
322 %% 33-34
323 r2 e1 | \time 4/1 b\breve e'\breve \bar "|."
324 } %% end tenor sheet
325
326 tenorM = {
327 \autoBeamOff
328 \partial 2 d2 ~ |
329 %% 1-4
330 d2\pp e a\( | g\)\pppp r1 | r1. | r1. | \break
331 %% 5-8
332 r1. | g4\p a8[ b] fis4 g8[ a] g4 a8[ b] | a4 b8[ c'] g4 a8[ b] fis4 g8[ a] | g2 d1 | \break
333 %% 9-12
334 <d g>8[ <e a> <fis b>] c'4. <b fis>8[ <a e> <g d>] c4. ~ |
335 <c fis>8-. <d g>-. <e a>-. <fis b>-. <g c'>-. e4.-. <b fis>8 <a e> <g d> e |
336 d1. | r1. | \break
337 %% 13-16
338 r1. | r1. | r1. | r1. | \break
339 %% 17-20
340 r1. | r1. | r1. | r1. | \break
341 %% 21-24
342 r1. | c'2. c'? | a2\pp\> g fis ~ | fis g2\ppp\! r2 | \break
343 %% 25-28
344 r1. | r1. | r1. | r1. | \break
345 %% 29-32
346 r1. | r1. | r1. | r1. | \break
347 %% 33-34
348 r2 e1 | \time 4/1 b\breve e'\breve \bar "|."
349 } %% end tenor midi
350
351 %%%%%%% bass; part %%%%%%%%%%%%%%%%
352 bass = {
353 \autoBeamOff
354 \partial 2 a,2 ~ |
355 %% 1-4
356 a,2\> b, e_\( | d\)\! r1 | r1. | r1. | \break
357 %% 5-8
358 d8-.^\< e-. fis-. e-. d-. c4 b,8-. c-. d-. e-. fis-.\! | e-. d4 c b, c4. d8-. e-. |
359 fis4. e d c | b,4 a,2 g,2. | \break
360 %% 9-12
361 <g, c>16[ <a, c> b,8] <a, d>16[ <b, d> c8] g,8-. a,-. b,-. c-. b,-. a,-. g,4 ~ |
362 <g, c>4. <d fis> <e c>8[ <d b,> <c a,> <b, g,>] <c a,>16[ <d b,> <e c>8] | g,1. | r1. | \break
363 %% 13-16
364 r1. | r1. | r1. | r1. | \break
365 %% 17-20
366 r1. | r1. | r1. | r1. | \break
367 %% 21-24
368 c2^\>^\markup { \teeny \dynamic { pp } } b, a, | b, a, g, ~ |
369 g,1. * 3/4 s1. * 1/4\!^\markup { \teeny \dynamic { pppp } } | r1. | \break
370 %% 25-28
371 fis,16[ a, c8] e4. r8 e,16[ g, b,8] d4. r8 |
372 c4. b, a,2. | b,4 c4. d2 r4. | c2 b,8[ a, g, fis,] e,2 | \break
373 %% 29-32
374 r1. | r1. | r1. | r1. | \break
375 %% 33-34
376 r2 a,1 | \time 4/1 e\breve a\breve \bar "|."
377 } %%end bass-sheet
378
379 bassM = {
380 \autoBeamOff
381 \partial 2 a,2 ~ |
382 %% 1-4
383 a,2\pp b, e\( | d\)\pppp r1 | r1. | r1. | \break
384 %% 5-8
385 d8-.\pppp e-. fis-. e-. d-.\ppp c4 b,8-. c-. d-. e-. fis-.\p | e-. d4 c b, c4. d8-. e-. |
386 fis4. e d c | b,4 a,2 g,2. | \break
387 %% 9-12
388 <g, c>16[ <a, c> b,8] <a, d>16[ <b, d> c8] g,8-. a,-. b,-. c-. b,-. a,-. g,4 ~ |
389 <g, c>4. <d fis> <e c>8[ <d b,> <c a,> <b, g,>] <c a,>16[ <d b,> <e c>8] | g,1. | r1. | \break
390 %% 13-16
391 r1. | r1. | r1. | r1. | \break
392 %% 17-20
393 r1. | r1. | r1. | r1. | \break
394 %% 21-24
395 c2^\>^\pp b, a, | b, a, g, ~ | g,1.\!^\pppp | r1. | \break
396 %% 25-28
397 fis,16[\mf a, c8] e4. r8 e,16[ g, b,8] d4. r8 |
398 c4. b, a,2. | b,4 c4. d2 r4. | c2 b,8[ a, g, fis,] e,2 | \break
399 %% 29-32
400 r1. | r1. | r1. | r1. | \break
401 %% 33-34
402 r2 a,1 | \time 4/1 e\breve a\breve \bar "|."
403 }%% end bass-midi
404
405
406 %%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
407 %% get sheet music -------------------------------------------------
408 \score {
409 <<
410 \new Voice = "mezzosoprano" {
411 \clef mezzosoprano \key cis\major \time 3/2
412 \set Staff.instrumentName = \markup { \with-color
413 " " "mezzo " \raise
414 \VoiceColorBlue {\mezzosoprano} }
415 %% \new Lyrics = "mainSL" \lyricsto "mezzosopranoV" { \mezzosopranoL }
416 \new Lyrics = "mainSL" \lyricsto "mezzosoprano" { \mezzosopranoL }
417
418 \context ChoirStaff = "FourPartStaffaddchorus" <<
419 \new Voice = "soprano" { \clef soprano \key g\major \time 3/2
420 \set Staff.fontSize =
421 \override Staff.StaffSymbol.staff-space =
422 \override Staff.StaffSymbol.thickness =
423 \set Staff.instrumentName = "soprano" \soprano }
424 %% \new Lyrics = "mainSL" \lyricsto "SopranoChours" { \sopranoL }
425
426 \new Voice = "alto" { \clef alto \key g\major \time 3/2
427 \set Staff.fontSize =
428 \override Staff.StaffSymbol.staff-space =
429 \override Staff.StaffSymbol.thickness =
430 \set Staff.instrumentName = "alto " \alto }
431 %% \new Lyrics = "mainSL" \lyricsto "AltoChours" { \altoL }
432
433 \new Voice = "tenor" { \clef tenor \key g\major \time 3/2
434 \set Staff.fontSize =
435 \override Staff.StaffSymbol.staff-space =
436 \override Staff.StaffSymbol.thickness =
437 \set Staff.instrumentName = "tenor " \tenor }
438 %% \new Lyrics = "mainTL" \lyricsto "TenorChours" { \tenorL }
439
440 \new Voice = "bass" { \clef bass \key g\major \time 3/2
441 \set Staff.fontSize =
442 \override Staff.StaffSymbol.staff-space =
443 \override Staff.StaffSymbol.thickness =
444 \set Staff.instrumentName = "bass " \bass }
445 %% \new Lyrics = "mainBL" \lyricsto "BassChours" { \bassL }
446 >>
447
448 %% \context PianoStaff = "PianoStaff" <<
449 %% \new Voice = "piano" { \clef treble \key g\major \time 3/2
450 %% \set Staff.instrumentName = "piano " \pianoUP }
451 %% \new Voice = "piano" { \clef bass \key g\major \time 3/2
452 %% \set Staff.instrumentName = "piano " \pianoDown }
453 %% >>
454
455 >>
456
457 \layout {
458 \context { \Staff \RemoveEmptyStaves
459 %% \override VerticalAxisGroup.remove-first =
460 %% It can get effect by using for instance "R1."
461 %% Don't using "r1."
462 }
463 }
464 %%%%%% Don't output Score-sheet %%%%%%%%%%%%%%%%%%%%%%%%
465 %% \layout { \context { \Score skipTypesetting =
466 }
467
468 %% get midi music --------------------------------------------------
469 \score {
470 <<
471 \new Staff { \clef mezzosoprano \key cis\major \time 3/2 \tempo 4 = 48
472 \set Staff.midiInstrument = "pad 2 (warm)"
473 \unfoldRepeats \mezzosopranoM }
474
475 \new Staff { \clef soprano \key g\major \time 3/2 \tempo 4 = 48
476 \set Staff.midiInstrument = "pad 2 (warm)"
477 \unfoldRepeats \sopranoM }
478
479 \new Staff { \clef alto \key g\major \time 3/2 \tempo 4 = 48
480 \set Staff.midiInstrument = "pad 2 (warm)"
481 \unfoldRepeats \altoM }
482
483 \new Staff { \clef tenor \key g\major \time 3/2 \tempo 4 = 48
484 \set Staff.midiInstrument = "pad 2 (warm)"
485 \unfoldRepeats \tenorM }
486
487 \new Staff { \clef bass \key g\major \time 3/2 \tempo 4 = 48
488 \set Staff.midiInstrument = "pad 2 (warm)"
489 \unfoldRepeats \bassM }
490
491 %%\new Staff { \clef treble \key g\major \time 3/2 \tempo 4 = 48
492 %% \set Staff.midiInstrument = "acoustic grand"
493 %% \unfoldRepeats \pianoUPm }
494 %%\new Staff { \clef bass \key g\major \time 3/2 \tempo 4 = 48
495 %% \set Staff.instrumentName = "acoustic grand"
496 %% \unfoldRepeats \pianoDownm }
497 >>
498
499 \midi { tempoWholesPerMinute =
500 }
501 \markup { " " }
502 \markup { \column { \line {
503 About location \hspace
504 \line { \italic " Please, Breath of longa and breve do in the members alternating(But, like Don't stand out). " }
505 } }
506 %%%%%%%%%%%%%%%%%%%% All End %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%