A lane of Firenze

          firenze4.mid           firenze4.pdf           firenze4-sheet.pdf           firenze4.mp3

This sounds "firenze4.mp3" and Please click! music plays.
[picture of music]


Source code(firenze4.ly , firenze4-sheet.latex , run-script.cmd)
---- name firenze4.ly ------------------------------------------------------------
%% -*- Coding: utf-8 -*-
\version "2.18.0"
#(set-default-paper-size "a4")
#(set-global-staff-size 14)

\header {
  dedication = "Wordless Poem"
  title = "A lane of Firenze"
  subtitle = "Firenze in Autumn"
  subsubtitle = \markup \center-align {
                   "soprano; C clef on 1th line,   alto; C clef on 3th line."
                   \italic " Please, Piano is free " }
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.24(Oct. 19, 2007)"}
}

soprano = {
%1--4
      \autoBeamOff
      e'2 fis'4. gis'4 a'8[ b'] a'8~ | a'4. gis'2 fis'8[ e'] d'4~ d'16. r32 |
      e'2 fis'4. gis'4 a'8[ b'] cis''8~ | cis''4. a'2 b'8[ gis'] e'4 r8 |
\break
%5--9
      e'2 fis'4. d'8[ cis'] e'4. | fis'8[ e' d'] b2..~ b8.. r32 |
      gis'8[ a'] r16 b'4.. cis''2. | b'8-. cis''-. d''2-. a'2. |
      e'8-. d'-. cis'2-. b2. |
\break
%10--14
      cis'8-. d'-. b'2. a'4 \stemUp gis'8-. \stemNeutral fis'-. | b2\( r4 b'2. |
      d''1. | cis''1.\) | r4 e'-. r4 d'-. r4 cis'-. |
\break
%15--19
      r4 b4-. r1 | cis''2\( d''2 cis'' | d''1. | cis''2\) r4 b' r a' |
      r gis'\( d''2 cis''2 |
\break
%20--24
       d''1.\) | b'8[ a' gis'] fis'2 e'8[ d'] cis'4. |
       gis'8[ d' cis'] fis'2 e'8[ d'] cis'4.~ | b2. cis'8[ e'] a'2~ |
       a'1.^\fermata \bar "|."
}

alto = {
%1--4
       \autoBeamOff
       e'2 d'8[ cis' b] e'2~ e'8 | a'2 gis'8[ fis' e'] fis'2~ fis'8 |
       e'8[ cis' b] r8 fis'8[ e' d'] r8 b2 | a8[ b cis'] d'2 fis8[ a b] e'4~ |
\break
%5--9
       e'2 d'8[ e' fis'] gis'2~ gis'8 | e'8[ d' cis'] fis'4. gis'2. |
       fis'8[ d' b] a8 gis2. fis8[ gis] | fis'8[ d'] cis'2 a2. |
       b2 d'8[ e'] fis'2. |
\break
%10--14
       gis'8[ fis'] b2. cis'8[ d' e' fis'~] |
       fis'2 e'16[ d' cis' b] cis'4 b8[ cis'] b4 |
       d'16[ cis' b a] b4 e'16[ d' cis' b] a4 b2 | a1. |
       gis'4 r fis' r gis' r |
\break
%15--19
       fis'4 r a16[ b cis' d'] b16[ cis' d' e'] fis'2 |
       r1 gis'16[ fis' e' d' cis' b a8] | r2 a1_\( | r4 fis1^~ fis4 | gis1. |
\break
%20-24
       fis1\) r4 gis8[ b] | e'2 d'8[ cis' b] e'4 cis'8[ e' fis'] |
       cis'8[ d' e'] cis'2 e'8[ fis'] gis'4.~ |
       gis'8[ fis'] gis'2 fis'8[ e' d' cis'] a4~ | a1. \bar "|."
}


pianoUP = {
%1-
       << { s1. * 24 } \\ {s1. * 24 } >>

}

pianoDown = {
%1-
       << { s1. * 24 } \\ {s1. * 24 } >>

}

%% get sheet music ---------------------------------------------------------------
\score {
         <<
           \context ChoirStaff = "FourPartStaffaddchorus" <<
           \new Voice = "soprano" { \clef soprano \key a\major \time 3/2
                        \set Staff.midiInstrument = "pad 4 (choir)"
                        \set Staff.instrumentName = "soprano" \soprano }

           \new Voice = "alto" { \clef alto \key a\major \time 3/2
                        \set Staff.midiInstrument = "pad 4 (choir)"
                        \set Staff.instrumentName = "alto   " \alto }
                                            >>

         \context PianoStaff
             \with { \override VerticalAlignment #'forced-distance = #6 }
                  <<
         \context Staff = "upper" \new Voice { \clef treble \key a\major \time 3/2
            \set Staff.fontSize = #-3
                   \override Staff.StaffSymbol #'staff-space = #(magstep -3)
                   \override Staff.StaffSymbol #'thickness =#(magstep -3)
             \set Staff.instrumentName = \markup {\column{" " " " "piano  "}}
             \set Staff.midiInstrument = "acoustic grand"       \pianoUP }

         \context Staff = "lower" \new Voice { \clef bass \key a\major \time 3/2
             \set Staff.fontSize = #-3
                   \override Staff.StaffSymbol #'staff-space = #(magstep -3)
                   \override Staff.StaffSymbol #'thickness =#(magstep -3)
             \set Staff.midiInstrument = "acoustic grand"       \pianoDown }
                    >>

         >>

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

---- name firenze4-sheet.latex --------------------------------------------------
\documentclass{article}
\usepackage[dvips]{graphicx,color}
\definecolor{gray86}{rgb}{0.85881,0.85881,0.85881}
\usepackage{geometry}
\geometry{a4paper,width=180mm,bottom=8mm,headsep=6mm,%
top=4mm,headheight=6mm,footskip=5mm,portrait}
\parindent=0pt

\begin{document}
\thispagestyle{empty}
\pagecolor{gray86}
\vspace*{-16pt}
\hspace*{-20pt}
\input firenze4-systems.tex
\vfill

\end{document}


--- name run-script.cmd ------------------------------------------
@Echo off
chcp 437
rem === make; "1:59:27.01 2018/08/24" Yukio Yoshida. 
rem === This is Letter paper! Are you OK? ===
@Echo on
lilypond -dbackend=eps %1.ly
lilypond --pdf --png %1.ly
latex %1-sheet.latex
dvips -t letter -P pdf %1-sheet.dvi
gswin64c -sDEVICE=png16m -r120 -sOutputFile=%1-sheet.png -dNOPAUSE %1-sheet.ps -c quit
call ps2pdf %1-sheet.ps
pause
%1-sheet.pdf | %1-sheet.png | %1.pdf | %1.png | %1.mid
Erase *.aux *.count *.dvi *.ps *.eps *.log *.pdf ^
*.tex *.texi *.mid *.png
dir /oe
----------------------------------------------------------------------------------

usally;(cmd prompt)   >lilypond --png --pdf firenze4.ly[Enter]

run-script.cmd;(cmd prompt)   >run-script firenzie4[Enter]
(However, this "Windows10(64bit) + LilyPond(ver2.18.*) + W32TeX(& UP) + Ghostscript(edition 64bit)" is required.)