Lacrimosa dies illa

          lacrimosa.mid           lacrimosa.pdf           lacrimosa-sheet.pdf           lacrimosa.mp3

This sounds "lacrimosa.mp3" and Please click! music plays.
[picture of music]

[picture of music]

[picture of music]

[picture of music]

[picture of music]



Source code --- lacrimosa.ly , lacrimosa-sheet.texi , run-script.cmd ---
---- lacrimosa.ly -------------------------------------------------------------
%% -*- Coding: utf-8 -*-
%% Jan. 08, 2010
%% Time-stamp: "2013/11/12 14:58"
\version "2.18.0"
#(set-default-paper-size "a4")
%% #(set-global-staff-size 17)  %% run! for texi(lilypond-book.py)
#(set-global-staff-size 18) %%run! normal

\paper {
        ragged-last-bottom = ##f
}

\header {
 dedication = "Text from Requiem-ceremony(part-of; Lacrimósa dies illa,)"
 title = \markup{ \line { \huge\bold  "Lacrimósa dies illa"} }
 subtitle = \markup{ \line {\bold "2010" }}
 %% subsubtitle = #(string-append "LilyPond version " (lilypond-version))
 subsubtitle = \markup{\center-column {
                   "soprano; C clef on 1st line,       alto; C clef on 3rd line."
                   "       bass; F clef on 4th line,    tenor; C clef on 4th line."}}
 composer = \markup{ \line {\italic "Yukio Yoshida"}}
 arranger = "Jan. 08, JST 2010"
 poet = "Prayers"
 opus = "Op.42 Lacrimósa dies illa"
 meter = "Vivace"
 copyright = "public Domain"
}

%%%%%%%%% Add soprano solo(two singers alternating) %%%%%%%%%%%%%%%%%%%%%
Addsoprano = {
   \override Staff.StaffSymbol #'color = #red
   \override Staff.LedgerLineSpanner #'color = #red
   \override NoteHead #'color = #red
   \override Stem #'color = #red
 %% 1-11
    R1. * 5 |
    \repeat volta 2 { R1. * 6 }
%%  12-19
    R1. * 8 |
%%  20-23
    b''2.^\markup { \teeny \italic "Solo(two singers alternating)" }
         _\markup { \teeny  \italic "Dó" } a''_\markup { \teeny  \italic "na" } |
    b''_\markup { \teeny  \italic "é" } a''_\markup { \teeny  \italic "is" } |
    b''_\markup { \teeny  \italic "Dó" } a''_\markup { \teeny  \italic "na" } |
    b''_\markup { \teeny  \italic "é" } a''_\markup { \teeny  \italic "is" } | \break
%%  24-25
    \time 2/1 b''\breve_\markup { \teeny  \italic "A" } |
    \time 4/1 c'''\longa * 1/4_\markup { \teeny  \italic "men" } s\longa * 3/4
    \time 3/2 \bar "|." \break
}

%{
AddsopranoL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \teeny
    Dó -- na é -- is Dó -- na é -- is
    A -- men.
}
%}

AddsopranoM = {
 %% 1-11
    R1. * 5 |
    \repeat volta 2 { \tempo 4 = 40 R1. * 5 | \tempo 4 = 68 R1. | }
%%  12-19
    R1. * 8 |
%%  20-23
    b''2. a'' | b'' a'' | b'' a'' | b'' a'' | \break
%%  24-25
    \time 2/1 b''\breve | \time 4/1 c'''\longa \time 3/2 \bar "|." \break
}

%%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
soprano = {
    \autoBeamOff
%% 1-4
    d'2. e'8 f'4. g'4~ | g'4 a'2. b'8 c''4. | d''2 r4 d'2.^\sfz |
    r4 c'4-. r8 c'4-. r8 c'4-. r4 | \break
%% 5-8
    \times 2/3 { d'4.-. r8 e'2-. f'-. } g'2-. |
    \repeat volta 2 { \times 2/3 {
    d'4.-.^\markup{ \hspace #-2 \italic "riten" } r8 d'2-. d'-. } d'2-. |
    r8 d''4.-. e''4-. f''4. g''4. | f''2 e'' f'' | \break
%% 9-13
    e''4. r8 f''2 e'' | f''2 f''1 | R1. | }
    e''2.^\markup { \hspace #-26 \italic "a tempo" } c'' | a' f' | \break
%% 14-19
    e'1 d'2~ | d' c'1 | g'1 f'2 | g'2 g'2. r4 | a'1  g'2 | a'2 a'2.. r8 | \break
%% 20-23
    g'4.. a'8. g'4.. a' | c'2 d'8 e'2.. | a'4.. b'8. a'4.. b' |
    d'4. e'8 f'2.. r8 | \break
%% 24-25
    \time 2/1 d'\breve | \time 4/1 c'\longa * 1/4 s\longa * 3/4
    \time 3/2 \bar "|." \break
}

sopranoL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
    La -- cri -- mó -- sa di -- es il -- la,
    Qua re -- súr -- get ex fa -- vil -- la
    Ju -- di -- cán -- dus hó -- mo ré -- us:
    Hú -- ic ér -- go pár -- ce Dé -- us.
    Pi -- e Jé -- su Dó -- mi -- ne,
    La -- cri -- mó -- sa di -- es il -- la,
    Dó -- na é -- is ré -- qui -- em
    Dó -- na é -- is ré -- qui -- em
    A -- men.
}

sopranoM = {
    \autoBeamOff
%% 1-4
    d'2. e'8 f'4. g'4~ | g'4 a'2. b'8 c''4. | d''2 r4 d'2.^\sfz |
    r4 c'4-. r8 c'4-. r8 c'4-. r4 | \break
%% 5-8
    \times 2/3 { d'4.-. r8 e'2-. f'-. } g'2-. |
    \repeat volta 2 { \tempo 4 = 40
    \times 2/3 { d'4.-. r8 d'2-. d'-. } d'2-. |
    r8 d''4.-. e''4-. f''4. g''4. | f''2 e'' f'' | \break
%% 9-13
    e''4. r8 f''2 e'' | f'' f''1 | \tempo 4 = 68 R1. | }
    e''2. c'' | a' f' | \break
%% 14-19
    e'1 d'2~ | d' c'1 | g'1 f'2 | g'2 g'2. r4 | a'1  g'2 | a'2 a'2.. r8 | \break
%% 20-23
    g'4.. a'8. g'4.. a' | c'2 d'8 e'2.. | a'4.. b'8. a'4.. b' |
    d'4. e'8 f'2.. r8 | \break
%% 24-25
    \time 2/1 d'\breve | \time 4/1 c'\longa \time 3/2 \bar "|." \break
}

%%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%%
alto = {
     \autoBeamOff
%% 1-4
    g2. a8 b4. c'4~ | c'4 d'2. e'8 f'4. | g'2 r4 g2.^\sfz |
    r4 f4-. r8 f4-. r8 f4-. r4 | \break
%% 5-8
    \times 2/3 { g4.-. r8 a2-. b-. } c'2-. |
    \repeat volta 2 { \times 2/3 {
    g4.-.^\markup{ \hspace #-2 \italic "riten" } r8 g2-. g-. } g2-. |
    r8 g'4.-. a'4-. b'4. c''4. | b'2 b' b' | \break
%% 9-13
    a'2 a' a'4. r8 | b'2 b'1 | R1. | }
    a'2.^\markup { \hspace #-26 \italic "a tempo" } f' | d' b | \break
%% 14-19
    g1 f2~ | f f1 | c'1 b2 | c'2 c'2. r4 | d'1  c'2 | d'2 d'2.. r8 | \break
%% 20-23
    c'4.. d'8. c'4.. d' | f2 g8 a2.. | d'4.. e'8. d'4.. e' |
    g4. a8 b2.. r8 | \break
%% 24-25
    \time 2/1 d'\breve | \time 4/1 c'\longa * 1/4 s\longa * 3/4
    \time 3/2 \bar "|." \break
}

altoL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
    La -- cri -- mó -- sa di -- es il -- la,
    Qua re -- súr -- get ex fa -- vil -- la
    Ju -- di -- cán -- dus hó -- mo ré -- us:
    Hú -- ic ér -- go pár -- ce Dé -- us.
    Pi -- e Jé -- su Dó -- mi -- ne,
    La -- cri -- mó -- sa di -- es il -- la,
    Dó -- na é -- is ré -- qui -- em
    Dó -- na é -- is ré -- qui -- em
    A -- men.
}

altoM = {
     \autoBeamOff
%% 1-4
    g2. a8 b4. c'4~ | c'4 d'2. e'8 f'4. | g'2 r4 g2.^\sfz |
    r4 f4-. r8 f4-. r8 f4-. r4 | \break
%% 5-8
    \times 2/3 { g4.-. r8 a2-. b-. } c'2-. |
    \repeat volta 2 { \tempo 4 = 40
    \times 2/3 { g4.-. r8 g2-. g-. } g2-. |
    r8 g'4.-. a'4-. b'4. c''4. |  b'2 b' b' | \break
%% 9-13
    a'2 a' a'4. r8 | b'2 b'1 | \tempo 4 = 68 R1. | }
    a'2. f' | d' b | \break
%% 14-19
    g1 f2~ | f f1 | c'1 b2 | c'2 c'2. r4 | d'1  c'2 | d'2 d'2.. r8 | \break
%% 20-23
    c'4.. d'8. c'4.. d' | f2 g8 a2.. | d'4.. e'8. d'4.. e' |
    g4. a8 b2.. r8 | \break
%% 24-25
    \time 2/1 d'\breve | \time 4/1 c'\longa \time 3/2 \bar "|." \break
}

%%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
tenor = {
     \autoBeamOff
%% 1-4
    e2. e8 f4. f4~ | f4 g2. g8 a4. | a2 r4 e2.^\sfz |
    r4 d4-. r8 d4-. r8 d4-. r4 | \break
%% 5-8
    e8-. r4 f8-. r4 g8-. r4 a8-. r4 |
    \repeat volta 2 {
    f4-.^\markup{ \hspace #-2 \italic "riten" } r8 g4-. r8 a4-. r8 b4-. r8 |
    d'4-. r8 d'4-. r8 f'4 r8 g'4. | f'2 e' f' | \break
%% 9-13
    e'4. r8 f'2 e' | f'2 f'1 | R1. | }
    e'2.^\markup { \hspace #-26 \italic "a tempo" } d' | e' d' | \break
%% 14-19
    e'1 d'2_~ | d' e'1 | a1 g2 | a2 a2. r4 | b1 a2 | b2 b2.. r8 | \break
%% 20-23
    a4.. b8. a4.. b | d2 e8 f2.. | b4.. c'8. b4.. c' |
    e4. f8 g2.. r8 | \break
%% 24-25
    \time 2/1 d'\breve | \time 4/1 c'\longa * 1/4 s\longa * 3/4
    \time 3/2 \bar "|." \break
}

tenorL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
    La -- cri -- mó -- sa di -- es il -- la,
    Qua re -- súr -- get ex fa -- vil -- la
    Ju -- di -- cán -- dus hó -- mo ré -- us:
    Hú -- ic ér -- go pár -- ce Dé -- us.
    Pi -- e Jé -- su Dó -- mi -- ne,
    La -- cri -- mó -- sa di -- es il -- la,
    Dó -- na é -- is ré -- qui -- em
    Dó -- na é -- is ré -- qui -- em
    A -- men.
}

tenorM = {
     \autoBeamOff
%% 1-4
    e2. e8 f4. f4~ | f4 g2. g8 a4. | a2 r4 e2.^\sfz |
    r4 d4-. r8 d4-. r8 d4-. r4 | \break
%% 5-8
    e8-. r4 f8-. r4 g8-. r4 a8-. r4 |
    \repeat volta 2 { \tempo 4 = 40
    f4-. r8 g4-. r8 a4-. r8 b4-. r8 |
    d'4-. r8 d'4-. r8 f'4 r8 g'4. | f'2 e' f' | \break
%% 9-13
    e'4. r8 f'2 e' | f' f'1 | \tempo 4 = 68 R1. | }
    e'2. d' | e' d' | \break
%% 14-19
    e'1 d'2~ | d' e'1 | a1 g2 | a2 a2. r4 | b1 a2 | b2 b2.. r8 | \break
%% 20-23
    a4.. b8. a4.. b | d2 e8 f2.. | b4.. c'8. b4.. c' |
    e4. f8 g2.. r8 | \break
%% 24-25
    \time 2/1 d'\breve | \time 4/1 c'\longa \time 3/2 \bar "|." \break
}

%%%%%%% bass; part %%%%%%%%%%%%%%%%
bass = {
   \autoBeamOff
%% 1-4
    g,2. g,8 a,4. a,4~ | a,4 b,2. b,8 c4. | c2 r4 a,2.^\sfz |
    r4 g,4-. r8 g,4-. r8 g,4-. r4 | \break
%% 5-8
    a,8-. r4 b,8-. r4 c8-. r4 d8-. r4 |
    \repeat volta 2 {
    b,4-.^\markup{ \hspace #-2 \italic "riten" } r8 c4-. r8 d4-. r8 e4-. r8 |
    g4-. r8 g4-. r8 b4 r8 c'4. |  b2 b2 b2 | \break
%% 9-13
    a2 a2 a4. r8 | b2 b1 | R1. | }
    a2.^\markup { \hspace #-26 \italic "a tempo" } a | a a | \break
%% 14-19
    a1 g2_~ | g g1 | d1 c2 | d2 d2. r4 | e1 d2 | d2 d2.. r8 |\break
%% 20-23
    d4.. e8. d4.. d | g,2 a,8 b,2.. | e4.. f8. e4.. e |
    a,4. b,8 c2.. r8 | \break
%% 24-25
    \time 2/1 d\breve | \time 4/1 c\longa * 1/4 s\longa * 3/4
    \time 3/2 \bar "|." \break
}

bassL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
    La -- cri -- mó -- sa di -- es il -- la,
    Qua re -- súr -- get ex fa -- vil -- la
    Ju -- di -- cán -- dus hó -- mo ré -- us:
    Hú -- ic ér -- go pár -- ce Dé -- us.
    Pi -- e Jé -- su Dó -- mi -- ne,
    La -- cri -- mó -- sa di -- es il -- la,
    Dó -- na é -- is ré -- qui -- em
    Dó -- na é -- is ré -- qui -- em
    A -- men.
}

bassM = {
   \autoBeamOff
%% 1-4
    g,2. g,8 a,4. a,4~ | a,4 b,2. b,8 c4. | c2 r4 a,2.^\sfz |
    r4 g,4-. r8 g,4-. r8 g,4-. r4 | \break
%% 5-8
    a,8-. r4 b,8-. r4 c8-. r4 d8-. r4 |
    \repeat volta 2 { \tempo 4 = 40
    b,4-. r8 c4-. r8 d4-. r8 e4-. r8 |
    g4-. r8 g4-. r8 b4 r8 c'4. |  b2 b2 b2 | \break
%% 9-13
    a2 a2 a4. r8 | b2 b1 | \tempo 4 = 68 R1. | }
    a2. a | a a | \break
%% 14-19
    a1 g2~ | g g1 | d1 c2 | d2 d2. r4 | e1 d2 | d2 d2.. r8 | \break
%% 20-23
    d4.. e8. d4.. d | g,2 a,8 b,2.. | e4.. f8. e4.. e |
    a,4. b,8 c2.. r8 | \break
%% 24-25
    \time 2/1 d\breve | \time 4/1 c\longa \time 3/2 \bar "|." \break
}


%%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% get sheet music ---------------------------------------------------------------
\score {
         <<
          \context Staff = "Add" {
                   \set Staff.fontSize = #-4
                   \override Staff.StaffSymbol #'staff-space = #(magstep -4)
                   \override Staff.StaffSymbol #'thickness = #(magstep -4)
                        \clef soprano \key c\major \time 3/2 \Addsoprano }
                   %%\new Lyrics = "AddSL" \lyricsto "Addsoprano" { \AddsopranoL }

           \context ChoirStaff = "FourPartStaffaddchorus" <<
           \new Voice = "soprano" { \clef soprano \key c\major \time 3/2
                        \set Staff.instrumentName = "soprano" \soprano }
                        \new Lyrics = "mainSL" \lyricsto "soprano" { \sopranoL }

           \new Voice = "alto" { \clef alto \key c\major \time 3/2
                        \set Staff.instrumentName = "alto   " \alto }
                        \new Lyrics = "mainAL" \lyricsto "alto" { \altoL }

           \new Voice = "tenor" { \clef tenor \key c\major \time 3/2
                        \set Staff.instrumentName = "tenor  " \tenor }
                        \new Lyrics = "mainTL" \lyricsto "tenor" { \tenorL }

           \new Voice = "bass" { \clef bass \key c\major \time 3/2
                        \set Staff.instrumentName = "bass   " \bass }
                        \new Lyrics = "mainBL" \lyricsto "bass" { \bassL }
                                           >>

           %%\context PianoStaff = "PianoStaff" <<
           %%\new Voice = "piano" { \clef treble \key c\major \time 3/2
           %%             \set Staff.instrumentName = "piano  " \pianoUP }
           %%\new Voice = "piano" { \clef bass \key c\major \time 3/2
           %%             \set Staff.instrumentName = "piano  " \pianoDown }
           %%                                   >>

         >>

  \layout {
            \context { \RemoveEmptyStaffContext
                       \override VerticalAxisGroup #'remove-first = ##t
                      }
           }
}

%% get midi music ----------------------------------------------------------------
\score {
         <<
           \new Staff { \clef soprano \key c\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats       \AddsopranoM }

           \new Staff { \clef soprano \key c\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats       \sopranoM }

           \new Staff { \clef alto \key c\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats          \altoM }

           \new Staff { \clef tenor \key c\major \time 3/2 \tempo 4 = 68
                         \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats       \tenorM }

           \new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 68
                        \set Staff.midiInstrument = "pad 2 (warm)"
                                         \unfoldRepeats          \bassM }

           %%\new Staff { \clef treble \key c\major \time 3/2 \tempo 4 = 68
           %%             \set Staff.midiInstrument = "acoustic grand"
           %%                                \unfoldRepeats       \pianoUPm }
           %%\new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 68
           %%             \set Staff.instrumentName = "acoustic grand"
           %%                                \unfoldRepeats     \pianoDownm }
         >>

   \midi { tempoWholesPerMinute = #(ly:make-moment 68 4) }
}

\markup { " " }
\markup { \column { \line {
About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) }
\line { \italic " Please, playing of \"longa and breve\" do in the members alternating(But, like Don't stand out). " } } }
\markup { " " }
\markup { " " }
\markup { \line {\bold "Prayers;(Latin)"} }
\markup {%%column * 2
\fill-line {
 \column {
 \line {
   \column {
"Lacrimósa dies illa,"
"Qua resúrget ex favilla"
"Judicándus hómo réus:"
"Húic érgo párce Déus."
"Pie Jésu Dómine,"
"Dóna éis réquiem Amen."
            }
\hspace #8
   \column {
      \column {
%{

%}
            } }
        }
}}}


---- lacrimosa-sheet.texi ------------------------------------------------------
%% -*- Coding: utf-8 -*-
\voffset -.5in
\hoffset -.61in
\font\cminch=cminch
\font\BigPoint=cmr10 at 80pt
\input graphicx.tex
\input eplain.tex
\input texinfo
@iftex
@afourpaper
@finalout
@end iftex
@iftex
@tex
\vbox{\null}\vskip 3pc
\centerline {\hskip .6in \cminch SCORE}\par
\centerline {\hskip .6in (LilyPond ver2.16.2)}\par
\vskip 10pc
\centerline{\hskip .6in \bf Lacrim\'osa dies illa}
\centerline {\hskip .6in \cminch  OP{\kern -10pt \BigPoint .}\thinspace 42}\par
\centerline{\hskip .6in \sevenrm (All choice freedom and free dynamic)}
\kern -5pt
\centerline{\hskip .6in Soprano\qquad \it instrument \quad\tt soprano and voice}\par
\centerline{\hskip .6in Alto\qquad \it instrument \quad\tt alto and voice}\par
\centerline{\hskip .6in Tenore\qquad \it instrument \quad\tt tenore and voice}\par
\centerline{\hskip .6in Bass\qquad \it instrument \quad\tt bass and voice}\par
\vskip 0pt plus 1filll
\centerline{\hskip .6in Public Domain }\par
@end tex
@end iftex
@page
@iftex
@tex
~\vskip 0pt plus 1filll
%%\moveleft 4pc
\vbox{{\bf Prayers;(Latin)}\par

\hskip 3pc \hbox{\hsize = 3in\vtop{ \kern -18pc
\noindent Lacrim\'osa dies illa,\hfill\break

\noindent Qua res\'urget ex favilla\hfill\break

\noindent Judic\'andus h\'omo r\'eus:\hfill\break

\noindent H\'uic \'ergo p\'arce D\'eus.\hfill\break

\noindent Pie J\'esu D\'omine,\hfill\break

\noindent D\'ona \'eis r\'equiem Amen.\hfill\break
}
\qquad\qquad
\vbox{\hsize = 3in
\includegraphics{200px-Michelangelo_Pieta_croncleaned.eps}\par
\centerline {[Pieta]}
\centerline {Painter; Michelangelo(1475-1564)}
}}}
@end tex
@end iftex
@page
@c @tex
@lilypondfile[line-width=140.00\mm]{lacrimosa.ly}
@c @end tex
@vskip 0pt plus 1filll
@bye
@ignore
200px-Michelangelo_Pieta_croncleaned.eps
=====> Please download, an eps file from "ja.wikipedia.org"
@end ignore


---  run-script.cmd -------------------------------------------------------
lilypond --png --pdf %1.ly
lilypond-book --output=texi-out %1-sheet.texi
copy title-eps\200px-Michelangelo_Pieta_croncleaned.eps texi-out\
cd texi-out
tex %1-sheet.texi
dvips -P pdf %1-sheet.dvi
gswin32c -sDEVICE=png16m -r120 -sOutputFile=%1-sheet+page%%d.png -dNOPAUSE %1-sheet.ps -c quit
call ps2pdf %1-sheet.ps
cd ..\
copy texi-out\*.pdf
copy texi-out\*.png
%1.mid | %1-page1.png | %1-sheet+page1.png | %1.pdf | %1-sheet.pdf
del texi-out\*.*
RD texi-out
del *.png *.mid *.eps *.ps *.pdf
dir /w
----------------------------------------------------------------------------------

usally;(cmd prompt)   >lilypond --png --pdf lacrimosa.ly[Enter]

running script;(cmd prompt)   >run-script lacrimosa[Enter]
(However, this "Windows8(& UP) + LilyPond(ver2.18) + W32TeX(& UP) + Ghostscript(ver9.06 & UP)" is required.)