The English Hymnal - Wiki Music Experiment/041

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 here: 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.

Midi file here: midi file

Lily2 Code

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

To upload the output PDF and midi files, go here: file-repository. You need a userid and password (see this project's main wiki page).

Then create a link in the Lily3 section to those files

%%% 041.png
%%% Hymn 9 Winchester New. "On Jordan's bank the Baptist's cry"
%%% Version 3 Reset fonts

\version "2.10"

\header {
 dedication = \markup { \center-align { "THE CHRISTIAN YEAR - ADVENT"
		\hspace #0.1 }}	
 title = "9"
 meter = \markup { \small { \column { \line { \sans {"WINCHESTER NEW."} \hspace #1 \roman {"(L. M.)"}}
		                  \line { \italic {Slow and dignified} \fontsize #-5 \general-align #Y #DOWN \note #"2" #1 = 56.} } } } 
 arranger = \markup { \small { \center-align {
		 \line{ \italic {"Adapted from Chorale in the" } }
		 \line { \italic { "'Musikalisches Hand-Buch,' Hamburg, 1690."} } } } }
 tagline =""
}


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


soprano = \relative c' {
  \partial 2 f2 | bes2 f2 g2 g | f2 ees2 d2\fermata \bar "||" d2 | ees2 d2 c2 f2 | \break
  f2 e2 f2\fermata \bar "||" f2 | bes2 c2 d2 bes2 | \break
  ees2 d2  c2\fermata \bar "||" d2 | bes2 g2  f2 bes2 | bes2 a2 bes2\fermata \bar "||" 
}

alto = \relative c' {
   d2 | f2 d2  ees2 ees4( d4) | c2 a2  bes2 \bar "||" bes2 | bes2 bes2  c2 d2 | 
   d2 c2  c2 \bar "||" f2 | f2 ees2  d2 g4( f4) 
   ees2 f2  f2 \bar "||" f2 | f2 ees2  f2 d2 | g2 f2  f2 \bar "||" 
}


tenor = \relative c { \clef bass
   bes'2 | bes2 bes2 bes2 ees, | f2 f2  f2 \bar "||" f2 | g2 f4( g4)  a2 a2 |
   bes4( a4) g2  a2 \bar "||" a2 | bes2 g4( a4)  bes2 bes2 |
   bes4( a4) bes2  a2 \bar "||" bes2 | bes2 bes2  bes2 bes2  | c2 c2  d2 \bar "||"
}


bass = \relative c { \clef bass
   bes2 | d2 bes2  ees2 c4( bes4) | a2 f2  bes2_\fermata \bar "||" bes2 | g2 bes2  f2 d'2 | 
   bes2 c2  f,2_\fermata \bar "||" f'4( ees4) | d2 c2  bes2 ees4( d4) |
   c2 d4( ees4)  f2_\fermata \bar "||" bes, |  d2 ees2  d2 g2 | ees2 f2  bes,2_\fermata \bar "||" 
}




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

\paper {
 #(set-paper-size "a4")
 between-system-padding = 2\mm
 before-title-space = 0\mm
 after-title-space = 1.5\mm
 top-margin = 3\mm
 bottom-margin = 5\mm
 print-page-number = ##f
 between-system-space = #0
 ragged-last-bottom = ##t
 ragged-bottom = ##t
}

%% This next part is an identifier for the 5th verse.  In order to save space, this 5th verse will be inserted
%% on the left side of the Amen score block.  This is done by setting the 5th stanza as the markup text in the instrument name
%% field of the soprano staff of the Amen score. Doing this allows the entire hymn to be printed on 1 page.

insertverse = \markup { \hspace #0 \translate #(cons 0 -6.4)  
	             \line { \fontsize #3 { \hspace #16 \italic "Unison." " 5. "
		     \override #'(baseline-skip . 3.1) \column { 
			 "All praise, eternal Son, to thee"
			 "Whose advent sets thy people free,"
			 "Whom, with the Father, we adore,"
		      "And Holy Ghost, for evermore.   Amen.          " }
 	 }} %% end last stanza
}


\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 timing = ##f }
		\context { \Score \remove "Bar_number_engraver" }
		\context { \Staff \remove "Time_signature_engraver" }
		\context { \Score \remove "Mark_engraver" }
		\context { \Staff \consists "Mark_engraver" }
	}
	
\midi { 
 \context {
 \Score 
 tempoWholesPerMinute = #(ly:make-moment 56 2)
 }
 }
	
} %%score bracket


\markup { \hspace #4 %%add space as necc. to center the column
 \column { %% super column of everything
	 \hspace #0.2
	 \line { \hspace #60 \small \italic {C. Coffin, 1676-1749.  Tr. J. Chandler.}}
	 \line { \hspace #38 \small {"Jordanis oras praevia."}}
	 \line { %% a master line of 3 columns
	 \column { %% column 1
	 \hspace #0.2 % adds vertical spacing between verses
               \column {
		 \hspace #0.2      
		 \line { \hspace #2.2 \column { \lower #2.4 \fontsize #8 "O" } %%Drop Cap goes here
			 \hspace #-1 %% adjust this if other letters are too far from Drop Cap
			\column { \raise #0 "N Jordan's bank the Baptist's cry" "  Announces that the Lord is nigh;"} } 
	 \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 { 
				"Come then and hearken, for he brings"
				"Glad tidings from the King of kings."
			 		}}
	 } %% finish stanza 1
		 
		 \hspace #0.2 % adds vertical spacing between verses
		 \line { "2 "
		 \column {	 
			 	"Then cleansed be every Christian breast,"
				"And furnished for so great a guest!"
				"Yea, let us each our hearts prepare"
				"For Christ to come and enter there."
		 }}
		 } %% finish Page column 1
		
	\hspace #4 %%adds horizontal space columns 1 and 2 
			 
	\column { \filled-box #'(0.0 . 0.1) #'( -28 . -5) #0 } %%Column 2. This is the line dviding the columns 1 and 3. 
			 	 
	\hspace #4 %%adds horizontal space between columns 2 and 3
	 
	\column { %%start page column 3		
		\hspace #0.1 % adds vertical spacing between verses
		\line { \italic "Unison." }
		\line { "3 "
		 \column {	 
			 	"For thou art our salvation, Lord,"
				"Our refuge and our great reward;"
				"Without thy grace our souls must fade,"
				"And wither like a flower decayed."	 
		}} 
	 	\hspace #0.1 % adds vertical spacing between verses
		\line { "4 "
		 \column { 
			 	"Stretch forth thine hand, to heal our sore,"
				"And make us rise to fall no more;"
				"Once more upon thy people shine,"
				"And fill the world with love divine."
		}} 
 
	 } %% end column 3
	 } %% master line bracket

 } %% page super column bracket
} %%markup bracket


%% Amen score block
\score{
		
	
 \new ChoirStaff
 <<
 \context Staff = upper \with { fontSize = #-3  \override StaffSymbol #'staff-space = #(magstep -2) } 
                       << 
        \context Voice = "sopranos" { \relative c' {        
	                           \overrideProperty #"Score.NonMusicalPaperColumn"
                                                #'line-break-system-details #'((Y-offset . 135)
                                                        (alignment-offsets . (0 -5.4 -11.6)))
                                    \set Staff.instrumentName = \insertverse 
                                                    \global \voiceOne  bes'1 bes1 \bar "||" }}
	\context Voice = "altos" { \relative c' {   \global \voiceTwo g'1 f1 \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 {  \global \clef bass \voiceThree ees'1 d1 \bar "||" }}
	\context Voice = "basses" { \relative c {  \global \clef bass \voiceFour ees1 bes1 \bar "||" }}
			 >> 
 >>			 
\header { breakbefore = ##f piece = " " opus = " " }

\layout { 
	ragged-right = ##t
         indent = 15\cm
	\context { \Staff \remove Time_signature_engraver }

 }

\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 56 2) }} %%Amen midi 

} 	
	

} %% book bracket


Lily3

Download the files from these links, edit the code in Lily2 or else leave notes in the section below.

Version 1:

pdf

midi

amen midi


Version 2:

pdf


Verson 3:

pdf

Notes

Notes. Jkenny 20:19, 11 May 2007 (PDT)

  • I did something adventurous here. I squeezed everything into one page by pushing the amen block adjacent to the last verse of the lyrics, using some Liylpond gymnastics. I think this should not be done too often. But here it was a choice of having the Amen isolated on its own page or a huge whitespace.

Comments: --stygiania 21:33, 11 May 2007 (PDT)

  • The amen block placement works for me.
  • The 'Musikalisches' line is italics in the original instead of small caps.
  • This one was bitten by the "extra-bar-line" bug.
  • Need to squeeze in "Unison." before verse 3.

Reply. Jkenny 03:18, 12 May 2007 (PDT)

  • Fixed all the errors
  • Loaded v2 pdf only as midi unchanged.
    • extra bar-lines - shows how dangerous it is to leave timing check on.
  • Squeezed in Unison above verse 3. looks like a smaller font so added \small.
  • Then I moved verse 1 to line up with it. This causes a biggish white space between the Jordanis and the verses - is this all right? Or should I move verse 1 back to its original spot?

Comments: --QMacrocarpa 10:08, 12 May 2007 (PDT)

  • 2nd system last measure-- the e-flat in alto line should not have explicit accidental. Wasn't there in version 1. (hmm, maybe whoever declares L3 cleared really should look for new problems?)
  • I like the one-page arrangement (musicians always seem to misplace 2nd pages).
  • I'm ok with white space above verses.

Replies: --Jkenny 10:24, 12 May 2007 (PDT)

  • Okay fixed that. It shows how Lilypond is a complex interacting system. The original problem was unwanted bar lines. I turned timing-check off so that Lilypond would stop inserting bar lines without being told. When I did that, accidentals started showing up, and now have to be suppressed again.

Comments: --stygiania 13:47, 12 May 2007 (PDT)

  • Looks like everything is fixed up. Lily3 cleared.


Record of Work

    • Lily1 - done stygiania (midi, Cakewalk, church organ)
    • Lily2 - done by jkenny.
    • Lily3 - comments added --stygiania 21:34, 11 May 2007 (PDT)
- fixed but see the line spacing notes I made. Jkenny 03:22, 12 May 2007 (PDT)
- something got changed in latest version that needs fixing. QMacrocarpa 10:10, 12 May 2007 (PDT)
- fixed. Jkenny 10:26, 12 May 2007 (PDT) Ready for Lily 3
Lily3 cleared --stygiania 13:48, 12 May 2007 (PDT)
    • Reset fonts Jkenny 05:30, 22 May 2007 (PDT)