ソース記述(plaza.ly , plaza-sheet.latex , run-script)
---- name plaza.ly ---------------------------------------------------------------
%% -*- Coding: utf-8 -*-
\version "2.12.1"
#(set-default-paper-size "a4")
#(set-global-staff-size 20)
\header {
dedication = "Wordless Poem"
title = "A plaza in a street on Saturday"
subtitle ="Opus 2"
subsubtitle = "December 20, 2004xk"
composer = \markup { \italic "yukio yoshida" }
}
melodyA= \relative c' {
%% 1-4
a'1\mp | c4 e8 f,16\ff b4 c16 b8 g16 g | <e g b>1\fff~ |
<e g b> \bar "|" \break
%% 5(=10)
<f a c>4\f <d e g> <c f a>8 <d g b> <e f b>4 \bar ":|:"
}
melodyAB= \relative c' {
%% 6-7(=14)
a'4 c e,8 f16 b4 f16
g8 b a4 e f\mark \markup {\musicglyph #"scripts.coda"}
\bar ":|" }
melodyB= \relative c' {
%% 8(=15)
g''8 b a4 e f \bar "|" \break
%% 9(=16)
e4 b'16 c8 a4 a8 a16[( a a]) |
%% 10-12(=19)
a4. a8 e16 <e f> e <e f> e <e f> e <e f> | a,8 c b4 f g |
<e g b>4 <d' f a>2.\sf \bar "|" \break
%% 13-16(=23)
<a' f d>4 <f d b>2 <d b g>4 |
<e f>8 e <e f> e <e f> e <e f> e |
<d e>8 c <d e> c <d e> c <d e> c |
<a b>8 e <a b> e <a b> e <a b> e_\markup{\hspace #1 "D.C."
\bar "||" \break
%% D.C --- coda
%% 23+14(=37)
}
melodyC= {
%% 1-4
\set Score.currentBarNumber = #1
g''32[^\markup {
\hspace #-2.0 \musicglyph #"scripts.varcoda" \bold Coda} b'']
\clef bass <g, a, b,>16\sf b,, d, e, f,2 d,16 c, b,, |
f,4 <e, g, c>\fff c, g, | f,2 e,8 a, e,4 |
d,4 f,2 e,4 \bar "|" \break
%% 5-10
d,2 f, | e,2 d, | b,8 c a,16 f, g,2 e,8 |
c,16 c, f, a, c8 d,16 f, e, e, g,8 f,4 |
c,8( d, e, f, d, e, f, g,) | a,8 b, <c e g>2.
\bar "|" \break
%% 11
<a f d>4 <f d b>2 <d b g>4 \bar "|:"
}
melodyCA= {
%% 12-14
<e f>8 e <e f> e <e f> e <e f> e |
<d e>8 c <d e> c <d e> c <d e> c |
<a b>8 e <a b> e <a b> e <a b> e \bar "|" \break
}
melodyD= {
%% 15-17
\clef treble \relative c' {
<e' f>8 e <e f> e <e f> e <e f> e |
<d e>8 c <d e> c <d e> c <d e> c |
<a b>8 e <a b> e <a b> e <a b> e \bar ":|" }
}
melodyE= {
%% 18(End)
\clef bass
a,8 b, <c e g>2.( |
<c e g>1)_\markup{\hspace #3 "Fine"}
^\markup {\hspace #7.5 \musicglyph #"scripts-ufermata"}
\bar "|." \break }
\score { \context Staff = mel {
\clef treble \key c\major \time 4/4 \tempo 4 = 120
\melodyA \melodyAB \melodyB \melodyC
\melodyCA \melodyD \melodyE }
\layout {}
}
\score { \context Staff = mel {
\clef treble \key c\major \time 4/4 \tempo 4 = 120
\melodyA \melodyA \melodyAB \melodyAB
\melodyB \melodyA \melodyA \melodyAB
\melodyAB \melodyC \melodyCA \melodyD
\melodyCA \melodyD \melodyE }
\midi { }
}
---- name plaza-sheet.latex ------------------------------------------------------
\documentclass{article}
\usepackage[dvips]{graphicx,color}
\definecolor{lavenderblush1}{rgb}{1,0.94116,0.96077}
\usepackage{geometry}
\geometry{a4paper,width=180mm,bottom=8mm,headsep=6mm,%
top=4mm,headheight=6mm,footskip=5mm,portrait}
\parindent=0pt
\begin{document}
\thispagestyle{empty}
\pagecolor{lavenderblush1}
\vspace*{-16pt}
\hspace*{-20pt}
\input plaza-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
----------------------------------------------------------------------------------