Poem : Work No.10
          venezia.mid           venezia.pdf           venezia-sheet.pdf

[picture of music]


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

\header {
  dedication = "Wordless Poem"
  title = "Landscape of Venezia"
  subtitle = "At Venezia city in Italia"
  subsubtitle = "alto; C clef on 3th line,     tenor; C clef on 4th line."
  meter = "Largo"
  poet = ""
  composer = \markup { \italic "yukio yoshida" }
  arranger = \markup{\tiny "No.10 (Oct 19 2006)"}
}

altoOne = {
\autoBeamOff
%1-4
  r8 bes4. bes16[ c'] bes4 c'2 bes8 | r8 c'4. c'16[ d'] c'4 d'2 c'8 |
  r4 ees'4. ees'16[ f'] ees'4 f'2 | g'4. g'16[ a'] g'4 a'4 bes'2 |
\break
%5-8
  a'8[ bes'8] a'2. bes'4  a'4 |
  r8 a16[ bes c'] bes[ c' r16] g16[ a bes] r16[ c'16 d'] ees'8 f'2 |
  a'2 bes'8[ a'] bes'2 a'8[ g'] | f'4 a' f' a' f' a' |
\break
%9-12
  r4 g'4 a'2. g'4 | a'2 g' a' | r8 g'4 r8 a'4. r8 g'4. r8 | g'2 a'2 bes'2 |
\break
%13-16
  a'2.. r8 bes'4 g' | r8 a'4 g' r8 g'4 a' r4 |
  r4 bes'8[ g'] r8 a'8[ bes'] r4 g'4 r8 | a'2.. r8 g'4 bes' |
\break
%17-20
  r8 g16[ a bes] r16[ c'16 d'] ees'8 f'4 r8 f'16[ ees' d'] c'[ bes a] r8 |
  a'2.. r8 bes'4 g' | bes'2.. r8 a'4 g'| r8 bes4. bes16[ c'] bes4 c'8 bes2
  \bar "|."
}

tenorOne = {
\autoBeamOff
%1-4
  bes2 c'16[ d'] a2. r8 | c'2 d'16[ ees'] bes2. r8 | bes2 c'16[ d'] a2. r8 |
  c'2 d'16[ ees'] bes2.. |
\break
%5-8
  r8 bes2. c'16[ d'] a2 | r8 c'2. d'16[ ees'] bes2 | r8 bes2. c'16[ d'] a2 |
  r8 c'2 d'16[ ees'] bes2. |
\break
%9-12
  g4\(( bes g bes g bes) | f4( a f a f a) | g4( c' g c' g c') |
  f4( bes f bes f bes)\) |
\break
%13-16
  c'4\(( g c' g c' g) | bes( f bes f bes g) | f4( a f a f a) |
  g4( bes g bes g bes)\) |
\break
%17-20
  c'2. bes16[ d'] bes2 r8 | a2.. c'16[ ees'] bes2 | r8 bes2. d'16[ ees'] a2 |
  r8 bes2 c'16[ d'] c'2. \bar "|."
}

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

     \new Staff \with { \consists Ambitus_engraver} {
                           \clef tenor \key bes\major \time 3/2 \tempo 4 = 42
     \set Staff.midiInstrument = "drawbar organ"
     \set Staff.instrumentName = \markup{"tenor"} \tenorOne }
                       >>
        >>

       \layout {}
        \midi {}
}


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

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

\end{document}


--- name run-script.cmd [For windows XP]------------------------------------------
del *.log *.aux *.dvi *.eps *.ps *.pdf *.png *.mid *.count *.texi *.tex
Rem process for %1-sheet.latex -----------------------------------------
lilypond -dbackend=eps %1.ly
Rem Now runing LilyPond normally ---------------------------------------
lilypond --pdf --png %1.ly
Rem Process from here for %1-sheet.latex -------------------------------
latex %1-sheet.latex
dvips -P pdf %1-sheet.dvi
gswin32c -sDEVICE=png16m -r120 -sOutputFile=%1-sheet.png -dNOPAUSE %1-sheet.ps -c quit
call ps2pdf %1-sheet.ps
%1.mid | %1.png | %1-sheet.png | %1.pdf | %1-sheet.pdf
del %1-1.* *.count *.aux *.log *.dvi *.ps *.tex *.texi *.eps *.*~ *~
dir /w
----------------------------------------------------------------------------------
usally;(cmd promput)  >lilypond --png --pdf venezia.ly[Enter]

run-script.cmd;(cmd promput)   >run-script venezia[Enter]
   (But! this is "Windows XP + LilyPond(ver current) + W32TeX( pTeX) + Ghostscript")