Confutatis

          confutatis.mid           confutatis.pdf           confutatis-sheet.pdf           confutatis.mp3

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

[picture of music]

[picture of music]

[picture of music]

[picture of music]



Source code --- confutatis.ly , confutatis-sheet.texi , run-script.cmd ---
---- Confutatis.ly -------------------------------------------------------------
%% -*- Coding: utf-8 -*-
%% Dec. 15, 2010
%% Time-stamp: "2014/01/03 02:27"
\version "2.18.0"
#(set-default-paper-size "a4")
#(set-global-staff-size 18)

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

\header {
 dedication = "Text from Requiem-ceremony(part-of; Confutátis)"
 title = \markup{ \line { \huge\bold  "Confutátis"} }
 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 = "Dec. 15, 2010"
 poet = " "%%\markup { \tiny "Text(Soprno and Alto) from Requem-ceremony;" }
 opus = "Op.54 Confutátis"
 meter = "Vivace"
 copyright = "public Domain"
}


%%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%%
soprano = {
    \autoBeamOff
%% 1-4
   c''2^\markup { \tiny \italic "like fire" } d''4 e''2. | f''1 r4 e''4( |
   f''2) b'4 f'( e' d') | r4 c'1~ c'4-- | \break
%% 5-8
   c'4. c''4. r4 a'2 | f'4 d'2. r4 a'4~ | a'4 b'2 e'2.~ | e'2-- r1 | \break
%% 9-12
   r2. c''4( d''8) e'' f''4 | g''2. r2. | e'2 e' e' | f''1. | \break
%% 13-16
   f''1.\melisma | d'' | b' | g'1. | \break
%% 17-21
   g'4\melismaEnd r2 c'2. | c'2 c'' d'' | e''2. e'' | a'2. g'4_( f' e' | c'1.) |
   \break
%% 22-26
   r2. c''2. | d'' d'' | e''1 r4 e''4~ | e''4. f''2. g''4. | a''1. | \break
%% 27
   \time 4/1 a''\longa \bar "|." \time 3/2 \break
}

sopranoL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
Con -- fu -- tá -- tis ma -- le -- di -- ctis,
Flám -- mis á -- cri -- bus ad -- di -- ctis,
Vó -- ca me cum be -- ne -- di -- ctis.
%% O -- ro súp -- plex et ac -- cli -- nis
á __
Cor con -- tri -- tum quá -- si ci -- nis:
Gé -- re cú -- ram mé -- i fi -- nis.
}

sopranoM = {
    \autoBeamOff
%% 1-4
   c''2 d''4 e''2. | f''1 r4 e''4( | f''2) b'4 f'( e' d') | r4 c'1~ c'4-- | \break
%% 5-8
   c'4. c''4. r4 a'2 | f'4 d'2. r4 a'4~ | a'4 b'2 e'2.~ | e'2-- r1 | \break
%% 9-
   r2. c''4( d''8) e'' f''4 | g''2.  r2. | e'2 e' e' | f''1. | \break
%% 13-16
   f''1.\melisma | d'' | b' | g' | \break
%% 17-21
   g'4\melismaEnd r2 c'2. | c'2 c'' d'' | e''2. e'' | a'2. g'4( f' e' | c'1.) |
   \break
%% 22-26
   r2. c''2. | d'' d'' | e''1 r4 e''4~ | e''4. f''2. g''4. | a''1. | \break
%% 27
   \time 4/1 a''\longa \bar "|." \time 3/2 \break
}

%%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%%
alto = {
     \autoBeamOff
%% 1-4
   c'2-.^\markup { \tiny \italic "heat of anger" } c'4-. c'2.-. |
   c'1-. c'2-.( | c'2-.) r4 a4-. a2-.( | a4-.) r4 g1-. | \break
%% 5-8
   r8 f2..-. g2-. | a8-. a4-. f2..-. r4 | g2-. g-. f-.~ | f2-.-- r1 | \break
%% 9-12
   r2. a2 a4~ | a4 a2 b'2. | r2. c'4( d'8) e' f'4 | g'1. | \break
%% 13-16
   g'1.\melisma | e' | c' | a | \break
%% 17-21
   a4\melismaEnd r2. f2 | f2 f' g' | a'2. a' | d'2. a2.( | f1.) | \break
%% 22-26
   r2 c'2. d'4~ | d'4. d'2. e'4.~ | e'2.. r4 e'4.~ | e'4. f'2. g'4. | a'1. | \break
%% 27
   \time 4/1 a'\longa \bar "|." \time 3/2 \break
}

altoL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
Con -- fu -- tá -- tis ma -- le -- di -- ctis,
Flám -- mis á -- cri -- bus ad -- di -- ctis,
Vó -- ca me cum be -- ne -- di -- ctis.
%% O -- ro súp -- plex et ac -- cli -- nis
á __
Cor con -- tri -- tum quá -- si ci -- nis:
Gé -- re cú -- ram mé -- i fi -- nis.
}

altoM = {
     \autoBeamOff
%% 1-4
   c'2-. c'4-. c'2.-. | c'1-. c'2-.( | c'2-.) r4 a4-. a2-.( |
   a4-.) r4 g1-. | \break
%% 5-8
   r8 f2..-. g2-. | a8-. a4-. f2..-. r4 | g2-. g-. f-.~ | f2-.-- r1 | \break
%% 9-12
   r2. a2 a4~ | a4 a2 b'2. | r2. c'4( d'8) e' f'4 | g'1. | \break
%% 13-16
   g'1.\melisma | e' | c' | a | \break
%% 17-21
   a4\melismaEnd r2. f2 | f2 f' g' | a'2. a' | d'2. a2.( | f1.) | \break
%% 22-26
   r2 c'2. d'4~ | d'4. d'2. e'4.~ | e'2.. r4 e'4.~ | e'4. f'2. g'4. | a'1. | \break
%% 27
   \time 4/1 a'\longa \bar "|." \time 3/2 \break
}

%%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%%
tenor = {
     \autoBeamOff
%% 1-4
   R1. | f4.-.^\markup {
             \hspace #-24 \tiny \italic "heat of anger" } a8-. c'4-. f2.-. |
   R1. | g4.-. b8-. d'4-. g2.-. | \break
%% 5-8
   r8 d'2..-. e'2-. | c'2-. a-. f-. | r4 c'4-. r4 a4-. r4 f4-. | R1. | \break
%% 9-12
   g1.\melisma | a | b | c' | \break
%% 13-16
   c'4\melismaEnd r2 e'2. | e'2. c'2 c'4~ | c'2 b4 a2. | a2 f1 | \break
%% 17-21
   r4 f2. f2 | f'2. g' | R1. | c'2. a | f2 d1 | \break
%% 22-26
   c'2. c' | d' d' | r2. e'2. | e'  f' | g'1. | \break
%% 27
   \time 4/1 g'\longa \bar "|." \time 3/2 \break
}

tenorL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
Con -- fu -- tá -- tis ma -- le -- di -- ctis,
Flám -- mis á -- cri -- bus ad -- di -- ctis,
%%Vó -- ca me cum be -- ne -- di -- ctis.
ó __
O -- ro súp -- plex et ac -- cli -- nis
Cor con -- tri -- tum quá -- si ci -- nis:
Gé -- re cú -- ram mé -- i fi -- nis.
}

tenorM =  {
     \autoBeamOff
%% 1-4
   R1. | f4.-. a8-. c'4-. f2.-. | R1. | g4.-. b8-. d'4-. g2.-. | \break
%% 5-8
   r8 d'2..-. e'2-. | c'2-. a-. f-. | r4 c'4-. r4 a4-. r4 f4-. | R1. | \break
%% 9-12
   g1.\melisma | a | b | c' | \break
%% 13-16
   c'4\melismaEnd r2 e'2. | e'2. c'2 c'4~ | c'2 b4 a2. | a2 f1 | \break
%% 17-21
   r4 f2. f2 | f'2. g' | R1. | c'2. a | f2 d1 | \break
%% 22-26
   c'2. c' | d' d' | r2. e'2. | e'  f' | g'1. | \break
%% 27
   \time 4/1 g'\longa \bar "|." \time 3/2 \break
}

%%%%%%% bass; part %%%%%%%%%%%%%%%%
bass = {
   \autoBeamOff
%% 1-4
   r8^\markup { \tiny \italic "like fire" } b,4 d8 f4 b,2. | R1. |
   r8 c4 e8 g4 c2. | R1. | \break
%% 5-8
   g2.. a2 r8 | f4. r8 d4. r8 b,4. r8 | c2 d b, | R1. | \break
%% 9-12
   c1.\melisma | d | e | f | \break
%% 13-16
   f4\melismaEnd r2 a2. | a2. f2 f4~ | f2 e4 d2. | d2 b,1 | \break
%% 17-21
   r4 b,2 b,2. | b c' | R1. | f2. d | b,1. | \break
%% 22-26
   c2. c | d d | r2. e2. | e  f | g1. | \break
%% 27
   \time 4/1 g\longa \bar "|." \time 3/2 \break
}

bassL = \lyricmode {
    \override Score . LyricText #'font-shape = #'italic
    \tiny
Con -- fu -- tá -- tis ma -- le -- di -- ctis,
Flám -- mis á -- cri -- bus ad -- di -- ctis,
%%Vó -- ca me cum be -- ne -- di -- ctis.
ó __
O -- ro súp -- plex et ac -- cli -- nis
Cor con -- tri -- tum quá -- si cinis:
Gé -- re cú -- ram mé -- i fi -- nis.
}

bassM = {
   \autoBeamOff
%% 1-4
   r8 b,4 d8 f4 b,2. | R1. | r8 c4 e8 g4 c2. | R1. | \break
%% 5-8
   g2.. a2 r8 | f4. r8 d4. r8 b,4. r8 | c2 d b, | R1. | \break
%% 9-12
   c1.\melisma | d | e | f | \break
%% 13-16
   f4\melismaEnd r2 a2. | a2. f2 f4~ | f2 e4 d2. | d2 b,1 | \break
%% 17-21
   r4 b,2 b,2. | b c' | R1. | f2. d | b,1. | \break
%% 22-26
   c2. c | d d | r2. e2. | e  f | g1. | \break
%% 27
   \time 4/1 g\longa \bar "|." \time 3/2 \break
}


%%%%%%%%%% sheet and midi music code part %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% get sheet music ---------------------------------------------------------------
\score {
         <<
           \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       \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 { \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 { " " }
\markup { " " }
\markup { " " }
\markup { " " }
\markup { \tiny \italic \line {\bold "Prayers;(Latin)"} }
\markup {%%column * 2
\fill-line { \tiny \italic
 \column {
 \line {
   \column {
"Confutátis maledictis,"
"Flámmis ácribus addictis,"
"Vóca me cum benedictis."
"Oro súpplex et acclinis"
"Cor contritum quási cinis:"
"Gére cúram méi finis."
            }
\hspace #8
   \column {
      \column {
%{

%}
            } }
        }
}}}


---- confutatis-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 confut\'atis}
\centerline {\hskip .6in \cminch  OP{\kern -10pt \BigPoint .}\thinspace 54}\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 = 2.2in\vtop{ \kern -18pc
\noindent Confut\'atis maledictis,\hfill\break

\noindent Fl\'ammis \'acribus addictis,\hfill\break

\noindent V\'oca me cum benedictis.\hfill\break

\noindent Oro s\'upplex et acclinis\hfill\break

\noindent Cor contritum qu\'asi cinis:\hfill\break

\noindent G\'ere c\'uram m\'ei finis.\hfill\break
}
\vbox{\hsize = 3in
\includegraphics[scale=.4]{Michelangelo_-_Fresco_of_the_Last_Judgement.eps}\par
\centerline {\qquad\qquad\quad [Fresco of the Last Judgement]}
\centerline {\qquad\qquad\quad  Painter; Michelangelo(1475-1564)}
}}}
@end tex
@end iftex
@page
@c @tex
@lilypondfile[line-width=140.00\mm]{confutatis.ly}
@c @end tex
@vskip 0pt plus 1filll
@bye
@ignore
Michelangelo_-_Fresco_of_the_Last_Judgement.eps
=====> Please download, an eps file from "Fresco of the Last Judgement"
@end ignore


---  run-script.cmd -------------------------------------------------------
lilypond --pdf %1.ly
lilypond-book --output=texi-out %1-sheet.texi
copy title-eps\*.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\*.png
copy texi-out\%1-sheet.pdf
copy texi-out\*.mid %1.mid
%1-sheet+page1.png | %1.pdf | %1-sheet.pdf縲€| %1.mid
rmdir /s /q texi-out
dir /w
----------------------------------------------------------------------------------

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

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