The English Hymnal - Wiki Music Experiment/360a

From DPWiki
Jump to navigation Jump to search

Lily1 Code

Edit this section and paste your code between the tags <code><pre> and </pre></code>.

To upload a midi, go to the file repository. You need a userid and password (see this project's main wiki page).

Then create a link in this section to that uploaded midi file.


Lyrics copied from P3 and perl-formatted --QMacrocarpa 10:41, 25 September 2007 (PDT):

"PORTAL of the world's salvation,"
"    Lo, a virgin pure and mild,"
"Humble-hearted, high in station,"
"    Form of beauty undefiled,"
"Crown of earth's anticipation,"
"    Comes the Mother-maid with child."
""
"Here, the serpent's power subduing,"
"    See the Bush unburned by fire,"
"Gideon's Fleece of heaven's imbuing,"
"    Aaron's Rod of bright attire,"
"Fair, and pure, and peace-ensuing,"
"    Spouse of Solomon's desire."
""
"Jesse's Branch received its Flower,"
"    Mother of Emmanuel,"
"Portal sealed and mystic Bower"
"    Promised by Ezekiel,"
"Rock of Daniel's dream, whose power"
"    Smote, and lo, the image fell!"
""
"See in flesh so great a wonder"
"    By the power of God ordained,--"
"Him, whose feet all worlds lay under,"
"    In a Virgin's womb contained;--"
"So on earth, her bonds to sunder,"
"    Righteousness from heaven hath rained."
""
"Virgin sweet, with love o'erflowing,"
"    To the hills in haste she fares;"
"On a kindred heart bestowing"
"    Blessing from the joy she bears;"
"Waiting while with mystic showing"
"    Time the sacred birth prepares."
""
"What fair joy o'ershone that dwelling,"
"    Called so great a guest to greet;"
"What her joy whose love compelling"
"    Found a rest for Mary's feet,"
"When, the bliss of time foretelling,"
"    Lo, the Voice and Word did meet!"
""
"God most high, the heaven's Foundation,"
"    Ruler of eternity;"
"Jesu, who for man's salvation"
"    Came in flesh to make us free;"
"Spirit, moving all creation,"
"    Evermore be praise to thee! Amen."
""


Lily2 Code

Edit this section and paste your code between the tags <code><pre> and </pre></code>.

%%% 360a.png
%%% Hymn 229. (Modern Tune) Portal of the world's salvation.
%%% Rev 1.

%%% Transcriber's Note:
%%% I am quite certain the white 1/2 note printed in the tempo indication is wrong and it 
%%% should be a black 1/4 note instead.  2=126 is blazingly fast, whereas 4=126 is
%%% about right for "in moderate time".  Code adjusted accordingly.

\version "2.10.23"

\header {
	dedication = \markup { \center-align { "SAINTS' DAYS: ST. MARY MAGDALENE" \hspace #0.1 }}
	title = \markup { "229" \large \smallCaps "(Modern Tune)" }
	poet = \markup { \small { \sans "COLLAUDEMUS." \hspace #1 \roman  "(8 7. 8 7. 8 7.)" } }
	meter =  \markup { \small { \italic "In moderate time." \general-align #Y #DOWN \note #"4" #0.5 = 126.} }
	arranger = \markup { \small \italic "French Carol." }
	tagline =""
			}			
			
%%Generates nonbreaking bars
nbbar = { \bar "|" \noBreak }

global = {
\time 3/4
\key f \major
\set Staff.midiInstrument = "church organ"
}

soprano = \relative c' {  f2 g4 \nbbar f4(e) f \nbbar g2 g4 \nbbar a2 f4 \nbbar a(bes) c \nbbar bes(a) g \nbbar f2 g4 \nbbar g2. \bar "||" \break
g4(a) bes \nbbar c2 c4 \nbbar f,(e) f \nbbar g2 g4 \nbbar a(bes) a \nbbar g2 g4 \nbbar f(d) e \nbbar f2. \bar "||" \break
g4(a) bes \nbbar c2 c4 \nbbar f,(e) f \nbbar g2 g4 \nbbar a(bes) a \nbbar g2 g4 \nbbar f(d) e \nbbar f2. \bar "||" }
 
alto = \relative c' {  c2 c4 \nbbar c2 c4 \nbbar e2 e4 \nbbar f2 c4 \nbbar f2 f4 \nbbar e(f) c \nbbar c2 b4 \nbbar c2. \bar "||" \break
g'4(f) e \nbbar f2 c4 \nbbar c2 b4 \nbbar c2 c4 \nbbar c(d) c \nbbar b2 b4 \nbbar bes!2 bes4 \nbbar a2. \bar "||" \break
g'4(f) e \nbbar f2 c4 \nbbar c2 b4 \nbbar c2 c4 \nbbar c(d) c \nbbar b2 b4 \nbbar bes!2 bes4 \nbbar a2. \bar "||"  }

tenor = \relative c { \clef bass a'2 bes4 \nbbar a(g) a \nbbar bes2 bes4 \nbbar c2 a4 \nbbar c2 c4 \nbbar c2 g4 \nbbar a2 f4 \nbbar e2. \bar "||" \break
c'2 c4 \nbbar c2 f,4 \nbbar a2 f4 \nbbar f2 e4 \nbbar f2 f4 \nbbar f2 f4 \nbbar g2 g4 \nbbar f2. \bar "||" \break
c'2 c4 \nbbar c2 f,4 \nbbar a2 f4 \nbbar f2 e4 \nbbar f2 f4 \nbbar f2 f4 \nbbar g2 g4 \nbbar f2. \bar "||"  }

bass = \relative c { \clef bass  f2 f4 \nbbar f2 f4 \nbbar c2 c4 \nbbar f2 f4 \nbbar f(g) a \nbbar g(f) e \nbbar d2 d4 \nbbar c2. \bar "||" \break
e4(f) g \nbbar a2 a,4 \nbbar d2 d4 \nbbar c2 c4 \nbbar f2 f4 \nbbar d2 d4 \nbbar c2 c4 \nbbar f,2. \bar "||" \break
e'4(f) g \nbbar a2 a,4 \nbbar d2 d4 \nbbar c2 c4 \nbbar f2 f4 \nbbar d2 d4 \nbbar c2 c4 \nbbar f,2. \bar "||" }

#(ly:set-option 'point-and-click #f)

\paper {
  #(set-paper-size "a4")
%  annotate-spacing = ##t
  print-page-number = ##f
  ragged-last-bottom = ##t
  ragged-bottom = ##t
}

\book{

\score{
\new ChoirStaff
<<
	\context Staff = upper <<
	\context Voice = sopranos { \voiceOne \global \soprano }
	\context Voice = altos { \voiceTwo \global \alto }
							>>
		\context Staff = lower <<
		\context Voice = tenors { \voiceOne \global \tenor }
		\context Voice = basses { \voiceTwo \global \bass}
								>>
>>

\layout {
	indent=0
	\context { \Score \remove "Bar_number_engraver" }
	\context { \Staff \remove "Time_signature_engraver" }
	\context { \Score \remove "Mark_engraver" }
		\context { \Staff \consists "Mark_engraver" }
	}
%%midi
\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 126 4)}}%% midi score bracket

}%%score


\markup "                   "  %%% force blank space before start of lyrics

\markup "                   "

%%% Lyric titles and attributions

\markup { \hspace #18 \small {  \column { \line {\smallCaps  "Office Hymn."   " M." \hspace #34 \italic "15th cent.  Tr. L. H." }   		 
	\line { \hspace #22 "Mundi salus affutura." }
                                        % \line { "                    "}
}}}


%%% Lyrics

\markup { \hspace #30 %%add space as necc. to center the column
          \column { %% super column of everything
	              \column { %%verse 1 is a column of 2 lines  
	                  \line { \hspace #2.6 \column { \lower #2.4 \fontsize #8 "P" }   %%Drop Cap goes here
				  \hspace #-1.0   %% adjust this if other letters are too far from Drop Cap
				  \column  { \raise #0.0 "ORTAL of the world's salvation,"
			                                 "    Lo, a virgin pure and mild," } }     
	                  \line {  \hspace #2.5  %%adjust hspace until this line left edge is flush with Drop Cap
				   \lower  #1.56  %%adjust this until the line spacing looks right
				   \column {   
					   "Humble-hearted, high in station,"
					   "    Form of beauty undefiled,"
					   "Crown of earth's anticipation,"
					   "    Comes the Mother-maid with child."
					   "                " %%% adds vertical spacing between verses
			}}
 			         } %%% finish verse 1

			
	  } %%% end super column
}

%%fake score block to occupy space and force a pagebreak.  Can't think of a better way of doing this.
\score{
	{s4 }
\header { breakbefore = ##f piece = ##f opus = ##f tagline = ##f }
\layout{	
	\context { \Staff
		\remove Time_signature_engraver
		\remove Key_engraver
		\remove Clef_engraver
		\remove Staff_symbol_engraver
}}}

%%% Second page
%%% Continuation of lyrics

\markup { \hspace #30 %%add space as necc. to center the column
          \column { %% super column of everything				 	 
		        \hspace #1  % adds vertical spacing between verses  

			\line { "2*" \hspace #-0.4
			   \column {	     
				   "Here, the serpent's power subduing,"
				   "    See the Bush unburned by fire,"
				   "Gideon's Fleece of heaven's imbuing,"
				   "    Aaron's Rod of bright attire,"
				   "Fair, and pure, and peace-ensuing,"
				   "    Spouse of Solomon's desire."
				   "                " %%% adds vertical spacing between verses
			}}
			\line { "3*" \hspace #-0.4
			\column {	     
				"Jesse's Branch received its Flower,"
				"    Mother of Emmanuel,"
				"Portal sealed and mystic Bower"
				"    Promised by Ezekiel,"
				"Rock of Daniel's dream, whose power"
				"    Smote, and lo, the image fell!"
				"                " %%% adds vertical spacing between verses
			}}
			\line { "4  "
			\column {	     
				"See in flesh so great a wonder"
				"    By the power of God ordained,—"
				"Him, whose feet all worlds lay under,"
				"    In a Virgin's womb contained;—"
				"So on earth, her bonds to sunder,"
				"    Righteousness from heaven hath rained."
				"                " %%% adds vertical spacing between verses
			}}
			\line { "5  "
			\column {	     
				"Virgin sweet, with love o'erflowing,"
				"    To the hills in haste she fares;"
				"On a kindred heart bestowing"
				"    Blessing from the joy she bears;"
				"Waiting while with mystic showing"
				"    Time the sacred birth prepares."
				"                " %%% adds vertical spacing between verses
			}}
						\line { "6  "
			\column {	     
				"What fair joy o'ershone that dwelling,"
				"    Called so great a guest to greet;"
				"What her joy whose love compelling"
				"    Found a rest for Mary's feet,"
				"When, the bliss of time foretelling,"
				"    Lo, the Voice and Word did meet!"
				"                " %%% adds vertical spacing between verses
			}}
           		\line { "7. "
			   \column {	     
				 "God most high, the heaven's Foundation,"
				 "    Ruler of eternity;"
				 "Jesu, who for man's salvation"
				 "    Came in flesh to make us free;"
				 "Spirit, moving all creation,"
				 "    Evermore be praise to thee!      Amen" 
			}}
	  } %%% end supercolumn
} %%% end markup	  




%%Amen score block
\score {
\new ChoirStaff
	<<
	\context Staff = upper \with { fontsize = #-3 \override StaffSymbol #'staff-space = #(magstep -2) }
		<<
		\context Voice = "sopranos" { \relative c' {\clef treble \global \voiceOne f1 f \bar "||" }}
		\context Voice = "altos" { \relative c' {\clef treble \global \voiceTwo bes1 a \bar "||" }}
		>>
		\context Lyrics \lyricsto "altos" { \override LyricText #'font-size = #-1 A -- men. }
	\context Staff = lower \with { fontsize = #-3 \override StaffSymbol #'staff-space = #(magstep -2) }
		<<
		\context Voice = "tenors" { \relative c {\clef bass \global \voiceOne d1 c \bar "||" }}
		\context Voice = "basses" { \relative c {\clef bass \global \voiceTwo bes1 f \bar "||" }}
		>>
>>

\header { breakbefore = ##f piece = " " opus = " " }
\layout {
	\context { \Score timing = ##f }
	ragged-right = ##t
	indent = 15\cm
	\context { \Staff \remove "Time_signature_engraver" }
	}%%layout

%%Amen midi
\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 126 4) }} %%Amen midi
}%%amen score

} %%% book bracket

Lily3 Notes

Copy the Lilypond source to your computer and compile it to create MIDIs and a PDF to check. Leave notes here, or edit the code in Lily2 and leave notes describing the changes. After errors are corrected, the piece is declared "Cleared" and uploaded to the repository.

If you can't compile Lilypond, use the links here:

Original scan: 360.png

Links to L2 output version 1:

L2-229mod-v1.pdf L2-229mod-v1.midi L2-229mod-v1-amen.midi


Notes by L2 Jkenny 07:21, 19 April 2008 (PDT)

  • I am quite certain the white 1/2 note printed in the tempo indication is wrong and it should be a black 1/4 note instead. 2=126 is blazingly fast, whereas 4=126 isabout right for "in moderate time". Code adjusted accordingly.