Source code --- ave-maria.ly , ave-maria-sheet.texi , run-script-2010-ave.cmd ------- ave-maria.ly ------------------------------------------------------------- %% -*- Coding: utf-8 -*- \version "2.12.1" #(set-default-paper-size "a4") #(set-global-staff-size 16) \paper { ragged-last-bottom = ##f } \header { dedication = " " title = \markup{ \line { \huge\bold "Ave Maria"} } 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. 02, JST 2010" poet = "Prayers" opus = "Op.41 Ave Maria;No.5" meter = "Vivace" copyright = "public Domain" } %%%%%%%%% soprano part %%%%%%%%%%%%%%%%%%%%% soprano = { \autoBeamOff %% 1-5 r4 a'1( ais'4) | e'2 f' e'4 a'4~\melisma | a'8 g' f' e'\melismaEnd r8 g'2..\melisma | a'8 g' f' e'\melismaEnd f'2 g' | r8 c''2\melisma b'8 a'\melismaEnd b'4 c''4.~ | \break %% 6-9 c''8 r8 a'2 g'8( f') e'4 f' | a'2\melisma g'8 f' b'4 c''8 b' a' b'\melismaEnd | c''2. r4 a'2 | b' c'' d'' | \break %% 10-14 a'4 r8 g'8 a'2 b' | c''4~ c''2 d''2.~ | d''1 d'8 c'4. | e'8 g'4. b'8 c''2.. | b'4. g'8( e'4) c'2. | \break %% 15-19 c'2. d'4 e'2 | \time 2/1 e'\breve | \time 3/2 R1. | r4 e''2. e''2 | d''4 e''2 f''2. | \break %% 20-24 e''2. a'2. | d'1. | f'2. f' | f' f' | g'8( a' b') c''2. d''4. | \break %% 25-29 d''4. d''4 d''2.. | c'2 r8 c'2 r8 c'4 | e'2 e'1 | f'2 f'1 | g'2 g'1 | \break %% 30-32 \time 2/1 c'\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 A -- ve Ma -- ri -- a, __ gra __ ti -- a p __ le -- na, Do -- mi -- nus te -- cu __ m, be -- ne -- di -- cta tu in mu -- li -- e--ri -- bus, et be -- ne -- di -- c -- tus fru -- ctus ven -- tris tui Je -- sus. San -- cta Ma -- ri -- a ma -- ter Dei, o -- ra pro no -- "bi -- -- -- s" pec -- ca -- to -- ri -- bus, nunc, et in ho -- ra mor -- tis nos -- trae. A -- men } sopranoM = { \autoBeamOff %% 1-5 r4 a'1( ais'4) | e'2 f' e'4 a'4~ | a'8 g' f' e' r8 g'2.. | a'8 g' f' e' f'2 g' | r8 c''2 b'8[ a'] b'4 c''4.~ | \break %% 6-9 c''8 r8 a'2 g'8( f') e'4 f' | a'2 g'8 f' b'4 c''8 b' a' b' | c''2. r4 a'2 | b' c'' d'' | \break %% 10-14 a'4 r8 g'8 a'2 b' | c''4~ c''2 d''2.~ | d''1 d'8 c'4. | e'8 g'4. b'8 c''2.. | b'4. g'8( e'4) c'2. | \break %% 15-19 c'2. d'4 e'2 | \time 2/1 e'\breve | \time 3/2 R1. | r4 e''2. e''2 | d''4 e''2 f''2. | \break %% 20-24 e''2. a'2. | d'1. | f'2. f' | f' f' | g'8( a' b') c''2. d''4. | \break %% 25-29 d''4. d''4 d''2.. | c'2 r8 c'2 r8 c'4 | e'2 e'1 | f'2 f'1 | g'2 g'1 | \break %% 30-32 \time 2/1 c'\breve | \time 4/1 c'\longa \bar "|." \break } %%%%%%%%%% alto part %%%%%%%%%%%%%%%%%%%%%% alto = { %% 1-5 \autoBeamOff r4 d'1( dis'4) | a2 b4.( c'8) d'4 e'4~ | e'8\melisma d' c'\melismaEnd r8 a1\melisma | b8 a8 g8\melismaEnd b4. c'2. | e'8\melisma f'2 e'8 d' c'\melismaEnd d'4 e'~ | \break %% 6-9 e'8 r4 d'2 c'8 a4 b | d'2\melisma c'8 b e'4 f'8 e' d' e'\melismaEnd | f'2. r4 d'2 | e' f' g' | %% 10-14 d'4 r8 c'8 d'2 e' | f'4~ f'2 g'2.~ | g'4 r2. g8 f4. | a8 c'4. e'1 | d'2 b4 g2. | \break %% 15- g2. a4 b2 | \time 2/1 b\breve | \time 3/2 R1. | r4 b'2. b'2 | a'4 b'2 c''2. | \break %% 20-24 r8 b'2.. d'2 | g1. | b2. b | b b | c'8( d' e') f'2. g'4. | \break %% 25-29 a'4. a'4 a'2.. | g4 r4. g4 r4. g4 | b2 b1 | c'2 c'1 | d'2 d'1 | \break %% 30-32 \time 2/1 c'\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 A -- ve Ma -- ri -- a, __ gra __ ti -- a p __ le -- na, Do -- mi -- nus te -- cu __ m, be -- ne -- di -- cta tu in mu -- li -- e--ri -- bus, et be -- ne -- di -- ctus fruc -- tus ven -- tris tui Je -- sus. San -- cta Ma -- ri -- a ma -- ter Dei, o -- ra pro no -- "bi -- -- -- s" pec -- ca -- to -- ri -- bus, nunc, et in ho -- ra mor -- tis nos -- trae. A -- men } altoM = { \autoBeamOff %% 1-5 r4 d'1( dis'4) | a2 b4.( c'8) d'4 e'4~ | e'8 d' c' r8 a1 | b8 a8 g8 b4. c'2. | e'8 f'2 e'8 d' c' d'4 e'~ | \break %% 6-9 e'8 r4 d'2 c'8 a4 b | d'2 c'8 b e'4 f'8 e' d' e' | f'2. r4 d'2 | e' f' g' | %% 10-14 d'4 r8 c'8 d'2 e' | f'4~ f'2 g'2. | g'4 r2. g8 f4. | a8 c'4. e'1 | d'2 b4 g2. | \break %% 15-19 g2. a4 b2 | \time 2/1 b\breve | \time 3/2 R1. | r4 b'2. b'2 | a'4 b'2 c''2. | \break %% 20-24 r8 b'2.. d'2 | g1. | b2. b | b b | c'8( d' e') f'2. g'4. | \break %% 25-29 a'4. a'4 a'2.. | g4 r4. g4 r4. g4 | b2 b1 | c'2 c'1 | d'2 d'1 | \break %% 30-32 \time 2/1 c'\breve | \time 4/1 c'\longa \bar "|."\break } %%%%%%%% tenor part %%%%%%%%%%%%%%%%%%%%%%% tenor = { \autoBeamOff %% 1-5 r4 b1( bes4) | f2 f f4 f | r2 r8 a2..~ | a2 a a | r8 d'2. d'4 d'4.~ | \break %% 6-9 d'8 r8 b2 b4 b b | b1. | d'2. r4 b2 | c' d' e' | \break %% 10-14 b4 r8 a8 b2 c'2 | d'4~ d'2 e'2.~ | e'8 r2.. d'8 c'4. | c'2 c'1 | d4. d4. d2. | \break %% 15-19 d2. e4 f2 | \time 2/1 f\breve | \time 2/1 R1. | f'2. f'4 e'2 | f'2 g'1 | \break %% 20-24 e2. e | e1. | g2. a | b c' | d'8( e' f') g'2. a'4. | \break %% 25-29 f'4. d'4 b2.. | a2 r8 a2 r8 a4 | c'2 c'1 | d'2 d'1 | e'2 e'1 | \break %% 30-32 \time 2/1 c'\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 A -- ve Ma -- ri -- a, gra -- ti -- a p -- le -- na, Do -- mi -- nus te -- cu -- m, be -- ne -- di -- cta tu in mu -- li -- e--ri -- bus, et be -- nedi -- ctus fru -- ctus ven -- tris tui Je -- sus. San -- cta Ma -- ri -- a ma -- ter Dei, o -- ra pro no -- "bi -- -- -- s" pec -- ca -- to -- ri -- bus, nunc, et in ho -- ra mor -- tis nos -- trae. A -- men } tenorM = { \autoBeamOff %% 1-5 r4 b1( bes4) | f2 f f4 f | r2 r8 a2..~ | a2 a a | r8 d'2. d'4 d'4.~ | \break %% 6-9 d'8 r8 b2 b4 b b | b1. | d'2. r4 b2 | c' d' e' | \break %% 10-14 b4 r8 a8 b2 c'2 | d'4( d'2) e'2. | e'8 r2.. d'8 c'4. | c'2 c'1 | d4. d4. d2. | \break %% 15-19 d2. e4 f2 | \time 2/1 f\breve | \time 2/1 R1. | f'2. f'4 e'2 | f'2 g'1 | \break %% 20-24 e2. e | e1. | g2. a | b c' | d'8( e' f') g'2. a'4. | \break %% 25-29 f'4. d'4 b2.. | a2 r8 a2 r8 a4 | c'2 c'1 | d'2 d'1 | e'2 e'1 | \break %% 30-32 \time 2/1 c'\breve | \time 4/1 c'\longa \bar "|."\break } %%%%%%% bass; part %%%%%%%%%%%%%%%% bass = { \autoBeamOff %% 1-5 r4 e1( ees4) | b,2 b, b,4 b, | r2 b,1^( | b,4.) c4. d2. | f1 f4 f4( | \break %% 6-9 f8) r4 e2 e8 e4 e4 | e1. | g2. r4 e2 | f2 g a | \break %% 10-14 e4 r8 d8 e2 f | g4( g2) a2. | r1 a,8 g,4. | g,2 g,1 | a,2 a,4 a,2. | \break %% 15-19 a,2. b,4 c2 | \time 2/1 c\breve | \time 3/2 R1. | c'2. c'4 b2 | c'2 d'1 | \break %% 20-24 r8 a,2.. a,2 | a,1. | a,2. b, | c d | e8( f g) a2. b4. | \break %% 25-29 g4. e4 c2.. | b,4 r4. b,4 r4. c4 | d2 d1 | e2 e1 | f2 f1 | \break %% 30-32 \time 2/1 c\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 A -- ve Ma -- ri -- a, gra -- ti -- a p -- le -- na, Do -- mi -- nus te -- cu -- m, be -- ne -- di -- cta tu in mu -- li -- e--ri -- bus, et be -- nedi -- ctus fruc -- tus ven -- tris tui Je -- sus. San -- cta Ma -- ri -- a ma -- ter Dei, o -- ra pro no -- "bi -- -- -- s" pec -- ca -- to -- ri -- bus, nunc, et in ho -- ra mor -- tis nos -- trae. A -- men } bassM = { \autoBeamOff %% 1-5 r4 e1( ees4) | b,2 b, b,4 b, | r2 b,1 | b,4. c4. d2. | f1 g4 g4( | \break %% 6-9 f8) r4 e2 e8 e4 e4 | e1. | g2. r4 e2 | f2 g a | \break %% 10-14 e4 r8 d8 e2 f | g4( g2) a2. | r1 a,8 g,4. | g,2 g,1 | a,2 a,4 a,2. | \break %% 15-19 a,2. b,4 c2 | \time 2/1 c\breve | \time 3/2 R1. | c'2. c'4 b2 | c'2 d'1 | \break %% 20-24 r8 a,2.. a,2 | a,1. | a,2. b, | c d | e8( f g) a2. b4. | \break %% 25-29 g4. e4 c2.. | b,4 r4. b,4 r4. c4 | d2 d1 | e2 e1 | f2 f1 | \break %% 30-32 \time 2/1 c\breve | \time 4/1 c\longa \bar "|."\break } %%%%%%%%%% Get both sheet and midi %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% get sheet music --------------------------------------------------------------- \score { \new Score \with { \override VerticalAlignment #'max-stretch = #ly:align-interface::calc-max-stretch } << \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 } } } %% get midi music ---------------------------------------------------------------- \score { << \new Staff { \clef soprano \key c\major \time 3/2 \tempo 4 = 60 \set Staff.midiInstrument = "pad 2 (warm)" \unfoldRepeats \sopranoM } \new Staff { \clef alto \key c\major \time 3/2 \tempo 4 = 60 \set Staff.midiInstrument = "pad 2 (warm)" \unfoldRepeats \altoM } \new Staff { \clef tenor \key c\major \time 3/2 \tempo 4 = 60 \set Staff.midiInstrument = "pad 2 (warm)" \unfoldRepeats \tenorM } \new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 60 \set Staff.midiInstrument = "pad 2 (warm)" \unfoldRepeats \bassM } %%\new Staff { \clef treble \key c\major \time 3/2 \tempo 4 = 60 %% \set Staff.midiInstrument = "acoustic grand" %% \unfoldRepeats \pianoUPm } %%\new Staff { \clef bass \key c\major \time 3/2 \tempo 4 = 60 %% \set Staff.instrumentName = "acoustic grand" %% \unfoldRepeats \pianoDownm } >> \midi { tempoWholesPerMinute = #(ly:make-moment 60 4) } } \markup { " " } \markup { About location \hspace #3 \musicglyph #"noteheads.uM2"(longa) \hspace #2 and \hspace #3 \musicglyph #"noteheads.sM1"(breve) } \markup { \italic " Please, Breath of longa and breve do in the members alternating(But, like Don't stand out). " } \markup { " " } \markup { " " } \markup { " " } \markup { \line {\bold "Prayers;(Latin)"} } \markup {%%column * 2 \fill-line { \column { \line { \column { "Ave Maria, gratia plena," "Dominus tecum," "benedicta tu in mulieribus," "et benedictus fructus ventris tui Jesus." "Sancta Maria mater Dei," "ora pro nobis peccatoribus, nunc, et in hora mortis nostrae." " " "Amen" } \hspace #8 \column { \column { %{ %} } } } }}} ---- ave-maria-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.12.1)}\par \vskip 10pc \centerline{\hskip .6in \bf Ave Maria No.5} \centerline {\hskip .6in \cminch OP{\kern -10pt \BigPoint .}\thinspace 41}\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 \vbox{{\bf Prayers;(Latin)}\par \hskip 3pc \hbox{\hsize = 3in\vtop{ \kern -22pc \noindent Ave Maria, gratia plena,\hfill\break \noindent Dominus tecum,\hfill\break benedicta tu in mulieribus,\hfill\break et benedictus fructus ventris tui Jesus.\hfill\break \noindent Sancta Maria mater Dei,\hfill\break ora pro nobis peccatoribus, nunc,\hfill\break et in hora mortis nostrae.\hfill\break \bigskip \medskip \noindent Amen\hfill\break } \qquad\qquad \vbox{\hsize = 3in \includegraphics{200px-Wga_Pompeo_Batoni_Madonna_and_Child.eps}\par \centerline {[Madonna and Child]} \centerline {Painter; Pompeo Batoni(c. 1742)} }}} @end tex @end iftex @page @tex @lilypondfile[line-width=140.00\mm]{ave-maria.ly} @end tex @vskip 0pt plus 1filll @bye --- run-script-2010-ave.cmd [For windows XP] --------------------------------- lilypond --png --pdf %1.ly lilypond-book --output=texi-out %1-sheet.texi copy title-eps\200px-Wga_Pompeo_Batoni_Madonna_and_Child.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 *.ps *.pdf dir /w -------------------------------------------------------------------------------------usally;(cmd promput) >lilypond --png --pdf ave-maria.ly[Enter]
running script;(cmd promput) >run-script-2010-ave ave-maria[Enter]
(But! this is "Windows XP + LilyPond(ver current) + W32TeX( pTeX) + Ghostscript")
200px-Wga_Pompeo_Batoni_Madonna_and_Child.eps =====> Please download, an eps file from "ja.wikipedia.org"