The English Hymnal - Wiki Music Experiment/089

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.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% The English Hymnal, 089.png
%%% Format=ABC
%%% Original doesn't show meter.
%%% 

X: 4
T: INNOCENTS. (7 7. 7 7.)
C: Composed or adapted by J. Smith, 1800-73.
M: 4/4
L: 1/4
Q: 1/4=100
K: D
V:1 staves=4
%%MIDI transpose 0
F3/2 G/2 | A d c B | A2 || D3/2 E/2 | F A G F | E2 ||
F3/2 G/2 | A d c B | A2 || D3/2 E/2 | F G F E | D2 ||
%
V:2
%%MIDI transpose 0
D3/2 C/2 | D F E D/2E/2 | F2 || A,3/2 C/2 | D E D D | C2 ||
D3/2 C/2 | D F E3/2 D/2 | C2 || D3/2 C/2 | D E D C | D2 ||
%
V:3 clef=bass
%%MIDI transpose -12
a3/2 g/2 | f a g/2a/2 b/2c'/2 | d'2 || f3/2 g/2 | a c' b a | a2 ||
a3/2 g/2 | f f a ^g | a2 || a3/2 g/2 | a b a a | f2 ||
%
V:4 clef=bass
%%MIDI transpose -12
d3/2 e/2 | f d e/2f/2 g | d2 || f3/2 e/2 | d A B d | A2 ||
d3/2 e/2 | f B c/2d/2 e | (a =g) || f3/2 e/2 | d G A A | d2 ||
%
W:    Victis sibi cognomina.
%
W: 
%
W:    Conquering kings their titles take
%
W:    From the lands they captive make:
%
W:    Jesu, thine was given thee
%
W:    For a world thou madest free.
%
W: 
%
W: 2  Not another name is given
%
W:    Power possessing under heaven,
%
W:    Strong to call dead souls to rise
%
W:    And exalt them to the skies.
%
W: 
%
W: 3  That which Christ so hardly wrought,
%
W:    That which he so dearly bought,
%
W:    That salvation, mortals, say,
%
W:    Will ye madly cast away?
%
W: 
%
W: 4  Rather gladly for that name
%
W:    Bear the Cross, endure the shame;
%
W:    Joyfully for him to die
%
W:    Is not death but victory.
%
W: 
%
W: 5  Jesu, if thou condescend
%
W:    To be called the sinner's Friend,
%
W:    Ours the joy and glory be
%
W:    Thus to make our boast of thee.
%
W: 
%
W: 6. Glory to the Father be,
%
W:    Glory, Virgin-born, to thee,
%
W:    Glory to the Holy Ghost,
%
W:    Ever from the heavenly host. Amen.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%% The English Hymnal, 089.png
%%% Format=ABC
%%% Amen only.

X: 5
T: 
C: 
M: 4/2
L: 1/2
Q:
K: D 
V:1 staves=4
%%MIDI transpose 0
D2 D2 ||
%
V:2
%%MIDI transpose 0
B,2 A,2 ||
w: A-men.
%
V:3 clef=bass
%%MIDI transpose -12
g2 f2 ||
%
V:4 clef=bass
%%MIDI transpose -12
G2 d2 ||

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

%%%089.png
%%%Hymn 37 Innocents. Conquering kings their titles take.
%%%Version 3  089png-H37-v3.ly  Reset fonts

\version "2.10"


%% 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 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


\header {
  dedication = \markup { \center-align { "THE CHRISTIAN YEAR - THE CIRCUMCISION OF CHRIST"
		\hspace #0.1 }}	
  title = "37"
  meter = \markup { \small { \column {  \line { \sans {"INNOCENTS."} \hspace #1 \roman {"(7 7. 7 7.)"}}
                               \line { \italic {Moderately fast} \fontsize #-5 \general-align #Y #DOWN \note #"4" #1 = 100.}}}}   
  arranger =  \markup { \small { \center-align {
		            \line{ \italic {"Composed or adapted by" } }
			    \line { \smallCaps { "J. Smith, 1800-73."}}}}}
  tagline =""
}

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


soprano = \relative c' { 
  fis4. g8 \bar "|" a4 d4 cis4 b4 \bar "|" a2 \bar "||" \noBreak
  d,4. e8 \bar "|" fis4 a4 g4 fis4 \bar "|" e2 \bar "||" \break
  fis4. g8 \bar "|" a4 d4 cis4 b4 \bar "|"  a2 \bar "||" \noBreak
  d,4. \augdots e8 \bar "|" fis4 g4 fis4 e4 \bar "|" d2 \bar "||" 
}

alto = \relative c' { 
  d4. cis8 \bar "|" d4 fis4 e4 d8 e8 \bar "|" fis2 \bar "||" 
  a,4. cis8 \bar "|" d4 e4 d4 d4 \bar "|" cis2 \bar "||" \break
  d4. cis8 \bar "|" d4 fis4 e4. d8 \bar "|"  cis2 \bar "||" 
  \augdots d4.  cis8 \bar "|" d4 e4 d4 cis4 \bar "|" d2 \bar "||" 
}

tenor = \relative c { \clef bass 
  a'4. g8 \bar "|" fis4 a4 g8[ a8] b8[ cis8] \bar "|" d2 \bar "||" 
  fis,4. g8 \bar "|" a4 cis4 b4 a4 \bar "|" a2 \bar "||" \break
  a4. g8 \bar "|" fis4 fis4 a4 gis4 \bar "|" a2 \bar "||" 
  a4. g8 \bar "|" a4 b4 a4 a4 \bar "|" fis2 \bar "||" 
}

bass = \relative c { \clef bass 
  d4. e8 \bar "|" fis4 d4 e8 fis8 g4 \bar "|" d2 \bar "||" 
  \augdots fis4. e8 \bar "|" d4 a4 b4 d4 \bar "|" a2 \bar "||" \break
  d4. e8 \bar "|" fis4 b,4 cis8 d8 e4 \bar "|"  \once \override NoteColumn #'force-hshift = #-1.7 a4 ( g!4 ) \bar "||" 
  fis4. e8 \bar "|" d4 g,4 a4 a4 \bar "|" d2 \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 { \voiceThree \global \tenor }
	\context Voice = basses { \voiceFour \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 100 4)
            }
       }
	
} %%score bracket


\markup { \hspace #4   %%add space as necc. to center the column
          \column { %% super column of everything
	    \hspace #0.2
	    \line { \small { \hspace #66  \italic {"c. 1736. Tr. J. Chandler"} "‡."} }
	    \line { \hspace #38 \small {"Victis sibi cognomina."}}
	    \line { %% a master line of 3 columns
              \column { %% column 1
	      \hspace #0.2 % adds vertical spacing between verses
	        \column { %%stanza 1 is a column of 2 lines  
	          \line { \hspace #2.2 \column { \lower #2.4 \fontsize #8 "C" }   %%Drop Cap goes here
			 \hspace #-1.2    %% adjust this if other letters are too far from Drop Cap
			\column  { \raise #0.0 "ONQUERING kings their titles take" "  From the lands they captive make:" } }          
	          \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 {   
				"Jesu, thine was given thee" 
				"For a world thou madest free." 
			  		}}
	          } %% finish stanza 1
		  
	         \hspace #0.2 % adds vertical spacing between verses
                 \line { "2  "
                    \column {	     
		     "Not another name is given" 
		     "Power possessing under heaven," 
		     "Strong to call dead souls to rise" 
	   	     "And exalt them to the skies." 	   
	         }}
	   
	         \hspace #0.2 % adds vertical spacing between verses
                 \line { "3  "
                   \column {	     
		     "That which Christ so hardly wrought," 
		     "That which he so dearly bought," 
		     "That salvation, mortals, say," 
	   	     "Will ye madly cast away?" 	   
	         }}
	}  %% finish Page column 1
		
	\hspace #4 %%adds horizontal space columns 1 and 2   
			   
	\column { \filled-box #'(0.0 . 0.1) #'( -40 . -1) #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.0 % adds vertical spacing between verses
           \line { "4  "
             \column {    
		     "Rather gladly for that name" 
		     "Bear the Cross, endure the shame;" 
		     "Joyfully for him to die" 
	   	     "Is not death but victory."
 	   }}  %}
	   
	   \hspace #0.2 % adds vertical spacing between verses
	   \line { "5  "
             \column { 
		     "Jesu, if thou condescend" 
		     "To be called the sinner's Friend," 
		     "Ours the joy and glory be" 
		     "Thus to make our boast of thee." 		     
	   }}
	   
	   \hspace #0.2 % adds vertical spacing between verses
           \line { "6. "
             \column {    
		    "Glory to the Father be," 
		    "Glory, Virgin-born, to thee," 
		    "Glory to the Holy Ghost," 
		    "Ever from the heavenly host.     Amen."
	   }}   
	  } %% end column 3
	  } %% master line bracket
	  \hspace #0.2
	  \line { \hspace #28 \small \italic "For the New-Year's Day hymns, see 285-6."}
          } %% 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 d1 d1 \bar "||" }}
	\context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo b1 a1 \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 fis1 \bar "||" }}
	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  g1 d'1 \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 100 4) }}  %%Amen midi 

} 	
	

} %% book bracket

Lily3

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

pdf

midi

amen midi

Version 2:

pdf

midi

amen midi


Version 3:

pdf

midi

amen midi

Notes

jkenny's notes (Lily2)

  • Most conventions inputted - drop cap etc.
  • Left system-start bar in as my impression is this is what Dani decided.
  • Double dagger next to name Chandler - is it in bold?

QMacrocarpa's notes

  • In header: "Composed of adapted by" should be "Composed or adapted by"
  • Looks like more spaces in hymn meter to me: (7 7. 7 7.) rather than (77. 77.)
  • Double dagger-- I doubt should be bold. Possibly should be italic (even though not in original)?
  • First note after penultimate double-bar in upper staff: In another piece where a shared note was given two dots in original (Newbury?), I believe both dots were included in PDF version (unlike here). I don't care one way or the other, but we should standardize.
- I was wrong about this. I don't think the double-dot maneuver has yet been successfully executed. Perhaps we can decide not necessary? --Q
  • Period missing after "For the New Year's Day hymns, see 285-6" at end.
  • Somewhat surprised won't fit on one page. Would approve of putting lyrics in columns if would allow to fit on one page (and not too much hassle). Could have a bit less space between music and lyrics.
  • No breath marks in original-- what are they playing at?!

jkenny's notes

  • developed a double dot tweak and used it here.
  • tried arrangement in two columns
  • other problems fixed

stygiania's notes:

  • This now has bar lines as if in 2/4 instead of 4/4.
  • Needs period after double-dagger.
-shows how unforgiving Lilypond can be! A small error in 1 line. Both fixed.
-also look at 2nd system 3rd measure bass part. Moved the 1st 1/4 note so that the slurred bass notes seem to straddle the tenor 1/2 note, just like the image. Does it look better this way? Jkenny 10:59, 10 May 2007 (PDT)
Very nice! --stygiania 11:16, 10 May 2007 (PDT)

Lily3 Cleared --stygiania 11:17, 10 May 2007 (PDT)

Record of Work

    • Lily1 - done by QMacrocarpa (ABC). Let me know if lyrics import usefully.
    • Lily2 - done by jkenny. Drop caps and all. Someone please do Lily3 on it?
    • Lily3 - notes added by QMacrocarpa.
-did the double dots, lyrics presented in 2 columns (unlike image). Jkenny 23:35, 9 May 2007 (PDT)
- notes added by --stygiania 09:56, 10 May 2007 (PDT).
- fixed. Jkenny 11:03, 10 May 2007 (PDT) Ready for Final Lily3 clearance.
Lily3 Cleared --stygiania 11:17, 10 May 2007 (PDT)
    • Reset fonts Jkenny 21:49, 22 May 2007 (PDT)