Landscape of Milano

          milano.mid           milano.pdf           milano-sheet.pdf           milano.mp3

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


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

\header {
  dedication = "Wordless Poem"
  title = "Landscape of Milano"
  subtitle = "At Milano city in Italia"
  subsubtitle = "bass; F clef on 4th line,     soprano; C clef on 1th line."
  poet = ""
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.7(Oct 05 2006)"}
}


sopranoOne = {
\autoBeamOff
%1-4
  a'1. | e'2 b'1 | c''1. | e'2 a'2. r4 |
\break
%5-8
  b'8[ a'] b'4  b'8[ a'] c''2. | b'2 a' c'' | a'4 b' a'2 b' | a'1. |
\break
%9-12
  a'4~ a'8[ g' f' e' d'] g'2 f'8 | e'8[ d'] e'4 f'8[ e' d' c'] d'2 |
  e'1. | c'8[ e'] d'8[ e' f' g'] e'2. |
\break
%13-16
  c'1. | a'4. b'8 c''4 a'2.~ | a'4 g'2 a'8[ b'] a'[ g' f' e'] | a'1. |
\break
%17-20
   a'1. | e'2 b'1 | c''1. | a'1.^\fermata  \bar "|."
}

bassOne = {
\autoBeamOff
%1-4
  a,2 a,4. b,8 c4 a,~ | a, f2 g8[ a] g[ f e d] | c4 f2 e8[ d] e2 |
  eis4 e8[ d] c[ b, a,] e8 eis2 |
\break
%5-8
  R1. | e8[ d] e2 e8[ d] e2 | f8[ g] f[ e d c] a,2. | e8[ d] e2 eis2. |
\break
%9-12
 b4 bis2 c'2. | b2 c'4 a2 c'4 | a2. c'2. | g1. |
\break
%13-16
 a,4. b,8 c4  b,2 c4 | d8[ e] c2. b,2 | a,1. | a,1. |
\break
%17-20
  a,2 a,4. b,8 c4 a,~ | a, f2 g8[ a] g[ f e d] | c4 f2 e8[ d] e2 |
  a,1._\fermata \bar "|."
}


\score {
         <<
     \context ChoirStaff = "coroOne" <<
     \new Staff \with { \consists Ambitus_engraver} {
                          \clef soprano \key c\major \time 3/2
     \set Staff.midiInstrument = "pad 4 (choir)"
     \set Staff.instrumentName = \markup{"soprano"} \sopranoOne }

     \new Staff \with { \consists Ambitus_engraver} {
                           \clef bass \key c\major \time 3/2
     \set Staff.midiInstrument = "acoustic bass"
     \set Staff.instrumentName = \markup{"bass"} \bassOne }
                       >>
        >>

       \layout {}
        \midi {}
}


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

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

\end{document}


--- name run-script.cmd [For windows XP]------------------------------------------
@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 milano.ly[Enter]

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