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

\header {
  dedication = "Wordless Poem"
  title = "Pray for Milano"
  subtitle = "At Milano city in Italia"
  subsubtitle = "May 16 2006"
  instrument = "soprano; C clef on 1th line."
  poet = ""
  composer = \markup{\italic "ipika"}
  arranger = \markup{\tiny "No.9 (Oct 11 2006)"}
}


sopranoOne = {
\autoBeamOff
%1-4(1-12)
  \repeat volta 2 {
  \repeat volta 2 { r8 gis'8[ ais'] b'4. cis''8 disis''!2~ disis''8 |
                                                          ais'4 dis''2 gis'2. | }
  fis'4 e' dis'4. fis'8 e'2 | ais'4 dis''2 gis'2. | }
\break
%5-8(13-16)
  gis'8[ b'] ais'2 b'8[ cis''] ais'2 | gis'2 ais'2 e'2~ | e'4 fis'4 e'4 gis'2. |
  b'2 cis''1 |
\break
%9-12(17-22)
  disis''!1.^\fermata | R1. |
  \repeat volta 2 { gis'4 fis' gis' fis'2. | e'2 fis'4 e'2. | }
\break
%13-16(23-32)
  \repeat volta 2 {
  \repeat volta 2 { gis'8[ b'] ais'2 b'8[ cis''] b'2 | }
  \alternative { { gis'2 ais'2 e'2~ | e'2 fis'4 e'2. | }{ gis'2 ais'2 e'2 | } } }
\break
%17-20(33-36)
  gis'2 fis'1 | des'1.^\fermata | 
  ais'2 ais'4. b'8 cis''4 ais'~ | ais' fis'2 gis'4 b'2 |
\break
%21-24(37-40)
  e'1 gis'2 | dis'1.^\fermata | r8 gis'8[ ais'] b'4. cis''8 dis''2~ dis''8 |
  ais'4 dis''2 gis'2. |
\break
%25-28(41-46)
  gis'8[ b'] ais'2 b'8[ cis''] ais'2 |
  \repeat volta 2 { gis'2 ais'2 e'2~ | e'4 fis'4 e'1 | }
  gis'8[ ais'] b'4. cis''8 dis''2.
\break
%29-32(47-50}
  gis'8[ b'] ais'2 b'8[ cis''] b'2 | gis'2 ais'2 e'2 |
  des'1. | disis''!1.^\fermata  \bar "|."
}


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

       \layout {}
}
%% ------ get midi music
\score {
     \context ChoirStaff = "coroOne" <<
     \new Staff \with { \consists Ambitus_engraver} {
                          \clef soprano \key b\major \time 3/2
     \set Staff.midiInstrument = "pad 4 (choir)"
     \set Staff.instrumentName = \markup{"soprano"} \unfoldRepeats \sopranoOne }
                       >>

       \midi {}
}


---- name milano3.latex -----------------------------------------------------------
\documentclass{article}
\usepackage[dvips]{graphicx,color}
\definecolor{lightgoldenrodyellow}{rgb}{0.98038,0.98038,0.82352}
\usepackage{geometry}
\geometry{a4paper,width=180mm,bottom=6mm,headsep=0mm,%
top=10mm,headheight=6mm,footskip=0mm,portrait}
\parindent=0pt

\begin{document}
\thispagestyle{empty}
\pagecolor{lightgoldenrodyellow}
\hskip -1.0pc \includegraphics{milano3.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
lilypond $1.ly
evince $1.pdf | evince $1b.pdf
rm $1-1.* *.dvi *.aux *.ps *.log *.tex *.texi
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
ps2pdf %1.ps %1b.pdf
lilypond $1.ly
%1.midi | %1.pdf | %1b.pdf
del %1-1.* *.dvi *.aux *.ps *.log *.tex *.texi
dir /w


----------------------------------------------------------------------------------
%% run! get pdf and midi
%% Unix(linux) Fedroa 7 + LilyPond ver2.10(after) + teTeX
%% [system terminal bash login shell]
%% $ ./run-script milano3[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 milano3[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.
%%