Source code(venezia3.ly , venezia3.latex , run)
---- name venezia3.ly -----------------------------------------------------------
%% -*- Coding: utf-8 -*-
\version "2.10.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 = "May 17 2006"
  instrument = "bass; F clef on 4th line,     baritone; C clef on 5th line."
  meter = "Largo"
  poet = ""
  composer = \markup{\italic "ipika"}
  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.latex -----------------------------------------------------------
\documentclass{article}
\usepackage[dvips]{graphicx,color}
\definecolor{red4}{rgb}{0.54509,0,0}
\usepackage{geometry}
\geometry{a4paper,width=180mm,bottom=6mm,headsep=5mm,%
top=10mm,headheight=0mm,footskip=0mm,portrait}
\parindent=0pt

\begin{document}
\thispagestyle{empty}
\pagecolor{red4}
\hskip -1.0pc \includegraphics{venezia3.eps}\par
\vfill
\end{document}


----- name run-script [for Linux Fedora 7] ---------------------------------------
rm *.eps *.png *.pdf *.midi
lilypond -b eps $1.ly
latex $1.latex
latex $1.latex
dvips -P pdf $1.dvi
gs -sDEVICE=epswrite -sOutputFile=$1b.eps -dNOPAUSE $1.ps -c quit
gs -sDEVICE=png16m -r120 -sOutputFile=$1b.png -dNOPAUSE $1.ps -c quit
ps2pdf $1.ps $1b.pdf
rm $1-1.* *.aux *.log *.dvi *.ps *.tex *.texi
lilypond $1.ly
evince $1.pdf | evince $1b.pdf
rm *.ps
clear
ls



--- name run-script.cmd [For windows XP]------------------------------------------
del *.eps *.png *.pdf *.midi
lilypond -b eps %1.ly
latex %1.latex
latex %1.latex
dvips -P pdf %1.dvi
gswin32c -sDEVICE=epswrite -sOutputFile=%1b.eps -dNOPAUSE %1.ps -c quit
gswin32c -sDEVICE=png16m -r120 -sOutputFile=%1b.png -dNOPAUSE %1.ps -c quit
call ps2pdf %1.ps %1b.pdf
del %1-1.* *.aux *.log *.dvi *.ps *.tex *.texi
lilypond %1.ly
%1.midi | %1.pdf | %1b.pdf |
del *.ps
dir /w


----------------------------------------------------------------------------------
%% run! get pdf and midi
%% Unix(linux) Fedroa 7 + LilyPond ver2.10(after) + teTeX
%% [system terminal bash login shell]
%% $ ./run-script venezia3[Enter]
%% ! I'm sorry, I've not used about tcsh(shell). 
%%
%% In Japan Windows XP + LilyPond ver2.10(after) + 角藤版pTeX + Ghostscript(ver8.60)
%% Other Windows XP + LilyPond ver2.10(after) + teTeX + Ghostscript(ver8.60)
%% [system terminal cmd.exe]
%% >run-script venezia3[Enter]
%%
%% ------------------------------------------------------------------------------
%% dvi file can print with veiw by dviout.exe; for Windows XP
%% ps file can print with veiw by gsview32.exe; for Windows XP
%% Unix use xdvi(for dvi) or evnice(for ps), Of course, Fedora 7.
%%