The English Hymnal - Wiki Music Experiment/Hymns101-150/169

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.

\version "2.10.23"

\header {

  dedication = \markup { \center-align { "THE CHRISTIAN YEAR - PASSIONTIDE" \hspace #0.1 }}
  title = "101"

  poet = \markup {  \small \sans {"DER TAG BRICHT AN."}   \hspace #1 \roman {"(L. M.)"}}

  meter = \markup { \small { \italic {Slow and solemn } \fontsize #-5 \general-align #Y #DOWN \note #"4" #1 = 84 "(" \fontsize #-5 \general-align #Y #DOWN \note #"2" #1 = 42")." }  }

  arranger =  \markup { \small \italic "Melody probably by " \smallCaps "M. Vulpius, 1560-1616 ?" }

  tagline =""

}


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

soprano = \relative c' { e2 b'4 b \bar "|" c2 b \bar "|"  a4(e) g(fis) \bar "|"  e2. \bar "||" e4 \bar "|" \break
g e b' cis \bar "|"  d(b) d4 (cis) \bar "|" b2. \bar "||" b4 \bar "|" b ais b fis \bar "|" \break
a2 g \bar "|"  fis2. \bar "||"   b4 \bar "|" b a g e \bar "|" g2 fis \bar "|" \once \override NoteColumn #'force-hshift = #1 e1^\fermata \bar "||"  }

alto = \relative c' { g4(a) b fis' \bar "|" e2 g4(fis) \bar "|" e2 e4(dis) \bar "|" e2. \bar "||" c4 \bar "|" \break
b e fis e \bar "|" d (fis) fis2 \bar "|" dis2. \bar "||" g4 \bar "|" fis e dis d \bar "|" \break
e(dis) e2 \bar "|" fis2. \bar "||" g4 \bar "|" g fis8 e d4 e \bar "|" cis(e2) dis4 \bar "|" e1 \bar "||" }

tenor = \relative c { \clef bass e4(fis) g b \bar "|" g(a) b2 \bar "|"  c4(a) b2 \bar "|"  g2. \bar "||"  a4 \bar "|" \break
g g fis ais \bar "|" b2. ais4 \bar "|" b2. \bar "||" b4 \bar "|" b e, fis b \bar "|" \break
c2 b4(cis) \bar "|" dis2. \bar "||" d!4 \bar "|" d c d b \bar "|" cis2 fis, \bar "|" g1 \bar "||" }

bass = \relative c { \clef bass e2 e4 d \bar "|" c2 g \bar "|" a4(c) b2 \bar "|"  e2. \bar "||" a,4 \bar "|" \break
e'4 e d cis \bar "|" b(d) fis2 \bar "|" b,2. \bar "||" e4 \bar "|" d cis b b \bar "|" \break
a2 e' \bar "|" b2. \bar "||" g4 \bar "|" g a b g \bar "|" a2 b \bar "|" e1_\fermata \bar "||" }

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

\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"  }

	} %% close layout

%%%%%%%%%%%%%%%% Hymn Midi	

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

\markup { \hspace #18
\override #'(line-width . 85)
\justify { \smallCaps "Note.—" \small \italic { This hymn may also be sung to } \smallCaps "St. Crispin" "(No. 246)."}}

%% 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 e1 e  \bar "||" }}

	\context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo c1 b \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 \voiceThree a'1 gis \bar "||" }}

	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  a1 e' \bar "||" }}

			        >> 

  >>			      

\header { breakbefore = ##f piece = " " opus = " " }



\layout { 

      \context { \Score timing = ##f }

	ragged-right = ##t

	indent = 15\cm

	\context { \Staff \remove Time_signature_engraver }



       } %% close layout

%%%%%%%%%%%%%% Amen Midi

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

Lyrics copied from P3 and perl-formatted --QMacrocarpa 14:59, 2 June 2007 (PDT):

"MY God! my God! and can it be"
"    That I should sin so lightly now,"
"And think no more of evil thoughts"
"    Than of the wind that waves the bough?"
""
"I walk the earth with lightsome step,"
"    Smile at the sunshine, breathe the air,"
"Do my own will, nor ever heed"
"    Gethsemane and thy long prayer."
""
"Shall it be always thus, O Lord?"
"    Wilt thou not work this hour in me"
"The grace thy Passion merited,"
"    Hatred of self, and love of thee!"
""
"Ever when tempted, make me see,"
"    Beneath the olives' moon-pierced shade,"
"My God, alone, outstretched, and bruised,"
"    And bleeding, on the earth he made;"
""
"And make me feel it was my sin,"
"    As though no other sins there were,"
"That was to him who bears the world"
"    A load that he could scarcely bear."
""

Lily2 Code

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

%%% 169.png
%%% Hymn 101 Der Tag Bright An. My God! My God! and can it be
%%% Version 2

\version "2.10"

\header {
  dedication = \markup { \center-align { "THE CHRISTIAN YEAR - PASSIONTIDE" \hspace #0.1 }}
  title = "101"
  poet = \markup {  \small { \sans {"DER TAG BRICHT AN."}   \hspace #1 \roman {"(L. M.)"}} }
  meter = \markup { \small { \italic {Slow and solemn } \fontsize #-5 \general-align #Y #DOWN \note #"4" #1 = 84 "(" \fontsize #-5 \general-align #Y #DOWN \note #"2" #1 = 42")." }  }
  arranger =  \markup { \small { \italic "Melody probably by" \smallCaps "M. Vulpius, 1560-1616?" } }
  tagline =""
}

%%%%%%%%%%%%%%%%%%%%%Macros

%% Macro for generating two augmentation dots for a notehead. 
%% When dotted notes from two vocal parts share a single notehead, 
%% Lilypond only inserts a single dot. In the image, two dots are used. 
%% This macro generates the two dots by replacing the normal dot glyph 
%% with a new glyph comprising a column of 2 dots one above the other.
 
augdots = { 
 \once \override Voice.Dots #'stencil = #ly:text-interface::print 
 \once \override Voice.Dots #'text = \markup {  \hspace #0 \raise #1 
                                                \line { \translate #(cons -0.2 0) 
                                                \override #'(baseline-skip . 1 )  
                                                   \column { 
                                                     \musicglyph #"dots.dot" 
                                                     \musicglyph #"dots.dot" } } }
}

%%%%%%%%%%%%%%%%%%%%%End of macro definitions

%%% SATB voices

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

soprano = \relative c' { 
  e2 b'4 b | c2 b |  a4(e) g(fis) |  e2. \bar "||" e4 | \break
  g e b' cis |  d(b) d4 (cis) | b2. \bar "||" b4 | b ais b fis | \break
  a2 g |  fis2. \bar "||"   b4 | b a g e | g2 fis | e1^\fermata \bar "||"  
}

alto = \relative c' { 
  g4(a) b fis' | e2 g4(fis) | e2 e4(dis) | \augdots e2. \bar "||" c4 | \break
  b e fis e | d (fis) fis2 | dis2. \bar "||" g4 | fis e dis d | \break
  e(dis) e2 | fis2. \bar "||" g4 | g fis8 e d4 e | cis(e2) dis4 | \once \override NoteColumn #'force-hshift = #-0.02  e1 \bar "||" 
}

tenor = \relative c { \clef bass 
  e4(fis) g b | g(a) b2 |  c4(a) b2 |  g2. \bar "||"  a4 | \break
  g g fis ais | b2. ais4 | b2. \bar "||" b4 | b e, fis b | \break
  c2 b4(cis) | dis2. \bar "||" d!4 | d c d b | cis2 fis, | g1 \bar "||" 
}

bass = \relative c { \clef bass 
  e2 e4 d | c2 g | a4(c) b2 |  e2. \bar "||" a,4 | \break
  e'4 e d cis | b(d) fis2 | b,2. \bar "||" e4 | d cis b b | \break
  a2 e' | b2. \bar "||" g4 | g a b g | a2 b | e1_\fermata \bar "||" 
}

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

\book {

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

%%% Score block

\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"  }
	} %% close layout
	
%%% Hymn Midi	

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

} %%% Score bracket

%%% alternative tune text markup

\markup { \hspace #19  \smallCaps "Note" \hspace #-1.2 ".—" \italic "This hymn may also be sung to" \smallCaps "St. Crispin" \italic "(No. 246)."}

%%% Lyrics title markup

\markup { \line { \small { \hspace #66 \italic "F. W. Faber, 1814-63." } } }  

%%% Main lyric block markup  

\markup { \hspace #28 %%add space as necc. to center the column
	       \column { %%% everything goes into a super column with sub columns as necessary  
	              \column { %%% verse 1 is a column of 2 lines  
	                  \line { \hspace #2.2 \column { \lower #2.4 \fontsize #8 "M" }   %%Drop Cap goes here
				  \hspace #-1.2    %% adjust this if other letters are too far from Drop Cap
				  \column  { \raise #0.0 "Y God! my God! and can it be"  
			                                 "  That I should sin so lightly now," } }          
	                  \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 {   
					   "And think no more of evil thoughts"
					   "    Than of the wind that waves the bough?"
			  		}}
			       
			           } %%% finish verse 1	
			\hspace #1 % adds vertical spacing between verses  
			\line { "2  "
			\column {	     
				"I walk the earth with lightsome step,"
				"    Smile at the sunshine, breathe the air,"
				"Do my own will, nor ever heed"
				"    Gethsemane and thy long prayer."
			}}
         }  %%% end super column
} %%% end markup	 
	
%%% 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 #28   %%add space as necc. to center the column
          \column { 
           	\line { "3  "
		   \column {	     
			   "Shall it be always thus, O Lord?"
			   "    Wilt thou not work this hour in me"
			   "The grace thy Passion merited,"
			   "    Hatred of self, and love of thee!"
			}}
		  \hspace #1 % adds vertical spacing between verses  
		  \line { "4  "
		    \column {	     
			    "Ever when tempted, make me see,"
			    "    Beneath the olives' moon-pierced shade,"
			    "My God, alone, outstretched, and bruised,"
			    "    And bleeding, on the earth he made;"
			}}
		\hspace #1 % adds vertical spacing between verses  
           	\line {"5. "
		    \column {	     
			    "And make me feel it was my sin,"
			    "    As though no other sins there were,"
			    "That was to him who bears the world"
			    "    A load that he could scarcely bear."
		}}
	  }
} %%% lyric 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' { \clef treble \global \voiceOne e1 e  \bar "||" }}
	\context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo c1 b \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 \voiceThree a'1 gis \bar "||" }}
	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  a1 e' \bar "||" }}
			        >> 
  >>			      
\header { breakbefore = ##f piece = " " opus = " " }

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

       } %%% close layout

%%% Amen Midi

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

}  %%% close book bracket

Lily3 Notes

by ebykm 13:12, 14 June 2007, UTC

  • This is one hymn lily misbehaves. Please note lily won't display sharps unless we force - use !, (which i haven't), eg. cis!4) and sometimes automatically puts natural signs !!!!.
- second system, 2nd measure C sharp on soprano & A sharp on tenor - same system last measure, D sharp on alto & C sharp on bass are not displayed.
- last system, lily have put 3 natural signs - 1st measure, A natural - 4th measure D natural on alto & C natural on tenor.

Jkenny 07:53, 14 June 2007 (PDT)

  • The reason has to do with the fact that in the layout block, score timing has been set to false (turned off) with
 \context { \Score timing = ##f }
  • Because of this, Lilypond does not enforce the measure lengths indicated by the time signature. It thinks the whole piece of music is one long measure. When it meets an accidental, it assumes that the accidental is implied from then on to the end of the measure (the whole music), so it does not print anymore of the same accidental (unless forced with !).
  • I have turned timing on by commenting out the line (you can also remove the line). Now all the accidentals show up correctly.
  • In general it is a good idea to leave timing on whenever possible. In the case of unmetered or irregular music such as the plainsong pieces (and in the Amen blocks) we have no choice but to turn the timing off.
  • What about linebreaking? It behaves all right on my system, what about yours?

ebykm 17:33, 15 June 2007, UTC

  • the barlines (if | used in the score) aren't displayed unless i use \bar "|". But if i leave \context \remove whatever disabled, it would display barlines even the standard | (pipe symbol) is used. Isn't that strange ?.

Jkenny 17:44, 15 June 2007 (PDT)

  • The pipe symbol is a bar check symbol. When inserted, Lilypond does a bar timing check at that point, and if it is the end of a bar according to the timing given by the time signature, it inserts a barline. When it is not, it issues a barcheck fail warning.
  • In your original layout block, timing is set to false (turned off) so Lilypond does not know what the timing is and when a bar should end, so it cannot insert barlines by doing a bar check.
  • When you disable the "\context \remove whatever" (I assume you mean the lines in your layout block) you have disabled the command that sets timing to false, so timing has been turned on, so the pipe symbol can now work.
  • The code as I edited on L2 with the timing on does compile correctly in your system?

styg 08:37, 13 July 2007 (PDT)

  • 1st system, 4th bar, treble line e needs second augmentation dot.
  • I found no other problems.

Jkenny 09:32, 13 July 2007 (PDT)

  • Fixed augmentation dots.

Lily3 cleared, files uploaded styg 13:16, 14 July 2007 (PDT)


Project History

    • Lily1 - done by ebykm 13:17, 14 June 2007, UTC
- (lyrics added)
    • Lily2 - done Jkenny 07:54, 14 June 2007 (PDT) Accidental problem fixed.
    • Lily3 - comment added styg 08:37, 13 July 2007 (PDT)
- fixed. Jkenny 09:33, 13 July 2007 (PDT)
- Lily3 cleared, files uploaded styg 13:21, 14 July 2007 (PDT)