Source code(firenze.ly , firenze-sheet.latex , run-script)
---- name firenze.ly -------------------------------------------------------------
%% -*- Coding: utf-8 -*-
\version "2.12.1"
#(set-default-paper-size "a4")
#(set-global-staff-size 23)
\header {
dedication = "Wordless Poem"
title = "Landscape of Firenze"
subtitle = "At Firenze city in Italia"
subsubtitle = "alto; C clef on 3th line."
poet = ""
composer = \markup { \italic "yukio yoshida" }
arranger = \markup{\tiny "No.11 (Dec 17 2006)"}
}
altoOne = {
\autoBeamOff
%1-4
f'4. des'8 g'8[ f' g'] des'8 f'4. des'8 |
c'4. bes8 des'8[ c' des'] bes8 c'4. bes8 |
c'4 des'8[ ees' f' g'] f'4 c'4. bes8 |
c'4 bes des' c' des' bes |
\break
%5-8
c'8[ des' c'] bes4. des'8 bes4. c'8[ bes] |
c'8[ bes c'] des'2.. bes4 |
des'4. bes8[ c'] bes8 des'4. c'8 bes4 |
c'2 \times 2/3 { des'4 bes des'2 c'4 bes } |
\break
%9-13
\times 2/3 { des'4 f' ees' c'2 ees'4 f' r4 ees'4 |
bes des' ees' c'2 des'4 ees' f' c' |
r4 ees' f' g' r4 des'8[ ees'] f'2 r4 |
g' f' ees'8[ des'] r4 des'2 bes4 r4 des' } |
\break
%13-16
\times 2/3 { f'4 ees'8[ f'] des'4 r4 bes4 c' bes8[ des'] c'4 bes |
r4 bes8[ c'] bes4 des' c'8[ bes] r4 des'4 bes8[ c'] bes4 |
r4 des'8[ bes] c'4 r4 des'8[ bes] des'4 c'8[ bes] des'8[ c'] r4 } |
c'4 bes2 des'2.~ |
\break
%17-21
des'1. | ees'1 c'2 |
\repeat volta 2 { \chordmode { bes,4. c8 des2.. bes,8 | c4. bes,8 des2.. c8 } } |
bes2. des'2. |
\break
%22-25
c'4. des'8 ees'2.. c'8 | ees'1 c'2 | des'1.~ | des'2. bes2 c'4 |
\break
%26-29
\times 2/3 { c'2 bes8[ des'] bes4 des'8[ bes] c'2 des'8[ bes] des'4 } | bes2. c' |
\times 2/3 { bes8[ des'8] c'2. bes8[ des'] c'2 bes8[ c'] bes4 } |
ees'4. c'8 f'8[ ees' f'] c'8 ees'4. c'8 |
\break
%30-33
bes4. c'8 ees'8[ des' c'] des'8 bes4. ees'8 |
f'4. des'8 g'8[ f' g'] des'8 f'4. des'8 |
ees'4. c'8 f'8[ ees' f'] c'8 ees'4. c'8 |
bes1.~ | bes1. \bar "|."
}
%% get sheet music -----
\score {
\context ChoirStaff = "coroOne" <<
\new Staff \with { \consists Ambitus_engraver} {
\clef alto \key aes\major \time 3/2
\set Staff.instrumentName = \markup{"alto"} \altoOne }
>>
\layout {}
}
%%get midi music -----
\score {
\context ChoirStaff = "coroOne" <<
\new Staff \with { \consists Ambitus_engraver} {
\clef alto \key aes\major \time 3/2
\set Staff.midiInstrument = "pad 4 (choir)" \unfoldRepeats \altoOne }
>>
\midi {}
}
---- name firenze-sheet.latex ----------------------------------------------------
\documentclass{article}
\usepackage[dvips]{graphicx,color}
\definecolor{azure2}{rgb}{0.87842,0.93332,0.93332}
\usepackage{geometry}
\geometry{a4paper,width=180mm,bottom=8mm,headsep=6mm,%
top=4mm,headheight=6mm,footskip=5mm,portrait}
\parindent=0pt
\begin{document}
\thispagestyle{empty}
\pagecolor{azure2}
\vspace*{-16pt}
\hspace*{-20pt}
\input firenze-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
----------------------------------------------------------------------------------