Poem : Work No.21
          mind2.midi           mind2.pdf
[picture of music]


Source code(mind2.ly , mind2.latex , run)
---- name mind2.ly -----------------------------------------------------------
%% -*- Coding: utf-8 -*-
\version "2.10.0"
\header {
  dedication = "Wordless Poem"
  title = "My mind of minor"
  subtitle = "Key e minor"
  subsubtitle = "My mind 2"
  instrument = "Piano"
  poet = "poem of notes"
  composer = \markup{\italic "ipika"}
  arranger = \markup{\tiny "No.21(Jul 01 2007)"}
}

play = { \autoBeamOff
%%1-6
         \repeat volta 2 {
         \repeat volta 2 { r8 e'8 fis'8[ a'] g'4 | b' c''8[ e''] d''4 | }
          e'4 fis' g' | c'8[ e'16 g'] c''8[ b'] a'4 | fis'2.( | e'2.) | 
\break
%%7-12
          \repeat volta 2 { fis'4 g'8[ a'16 b'] c''4 | e''4 fis''4.  a'16[ g'] | }
          \transpose c' e' { c'8[ e'16 g'] c''8[ b'] a'4 | fis'2.( | d''2.) | }
          fis'4 g' a' |
\break
%%13-19
          \repeat volta 2 { c'8[ e'16 g'] c''8[ b'] a'4 | fis'2.( | e'2.) | }
          r8 fis'2(~fis'8 | r4 g'2 | e'2.) | }
\break
       }

playL = { \autoBeamOff
%%19-24
          e''8[^\markup{\bold\italic Largo} fis''16 e''] c''8[ d''16 c'']
                                                               d''8[ e''16 d''] |
          a'4. g' | b'16[ c'' a'8] d''16[ e'' c''8] fis''16[ d'' b'8] |
          c''4.( d'' |  e''2. fis''2.)^\fermata |
\break
         }
playM = {
%%19-24
          { \tempo 8 = 100
          e''8[ fis''16 e''] c''8 d''16 c''] d''8[ e''16 d''] |
          a'4. g' | b'16[ c'' a'8] d''16[ e'' c''8] fis''16[ d'' b'8] |
          c''4.( d'' |  e''2. fis''2.)^\fermata | }
\break
         }

playLII = { \autoBeamOff
%%25-30
          b4^\markup{\bold\italic Lento} c' d' | c'2 fis'8[ g'] |
          d'8[ e'] a'2^\fermata | r4 c'8[ e'16 b] e'8[ fis'16 c'] |
          b8[ c'16 a] d'16[ e' b8] e'16[ c' a8] |
          a16[ c'16 e'8] d'[ b16 a] b8[ c'16 d'] |
\break
           }
playMII = {
%%25-30
          { \tempo 8 =50
          b4 c' d' | c'2 fis'8[ g'] | d'8[ e'] a'2^\fermata |
          r4 c'8[ e'16 b] e'8[ fis'16 c'] | b8[ c'16 a] d'16[ e' b8] e'16[ c' a8] |
          a16[ c'16 e'8] d'[ b16 a] b8[ c'16 d'] | }
\break
            }

playII = { \autoBeamOff
%%31-36-41
         <<
         { c''8[ e''16 g''] c''8[ e''16 g''] c''8[ e''16 g''] |
           c''16[ e'' g''8] c''16[ e'' g''8] c''16[ e'' g''8] |
           <e'' a'>2.^\fermata |
           c''8[ e''16 g''] c''8[ e''16 g''] c''8[ e''16 g''] |
           c''16[ e'' g''8] c''8[ e''16 g''] c''16[ e'' g''8] |
         \break
           c''8[ e''16 g''] c''16[ e'' g''8] c''8[ e''16 g''] |
           <e'' a'>2.^\fermata |
           c''16[ e'' g''8] c''16[ e'' g''8] c''16[ e'' g''8] |
           c''8[ e''16 g''] c''8[ e''16 g''] c''8[ e''16 g''] |
           c''4. d'' |  e''2.^\fermata | } \\
         { e'16[ c' a8] e'16[ c' a8] e'16[ c' a8] |
           d'8[ b16 a] d'8[ b16 a] d'8[ b16 a] |
           <a' d'>2._\fermata |
           e'16[ c' a8] e'16[ c' a8] e'16[ c' a8] |
           d'8[ b16 a] e'16[ c' a8] d'8[ b16 a] |
         \break
           e'16[ c' a8] d'8[ b16 a] e'16[ c' a8] |
           <a' d'>2._\fermata |
           d'8[ b16 a] d'8[ b16 a] d'8[ b16 a] |
           e'16[ c' a8] e'16[ c' a8] e'16[ c' a8] |
           b4 c' d' | c'2 fis'8[ g'] | }
         >>
\break
         }
playIIM = { \autoBeamOff \tempo 8 = 50
%%31-36-41
         <<
         { c''8[ e''16 g''] c''8[ e''16 g''] c''8[ e''16 g''] |
           c''16[ e'' g''8] c''16[ e'' g''8] c''16[ e'' g''8] |
           <e'' a'>2.^\fermata |
           c''8[ e''16 g''] c''8[ e''16 g''] c''8[ e''16 g''] |
           c''16[ e'' g''8] c''8[ e''16 g''] c''16[ e'' g''8] |
         \break
           c''8[ e''16 g''] c''16[ e'' g''8] c''8[ e''16 g''] |
           <e'' a'>2.^\fermata |
           c''16[ e'' g''8] c''16[ e'' g''8] c''16[ e'' g''8] |
           c''8[ e''16 g''] c''8[ e''16 g''] c''8[ e''16 g''] |
           c''4. d'' |  e''2.^\fermata | } \\
         { e'16[ c' a8] e'16[ c' a8] e'16[ c' a8] |
           d'8[ b16 a] d'8[ b16 a] d'8[ b16 a] |
           <a' d'>2._\fermata |
           e'16[ c' a8] e'16[ c' a8] e'16[ c' a8] |
           d'8[ b16 a] e'16[ c' a8] d'8[ b16 a] |
         \break
           e'16[ c' a8] d'8[ b16 a] e'16[ c' a8] |
           <a' d'>2._\fermata |
           d'8[ b16 a] d'8[ b16 a] d'8[ b16 a] |
           e'16[ c' a8] e'16[ c' a8] e'16[ c' a8] |
           b4 c' d' | c'2 fis'8[ g'] | }
         >>
\break
         }

playIII = { \autoBeamOff
%%42-47
           fis'4^\markup{\bold\italic "a tempo"} g'8[ a'16 b'] c''4 |
           e''4 fis''4.  a'16[ g'] | b'4 c''8[ e''] d''4 |
           \repeat volta 2 { e'4 fis' g' | c'8[ e'16 g'] c''8[ b'] a'4 |
                                                        fis'2.( | e'2.)^\fermata }
           \bar "|."
          }
playIIIM = { \autoBeamOff
%%42-47
           { \tempo 8 = 180
           fis'4 g'8[ a'16 b'] c''4 |
           e''4 fis''4.  a'16[ g'] | b'4 c''8[ e''] d''4 |
           \repeat volta 2 { e'4 fis' g' | c'8[ e'16 g'] c''8[ b'] a'4 |
                                                        fis'2.( | e'2.)^\fermata }
           \bar "|."
          }}


\score { \new Staff { \clef treble \key e\minor \time 3/4 \tempo 8 = 180
                       \play \playL \playLII \playII \playIII
                     }
\layout {}
}

\score { \new Staff { \clef treble \key e\minor \time 3/4 \tempo 8 = 180
                       \unfoldRepeats \play \playM \playMII \playIIM
                       \unfoldRepeats \playIIIM
                     }
\midi {}
}
---- name mind2.latex -----------------------------------------------------------
\documentclass{article}
\usepackage[dvips]{graphicx,color}
\definecolor{gray86}{rgb}{0.85881,0.85881,0.85881}
\usepackage{geometry}
\geometry{a4paper,width=180mm,bottom=6mm,headsep=5mm,%
top=10mm,headheight=0mm,footskip=0mm,portrait}
\parindent=0pt

\begin{document}
\thispagestyle{empty}
\pagecolor{gray86}
\includegraphics{mind2.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 ver 2.12(after) + teTeX
%% [system terminal bash login shell]
%% $ ./run-script mind2[Enter]
%% ! I'm sorry, I've not used about tcsh(shell). 
%%
%% In Japan Windows XP + LilyPond ver 2.12(after) + 角藤版pTeX + Ghostscript(ver 8.60)
%% Other Windows XP + LilyPond ver 2.12(after) + teTeX + Ghostscript(ver 8.60)
%% [system terminal cmd.exe]
%% >run-script mind2[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.
%%