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

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.


Lyrics copied from P3 and perl-formatted --QMacrocarpa 09:16, 28 June 2007 (PDT):

"THOU hallowed chosen morn of praise,"
"    That best and greatest shinest:"
"Lady and queen and day of days,"
"    Of things divine, divinest!"
"On thee our praises Christ adore"
"For ever and for evermore."
""
"Come, let us taste the Vine's new fruit,"
"    For heavenly joy preparing;"
"To-day the branches with the Root"
"    In Resurrection sharing:"
"Whom as true God our hymns adore"
"For ever and for evermore."
""
"Rise, Sion, rise! and looking forth,"
"    Behold thy children round thee!"
"From east and west, from south and north,"
"    Thy scattered sons have found thee;"
"And in thy bosom Christ adore"
"For ever and for overmore."
""
"O Father, O co-equal Son,"
"    O co-eternal Spirit,"
"In persons Three, in substance One,"
"    And One in power and merit;"
"In thee baptized, we thee adore"
"For ever and for evermore. Amen."
""

Lily2 Code

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

%%%% 225.png
%%%% Hymn 138 Alternative Tune. Dies ist der tag.  Thou hallowed chosen morn of praise
%%%% Rev 4.

\version "2.10"

\header {

  dedication = \markup { \center-align { "THE CHRISTIAN YEAR - EASTERTIDE"

        \hspace #0.1 }} 

  title = \markup { "138" \large \smallCaps "(Alternative Tune)" }

  meter = \markup { \small {\column {  \line { \sans {"DIES IST DER TAG."} \hspace #1 \roman {"(8 7. 8 7. 8 8.)" }}
                                       \line { \italic {In moderate time} \general-align #Y #DOWN \note #"4" #0.5 = 120.}
                                  }
                  }}
 
  arranger =  \markup { \small {\center-align {
                            \line { \italic "Melody by " \smallCaps "P. Sohren," \italic "c. 1676." }
                            \line { "(" \hspace #-1 \italic "rhythm slightly adapted" \hspace #-1 ")." }
                } } }

  tagline =""

}

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

%%% generates the breathmarks
breathmark = { \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
	\override Score.RehearsalMark #'Y-offset = #'4.0
	\override Score.RehearsalMark #'X-offset = #'-0.5
	\mark \markup {\fontsize #4 ","}
}


%%% prints a repeat sign glyph comprising 4 dots. Used only to begin a repeat at the start of a piece where \bar ":" does not work      
fdstartrepeat =  {\once \override Staff.BarLine #'stencil = #ly:text-interface::print 
                  \once \override Staff.BarLine #'text = \markup  { \line { \hspace #0 \override #'(baseline-skip . 1.0) 
                                                                    \raise #1.4 \column { \with-color #black { 
                                                                    \fontsize #2 . \fontsize #2 . \fontsize #2 . \fontsize #2 .} }
                  } }   
                 \bar "|:"}
                 
%%% prints a repeat sign glyph comprising 4 dots and two thin bars
fdendrepeat = {\once \override Staff.BarLine #'stencil = #ly:text-interface::print 
                \once \override Staff.BarLine #'text = \markup  {  \line { \raise #1.4 \override #'(baseline-skip . 1.0)  \column { \with-color #black {  \fontsize #2 . \fontsize #2 . \fontsize #2 . \fontsize #2 .} }
                                                                   \hspace #-1 \filled-box #'(0 . 0.15) #'(-2 . 2) #0
                                                                   \hspace #-0.9 \filled-box #'(0 . 0.15) #'(-2 . 2) #0
        } }     
        \bar "||"} 


              
%%%%%%%%%%%%%%%%%%%%%%%%% end of macro definitions

%%% SATB voices

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

soprano = \relative c' { 
  \tag #'repeatpart { \fdstartrepeat \partial 4 bes'4 | bes2 f4 bes2 d4 | c2 c4 bes2 \breathmark \bar "||" c4 | \break
  c2 a4 bes2 a4 | g2. f2.^\fermata \fdendrepeat } \tag #'remainder { g4 g g g2 bes4 | \break
  a8([ g fis g]) a4 g2. \bar "||" bes4 bes c d2 d4 | c8([ bes a g]) a4 bes2. ^\fermata \bar "||" }
}

alto = \relative c' { 
  \tag #'repeatpart { \fdstartrepeat f4 | f2 f4 d2 f4 | g2 f4 d2 \bar "||" f4 | \break
  g2 f4 f2 f4 | f2( e4) f2. \fdendrepeat } \tag #'remainder { bes,4 bes ees d2 g4 | \break
  ees4( c) c bes2. \bar "||" g'4 f a bes2 bes4 | g4( ees) ees d2. \bar "||" }
}

tenor = \relative c { \clef bass
  \tag #'repeatpart { \fdstartrepeat d'4 | d2 c4 bes2 bes4 | bes2 a4 bes2 \bar "||" a4 | \break
  c2 c4 d2 d4 | g,2. a2. \fdendrepeat } \tag #'remainder { g4 g g g2 d'4 | \break
  a2 fis4 g2. \bar "||" g4 bes ees d2 f4 | c2 c4 bes2. \bar "||" }
}

bass = \relative c { \clef bass
  \tag #'repeatpart { \fdstartrepeat bes'4 | bes2 a4 g2 d4 | ees2 f4 bes,2 \bar "||" f'4 | \break
  e2 f4 g,4.( a8) bes4 | c2. f2. _\fermata \fdendrepeat } \tag #'remainder { ees4 d c bes2 g4 | \break
  c4( ees) d g2. \bar "||" ees4 d c bes2 d4 | ees4( c) f bes,2. _\fermata \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"  }
        } %% close layout

} %%% end score bracket

%%% A separate score block to unfold repeats and generate Hymn Midi     

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

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

} %%% end Hymn midi Score 


%%% Lyric attribution

\markup { \hspace #78 \small { \center-align { \line { \italic "St. John Damascene, c. 750." }  
                                               \line {\italic "Tr. J. M. Neale." }
}}}


\markup { \hspace #40 \small { "Αὔτη ἡ κλητή." "[Autê hê klêtê.]" }}

%%% Main lyrics markup block
  
\markup { \hspace #32 %%add space as necc. to center the column
                      \column { %%% verse 1 is a column of 2 lines  
                          \line { \hspace #2.2 \column { \lower #2.4 \fontsize #8 "T" }   %%Drop Cap goes here
                                  \hspace #-1.0    %% adjust this if other letters are too far from Drop Cap
                                  \column  { \raise #0.0 "HOU hallowed chosen morn of praise,"
                                                         "  That best and greatest shinest:" } }          
                          \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 {   
					   "Lady and queen and day of days,"
					   "    Of things divine, divinest!"
					   "On thee our praises Christ adore"
					   "For ever and for evermore."
                                        }}

	      }	%%% 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 #32   %%add space as necc. to center the column
          \column { 
		\hspace #1 
                \line { "2  "
                           \column {         
				   "Come, let us taste the Vine's new fruit,"
				   "    For heavenly joy preparing;"
				   "To-day the branches with the Root"
				   "    In Resurrection sharing:"
				   "Whom as true God our hymns adore"
				   "For ever and for evermore."
				   "      " %%% add vertical spacing between verses
                        }}
                  \line { "3  "
                    \column {        
			    "Rise, Sion, rise! and looking forth,"
			    "    Behold thy children round thee!"
			    "From east and west, from south and north,"
			    "    Thy scattered sons have found thee;"
			    "And in thy bosom Christ adore"
			    "For ever and for evermore."
			    "      " %%% add vertical spacing between verses
                        }}
                \line {"4. "
                    \column {        
			    "O Father, O co-equal Son,"
			    "    O co-eternal Spirit,"
			    "In persons Three, in substance One,"
			    "    And One in power and merit;"
			    "In thee baptized, we thee adore"
			    "For ever and for evermore.     Amen."
                }}
          }
} %%% 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 bes'1 bes  \bar "||" }}
        \context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo ees1 d \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 g'1 f \bar "||" }}
        \context Voice = "basses" { \relative c { \clef bass \global \voiceFour  ees1 bes \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 120 4) }} 
}

} %%% 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: 225.png

Links to L2 output version 1:

L2-138alt-v1.pdf L2-138alt-v1.midi L2-138alt-v1-amen.midi

Links to L2 output version 2:

L2-138alt-v2.pdf L2-138alt-v2.midi L2-138alt-v2-amen.midi

Links to L2 output version 3:

L2-138alt-v3.pdf L2-138alt-v3.midi L2-138alt-v3-amen.midi

Links to L2 output version 4:

L2-138alt-v4.pdf L2-138alt-v4.midi L2-138alt-v4-amen.midi


Note by L3 KenJ 20:59, 22 August 2007 (PDT)

  • Composer: Insert period after P (Melody by).
  • Lyrics, verse 3, last word: replace "overmore" with "evermore". (same as in last hymn.)


Note by Jkenny 00:38, 23 August 2007 (PDT)

  • Fixed composer name
  • Fixed "overmore" - errata page updated.
  • V2 up.


Note by KenJ 12:01, 23 August 2007 (PDT)

  • After composer name: change small-cap c to lower-case italic c. It's an abbreviation for circa which belongs with the date, which belongs with the italicised phrase before the Compose Name. That probably means the date should be italicised, too, with just the Composer Name OUT of italics. (I guess things look a little different today than when I looked the first time.)


Notes by Jkenny 17:38, 23 August 2007 (PDT)

  • Done. I wasn't sure about this. Now however, we can consider it to be a whole sentence in italics, with the composer name upright in a kind of reverse emphasis. Thanks.
  • V3 up.


Note by KenJ 21:23, 23 August 2007 (PDT)

  • That's what I was thinking. Perhaps we should then correct the apparent typo (missing period at the end). It seems to be a little out-of-place without it.


Notes by Jkenny 21:34, 23 August 2007 (PDT)

  • Done.
  • V4 up.


Note by KenJ 22:58, 23 August 2007 (PDT)

  • Beautiful. I'm afraid to look at this hymn again, lest I spot yet another missed error.
  • Clear.


V4 uploaded to repository.


Project History

    • Lily1 - (lyrics added)
    • Lily2 - done. Jkenny 07:33, 27 July 2007 (PDT)
    • Lily3 - notes by L3 KenJ 21:00, 22 August 2007 (PDT)
- fixed. Jkenny 00:51, 23 August 2007 (PDT)
- note. KenJ 12:07, 23 August 2007 (PDT)
- fixed. Jkenny 17:41, 23 August 2007 (PDT)
- one last note KenJ 21:24, 23 August 2007 (PDT)
- fixed. Jkenny 21:40, 23 August 2007 (PDT)
- clear. KenJ 23:11, 23 August 2007 (PDT)
- L3 cleared and uploaded. Jkenny 00:32, 24 August 2007 (PDT)

Notes for PPer

  • Added period after date in composer line.