Poem : Work No.3
          mind.mid           mind.pdf           mind-sheet.pdf

[picture of music]


ソース記述(mind.ly , mind-sheet.latex , run-script.cmd)
---- name mind.ly ----------------------------------------------------------------
%% -*- Coding: utf-8 -*-
\version "2.12.1"
#(set-default-paper-size "a4")
#(set-global-staff-size 20)

\header {
        dedication = "Wordless Poem"
	title = "Title: In my mind"
        subtitle ="Opus 3"
        subsubtitle = "December 20, 2004"
        composer = \markup { \italic "yukio yoshida" }
}

Up = \relative c' { \clef treble \key c\major \time 4/4 \tempo 4 = 80
%% 1-4
         d2.\mf d8[ d16 f] | e2.\f e8[ e16 g] | f2. f8[ f16 a] |
         g2. g8[ g16 b] \bar "|" \break
%% 5-10
          <c, e g>4  b4 d f  | f8[ g f g e f e f] |
          g8[ a g a] b[ c b c] | a8[ b a b] c[ d c d] |
          e4 f e g| \bar "|" \break
%% 11-17
%{          R1 | a,8[ c8] b16[ d b d] b8[ e16 c a] b8. |
          R1 | c4 a8[ d a f] b4 |
%}
          R1 | r2 r4. g16[ a] | r4. a16[ g] r2 | R1 |
%%          a16( f c a c f a c, f, a c f a f c a) | \break
          a16( f c a f d b g) b8( d a' c ) | \break
%%18-21
         \times 2/3 { a'8(\ff f d a f d) a''( f d a f d) } |
          a''16(\f f c a c f a c, f, a c f a f c a) |
         \times 2/3 { a'8(\ff f d a f d) a''( f d a f d) } |
          a'2 <c c>2\fff \bar "|."
            }

Down = {\clef bass \key c\major \time 4/4 \tempo 4 = 80
%% 1-4
        c,1\mf | c,\f | c, | c, | \break
%% 5-10
          <c, e, g,>4 c,4 e, g, | e,4 e, d, d, | c,4 c, b,, b,, |
           a,, a,, g,, g,, | a,2 a,2 | \break
%% 11-17
%{          <c, e, g,>4 <b,, a, f,> <c, e, g,> <b,, a, f,> | R1 |
          <d, f, a,>4 <c, b, g,> <d, f, a,>4 <c, b, g,> | R1 |
%}
           c8[ e g] d4 f8[ b c'] | c16[ a, c a,] c8 r8 a2 |
           f2 d8[ g,8] f,16[a,c e] | c'16[ a f d] b,4 b16[ g e c] a,4 |
          <f c f,>2~ <f d f,>~ | \break
%% 18-21
          <f d f,>2~ <f c f,>~ | <f c f,>2~ <f d f,>~ |
          <f d f,>2~ <f c f,>~ | <f c f,>2~ <f c f,> \bar "|."
         }


\score { \context StaffGroup <<
              \context Staff = Up { \Up }
              \context Staff = Down { \Down }
                >>
     \layout{ }
      \midi { }
        }

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

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

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