Charm of Venezia

          venezia3.mid           venezia3.pdf           venezia3-sheet.pdf           venezia3.mp3

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


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

\header {
  dedication = "Wordless Poem"
  title = "Charm of Venezia"
  subtitle = "At Venezia city in Italia"
  subsubtitle = "bass; F clef on 4th line,     baritone; C clef on 5th line."
  meter = "Largo"
  poet = ""
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.14 (Jan 12 2007)"}
}

bassOne = {
\autoBeamOff
%%1-4
 bes,2. ges,2. | aes,2. f,2. | bes,2. ges,2 bes,4~ |
 bes,4.~ bes,8[ ces des] bes,[ ces des] bes,[ des f] |
 \break
%%5-9
 ges,2. bes,~ | bes, ges,~ | ges, f,~ | f, ces~ | ces bes, |
\break
%%10-13
 des4. ees8[ f ges]~ ges[ ees ces]~ ces[ ees ges]~ |
 ges2. ces'2. | ees4. des2. ees4 des8~ | des2 ees8[ f ges] ees[ ges bes]~ bes4 |
\break
%%14-17
 R1. |
 aes2. \acciaccatura { bes8 ges ees ces } ges,2. |
 bes2. \acciaccatura { bes8 ges ees ces } aes,2. |
 aes2. \acciaccatura { bes8 ges ees ces } bes,2. |
\break
%%18-22
 \acciaccatura { bes8 ges ees ces } ges,1. |
 \acciaccatura { bes8 ges ees ces } aes,1. |
 \acciaccatura { bes8 ges ees ces } bes,1.~ |
 bes,2\( des4 ees8[ f8] ges2 | ces'1.\)  \bar "|."
}

baritonOne = {
\autoBeamOff
%%1-4
 \afterGrace des'1 { bes8( aes f des bes,) } r2 |
 \afterGrace ces'1 { bes8( aes f des bes,) } r2 |
 \afterGrace des'1 { bes8( aes f des bes,) } r2 |
 R1. |
%%5-9
 bes2. des'4 ces'2 | aes2 ces' bes | des' ces' ees' | bes des' ces' | aes ces' ees' |
\break
%%10-13
 ces'1. | des'1.~ | des'1. | ces'1. |
\break
%%14-17
 aes2 bes aes | ces'1  r2 | des'1 r2 | ces'1 r2 |
\break
%%18-21
 \afterGrace des'2. { ces'8( bes aes ges f) } ces'2.~ |
 \afterGrace ces'2. { bes8( aes f des bes,) } des'2.~ |
 \afterGrace des'2. { ces'8( bes aes ges f) } des'2.~ |
 des'1.~^\ff | des'1.  \bar "|."
}

%% --- Get sheet music
\score {
      \context ChoirStaff = "Conect" <<
       \new Staff \with { \consists Ambitus_engraver} {
                          \clef baritone \key ges\major \time 3/2 \tempo 4 = 62
                          \set Staff.instrumentName = \markup{"bariton"}
                                                   \baritonOne }

       \new Staff \with { \consists Ambitus_engraver} {
                          \clef bass \key ges\major \time 3/2 \tempo 4 = 62
                          \set Staff.instrumentName = \markup{"bass "}
                                                   \bassOne }
        >>

  \layout {}
}
%% --- get midi music
\score {
     \context ChoirStaff = "Conect" <<
         \new Staff { \clef baritone \key ges\major \time 3/2 \tempo 4 = 62
                      \set Staff.midiInstrument = "pad 4 (choir)"
                                            \baritonOne }

         \new Staff { \clef bass \key ges\major \time 3/2 \tempo 4 = 62
                      \set Staff.midiInstrument = "pad 4 (choir)"
                                            \bassOne }


          >>

  \midi {}
}

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

\begin{document}
\thispagestyle{empty}
\pagecolor{red4}
\vspace*{-16pt}
\hspace*{-20pt}
\input venezia3-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 venezia3.ly[Enter]

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