%% 12:42 AM Wednesday, January 26, 2022
%% Yukio Yoshida
\version "2.22.2"
#(set-default-paper-size "letter")
#(set-global-staff-size 18) %%run! normal
\include "score-soprano-only.ly"
\include "score-alto-only.ly"
\include "score-tenor-only.ly"
\include "score-bass-only.ly"

\paper {
        %%ragged-last-bottom = ##f
}

\header {
 dedication = "In Southern"
 title = "Avenue of the south wind"
 %%subtitle = #(string-append "LilyPond version " (lilypond-version))
 subtitle = \markup { des major(\italic "c des ees f ges aes bes") }
 subsubtitle = \markup{\center-column {
                   "soprano; C clef on 1st line,       alto; C clef on 3rd line."
                   "       bass; F clef on 4th line,    tenor; C clef on 4th line."}}
 arranger = "Feb. 17, JST 2010"
 composer = \markup{ \line {\italic "Yukio Yoshida"}}
 poet = \markup { \fontsize #-1.5
\fill-line {
 \column {%% just in case; For Japanese language
 \line { \italic
   \column {
" "
" "
{ \bold "Poem; Wind"}
"Avenue of the south wind"
"Clean cool and an uncomfortably warm breeze"
"Let a suggestion of the sap of poplar"
"Coming into the room shaking the curtains."
"Beneath the body of sleep in the afternoon"
"The dream of stealing a nap"
"Go out into the street and shaking the curtains."
" "
"Avenue of the south wind"
"Clean cool and an uncomfortably warm breeze"
"The street without anyone and"
"Enter the room shaking the curtains"
"Leave the street and shaking the curtains."
\bold "                                   By(& Compose); Yukio Yoshida"
" "
            }
%%%%%% If you want to view japanes then please do cut ----> only parts "%%+"
%%%%%% But, you must have to specify for your's computer with Japanes font style.
%%+ \hspace #8
%%+   \column {
%%+           \override #'(font-name . "Sazanami Gothic")%%%%%Japanes language(font)
%%+      \column {
%%+ " "
%%+ " "
%%+ " "
%%+ "南部の街の風は"
%%+ "清く涼しく, 生暖かい吹き"
%%+ "ポプラの樹液を漂わせ"
%%+ "カーテンを揺らして 部屋に入ってくる"
%%+ "午後の眠りの身体を撫でて"
%%+ "うたた寝の夢を盗んで"
%%+ "カーテンを揺らし 通りへと出て行く"
%%+ " "
%%+ "南部の街の風は"
%%+ "清く涼しく, 生暖かい吹き"
%%+ "誰もいない通りを,"
%%+ "カーテンを揺らして 部屋に入り"
%%+ "カーテンを揺らして 通りへと去る"
%%+ " "
%%+ " "
%%+              } }
}}}}

 opus = "Op.43"
 meter = "Vivace"
 copyright = "public Domain"
}


%%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% get sheet music ---------------------------------------------------------------
\score {
         <<
           \context ChoirStaff = "FourPartStaffaddchorus" <<
           \new ChoirStaff <<
           \new Voice = "soprano" { \clef soprano \key des\major \time 3/2
                        \set Staff.instrumentName = "soprano" \soprano }
                        \new Lyrics = "mainSL" \lyricsto "soprano" { \sopranoL }
              \new Voice = "repeatsS" { \clef soprano \key des\major \time 3/2
                                                                 \sopranoTwo }
              \new Lyrics = "repeatLs" \lyricsto "sopranoTwo" { \sopranoTwoL }
                            >>

           \new ChoirStaff <<
           \new Voice = "alto" { \clef alto \key des\major \time 3/2
                        \set Staff.instrumentName = "alto   " \alto }
                        \new Lyrics = "mainAL" \lyricsto "alto" { \altoL }
              \new Voice = "repeataA" { \clef alto \key des\major \time 3/2
                                                                   \altoTwo }
              \new Lyrics = "repeataLa" \lyricsto "altoTwo" { \altoTwoL }
                            >>

           \new ChoirStaff <<
           \new Voice = "tenor" { \clef tenor \key des\major \time 3/2
                        \set Staff.instrumentName = "tenor  " \tenor }
                        \new Lyrics = "mainTL" \lyricsto "tenor" { \tenorL }
              \new Voice = "repeataT" { \clef tenor \key des\major \time 3/2
                                                                   \tenorTwo }
              \new Lyrics = "repeataLt" \lyricsto "tenorTwo" { \tenorTwoL }
                            >>

           \new ChoirStaff <<
           \new Voice = "bass" { \clef bass \key des\major \time 3/2
                        \set Staff.instrumentName = "bass   " \bass }
                        \new Lyrics = "mainBL" \lyricsto "bass" { \bassL }
              \new Voice = "repeataB" { \clef bass \key des\major \time 3/2
                                                                   \bassTwo }
              \new Lyrics = "repeataLb" \lyricsto "bassTwo" { \bassTwoL }
                            >>
             >>

           %%\context PianoStaff = "PianoStaff" <<
           %%\new Voice = "piano" { \clef treble \key des\major \time 3/2
           %%             \set Staff.instrumentName = "piano  " \pianoUP }
           %%\new Voice = "piano" { \clef bass \key des\major \time 3/2
           %%             \set Staff.instrumentName = "piano  " \pianoDown }
           %%                                   >>

         >>

  \layout {
            \context { }
           }
}

%% get midi music ----------------------------------------------------------------
\score {
         <<
           \new Staff { \clef soprano \key des\major \time 3/2 \tempo 4 = 60
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats       \sopranoM }

           \new Staff { \clef alto \key des\major \time 3/2 \tempo 4 = 60
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats          \altoM }

           \new Staff { \clef tenor \key des\major \time 3/2 \tempo 4 = 60
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats       \tenorM }

           \new Staff { \clef bass \key des\major \time 3/2 \tempo 4 = 60
                        \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats          \bassM }

           %%\new Staff { \clef treble \key des\major \time 3/2 \tempo 4 = 60
           %%             \set Staff.midiInstrument = "acoustic grand"
           %%                                \unfoldRepeats       \pianoUPm }
           %%\new Staff { \clef bass \key des\major \time 3/2 \tempo 4 = 60
           %%             \set Staff.instrumentName = "acoustic grand"
           %%                                \unfoldRepeats     \pianoDownm }
         >>

   \midi { tempoWholesPerMinute = #(ly:make-moment 60 4) }
}