The English Hymnal - Wiki Music Experiment/060

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

%%%060-061.png
%%%Hymn 21 YORKSHIRE or STOCKPORT. Christians, awake, salute the happy morn.
%%%Version 2 060png-H21-v2.ly Fonts reset

\version "2.10"


\header {
  dedication = \markup { \center-align { "THE CHRISTIAN YEAR - CHRISTMAS"
		\hspace #0.1 }}	
  title = "21"
  poet = \markup { \small {  \line { \small \sans {"YORKSHIRE"} \sans \smallCaps "or" \small \sans {"STOCKPORT."} \hspace #1 \roman {"(10 10. 10 10. 10 10.)"}} }}
  meter = \markup { \small { \italic {In moderate time, dignified} \fontsize #-5 \general-align #Y #DOWN \note #"4" #1 = 100.} }
  arranger =  \markup { \small \smallCaps "J. Wainwright, 1723-68."}
  tagline =""
}


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

nbbar = { \bar "|" \noBreak } %%macro to generate a nobreak bar

soprano = \relative c' {
  c2 c4 d \nbbar e2. f4 \nbbar g e f g \nbbar a1 \bar "||" \noBreak g2 a4 b \bar "|" \break
  c d e d \nbbar c2 b \nbbar c1 \bar "||" \noBreak c2 e4 g, \nbbar a2. g4 \bar "|" \break
  a b c d \nbbar b1 \bar "||" \noBreak b2 c4 b \nbbar a gis! a b \bar "|" \break
  c2 b \nbbar a1 \bar "||" \noBreak a2 \override Accidental #'transparent = ##t g4 f \nbbar e2 c \nbbar f4 e d c \nbbar g'2. \bar "||" \break  
  \partial 4 g4 \nbbar a2 b \nbbar c4 d e d \nbbar c2 b \nbbar c1 \bar "||"
}

alto = \relative c' {
  c2 c4 b \nbbar c2. b4 \nbbar c c c c \nbbar c1 \bar "||" \noBreak c2 c4 f \bar "|" \break
  g f e f \nbbar e2 d \nbbar e1 \bar "||" \noBreak e2 e4 g \nbbar f2. c4 \bar "|" \break
  f f g f \nbbar d1 \bar "||" \noBreak e2 e4 gis \nbbar a e c f \bar "|" \break
  e2 e4( d) \nbbar c1 \bar "||" \noBreak c2 d4 b \nbbar c2 c \nbbar b4 c g c \nbbar b2. \bar "||" \break
  \partial 4 c4 \nbbar c2 f \nbbar g4 g g a \nbbar g2 g \nbbar g1 \bar "||"
}

tenor = \relative c { \clef bass
  e2 e4 g \nbbar g2. g4 \nbbar g g g g \nbbar f1 \bar "||" \noBreak g2 c4 d \bar "|" \break
  c b c a \nbbar g2 g \nbbar g1 \bar "||" \noBreak g2 c4 c \nbbar c2. c4 \bar "|" \break
  c d c a \nbbar g1 \bar "||" \noBreak gis2 a4 d \nbbar e b a a \bar "|" \break
  a2 gis! \nbbar a1 \bar "||" \noBreak e2 \once \override Accidental #'transparent = ##t g4 g \nbbar g2 g \nbbar g4 g g fis! \nbbar g2. \bar "||" \break
  \partial 4 g4 \nbbar \once \override Accidental #'transparent = ##t f2 f \nbbar c'4 b c f \nbbar e2 d \nbbar e1 \bar "||"
}

bass = \relative c { \clef bass
  c2 c4 g \nbbar c2. d4 \nbbar e c d e \nbbar \once \override NoteColumn #'force-hshift = #-0.05 f1 \bar "||" \noBreak e2 f4 d \bar "|" \break
  e d c f \nbbar g2 g, \nbbar c1 \bar "||" \noBreak c2 c4 e \nbbar f2. e4 \bar "|" \break
  f d e f \nbbar \once \override NoteColumn #'force-hshift = #-0.05 g1 \bar "||" \noBreak e2 a,4 b \nbbar c e f d \bar "|" \break
  e2 e \nbbar a,1 \bar "||" \noBreak a2 b4 g \nbbar c2 e \nbbar d4 c b a \nbbar g2. \bar "||" \break
  \partial 4 e'4 \nbbar \override Accidental #'transparent = ##t f2 d \nbbar e4 g c f, \nbbar g2 g, \nbbar c1 \bar "||"
}

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

\paper {
  #(set-paper-size "a4")
  top-margin = 3\mm
  bottom-margin = 5\mm
  print-page-number = ##f
  between-system-space = #0.1
  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 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
	
\midi { 
   \context {
       \Score 
       tempoWholesPerMinute = #(ly:make-moment 100 4)
            } %% close context
       } %% close midi
	
} %%score bracket

\markup { \hspace #4   %%add space as necc. to center the column
          \column { %% super column of everything
	    \hspace #0.2
	  \line { \hspace #70 \small \italic {"John Byrom, 1690-1763."}}
	  \hspace #0.4          
          \column {
		  \line { \hspace #25 \column { \lower #2.4 \fontsize #8 "C" }   %%Drop Cap goes here
			 \hspace #-1.0    %% adjust this if other letters are too far from Drop Cap
			\column  { \raise #0.0 "HRISTIANS, awake, salute the happy morn," "Whereon the Saviour of the world was born;" } }          
	          \line { \hspace #25  %%adjust hspace until this line left edge is flush with Drop Cap
			\lower  #1.56  %%adjust this until the line spacing looks right
			\column {   
				"Rise to adore the mystery of love,"
				"Which hosts of Angels chanted from above;"
				"With them the joyful tidings first begun"
				"Of God incarnate and the Virgin's Son:"
			  		}}
	           } %% finish stanza 1

	   \hspace #0.4 % adds vertical spacing between verses
           \line { \hspace #22 "2  "
             \column {	   
				"Then to the watchful shepherds it was told,"
				"Who heard the angelic herald's voice, 'Behold,"
				"I bring good tidings of a Saviour's birth"
				"To you and all the nations upon earth;"
				"This day hath God fulfilled his promised word,"
				"This day is born a Saviour, Christ the Lord.'" 
			   }} %% finish stanza 2

	   \hspace #0.4 % adds vertical spacing between verses
           \line { \hspace #12.5 \italic "Unison." "  3  "
             \column {	     
				"He spake; and straightway the celestial choir"
				"In hymns of joy, unknown before, conspire."
				"The praises of redeeming love they sang,"
				"And heaven's whole orb with Alleluyas rang:"
				"God's highest glory was their anthem still,"
				"Peace upon earth, and mutual goodwill."	   
	  		   }} %% finish stanza 3

	   \hspace #0.4 % adds vertical spacing between verses
           \line { \hspace #22 "4  "
             \column {    
				"To Bethlehem straight the enlightened shepherds ran,"
				"To see the wonder God had wrought for man,"
				"And found, with Joseph and the blessèd Maid,"
				"Her Son, the Saviour, in a manger laid;"
				"Amazed the wondrous story they proclaim,"
				"The first apostles of his infant fame."
 	  		   }} %% finish stanza 4

	   \hspace #0.4 % adds vertical spacing between verses
           \line { \hspace #22 "5. "
             \column {    
				"* Like Mary let us ponder in our mind"
				"God's wondrous love in saving lost mankind;"
				"Trace we the Babe, who hath retrieved our loss,"
				"From his poor manger to his bitter cross;"
				"Then may we hope, angelic thrones among,"
				"To sing, redeemed, a glad triumphal song."
			   }} %% finish stanza 5	
           
    } %% 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' { \clef treble \global \voiceOne f1 e1 \bar "||" }}
	\context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo c1 c1 \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 g1 \bar "||" }}
	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  f1 c1 \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

\midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 100 4) }}  %%Amen midi 
       }  %% close midi	


} %% close book

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

Version 2

pdf

midi

amen

Notes

Comments added--QMacrocarpa 17:11, 12 May 2007 (PDT):

  • About the two spots with overlapping whole notes in original (in the measures before the 1st and 3rd double-bars)-- Jack's found a way to represent this with Lily. See 045 for example. He said it wasn't hard to do. fixed stygiania 18:37, 12 May 2007 (PDT)
  • 4th system, 1st measure: 1/4-notes in alto should be joined by slur. fixed stygiania 18:37, 12 May 2007 (PDT)
  • In lyrics:
- verse 1, line 2: "Savior" should be "Saviour" fixed stygiania 18:37, 12 May 2007 (PDT)
- verse 2, line 3: "Savior's" should be "Saviour's" fixed stygiania 18:37, 12 May 2007 (PDT)
- verse 4, line 3: "blessed" should be "blessèd" (I think-- mark is faint in scan, but extra syllable needed to match line 3 of other verses). fixed stygiania 19:46, 12 May 2007 (PDT) NOTE: I agree there should be an accent there although P3 didn't include it.
  • Reset fonts Jkenny 19:50, 22 May 2007 (PDT)