The English Hymnal - Wiki Music Experiment/037

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

%%% 037.png
%%% Hymn 6 Alternative Version 
%%% Version 1 Reset fonts

\version "2.10.19"


\header {
  dedication = \markup { \center-align { "THE CHRISTIAN YEAR - ADVENT"
		\hspace #0.1 }}	
  title = "6"
  subtitle = \markup { \column  {\smallCaps "Alternative Version" 
                \hspace #0.1 }}
  arranger =  \markup {  \small { \italic {"Harmonized by" } \smallCaps { "T. Ravenscroft," } \italic {"in his Psalter." } } }     
  tagline =""
}

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

halfmeasure =  \set Score.measurePosition = #(ly:make-moment 2 2)

soprano = \relative c' {
 \halfmeasure g'1 | a2 fis2 g2 d'2 | c2 a2 b1 \bar "||" \halfmeasure b2\rest a2 | \break
 gis2 a2 c2 b2 | a1 \bar "||" b2\rest fis2 | g2 g2 g2 d'2 | \break
 c2 b4( c4) d1 \bar "||"  \new Voice = "enterlyrics" { \halfmeasure \voiceOne b2 a2 ~ | a4 g4 g1 fis2 | g1 \bar "||"}
}

alto = \relative c' {
  r2 d2 | e2 d2 d2. g4 | e2 fis2 g1 \bar "||" e1 | 
  e2 c4( d4) e2. d4 | cis1 \bar "||" d1 | d2 e2 d2. g4 |
  e2 e2 a,1 \bar "||" r2 f'2 \bar "||" d2 e2 d2. c4 | b1 \bar "||"
}

tenor = \relative c { \clef bass
  d'1 | c2 a2 b2 g2 | a2. a4 g1 \bar "||" c1 |
  b2 a2 a2 gis2 | a1 \bar "||" a1 | b2 c2 b2 g2 |
  a2 g2 fis1 \bar "||" d'1 | b2 c2 a2 a2 | g1 \bar "||" 
}

bass = \relative c { \clef bass
  g'1 | c,2 d2 g,2 b2 | c2 d2 g,1 \bar "||" a1 |
  e'2 f2 e2 e2 | a,1 \bar "||" d1 | g2 e2 g2 b,2 |
  c2 e2 d1 \bar "||" d1 | g2 c,2 d2 d2 | g,1 \bar "||"
}

people = \relative c' {
  d'1 \bar "|" c2 a2 b2 g2 \bar "|" a2. a4 g1 \bar "||" c1 \bar "|"
  b2 a2 a2 gis2 \bar "|" a1 \bar "||" a1 \bar "|" b2 c2 b2 g2 \bar "|"
  a2 g2 fis1 \bar "||" d'1 \bar "|" b2 c2 a2 a2 \bar "|" g1 \bar "||"
}


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

\paper {
  #(set-paper-size "a4")
  % annotate-spacing = ##t
  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 = people { \set Staff.instrumentName = \markup { \hcenter-in #16 {\center-align { \smallCaps "People's"  \smallCaps "Part." } } }
	                   \voiceOne \global \people } 
	
	\new Lyrics = "lyrics" {s1}		   
	
	\new PianoStaff  
	                  <<  
	    \set PianoStaff.instrumentName = \markup { \hcenter-in #14 {\center-align { \smallCaps "Choir"  \smallCaps "or" \smallCaps "Organ."  } } } 
	     \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 }
			            >> 
		              >>	      
    >>
    \context Lyrics = "lyrics" \lyricsto "enterlyrics" { \override LyricText #'font-size = #-1  "to en" -- "rich      .      ."  the hum -- ble poor. } 
>> 
\layout {       
	        indent = 2.5\cm
		\context { \Score \remove "Bar_number_engraver" }
	%	\context { \Score timing = ##f }                 
		        
		\context { \PianoStaff \remove "Span_bar_engraver" }
		\context { \Staff \remove "Time_signature_engraver" }
		\context { \Score \remove "Mark_engraver"  }
                \context { \Staff \consists "Mark_engraver"  }
	}
	
\midi { 
   \context {
       \Score 
       tempoWholesPerMinute = #(ly:make-moment 69 2)
            }
       }
	
}

\markup{ \hspace #8
  \override #'(line-width . 85)
  \justify{  \small { "      [" \italic { This version may be used in connexion with the other for verse 3, the people singing the
melody as usual.} "]" } } }

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


\markup { \hspace #8   %%add space as necc. to center the column
          \fill-line { 
	       \column { 
	  	     \line {  \small \italic {\hspace #44 "P. Doddridge, 1702-51."}}
	             \hspace #1  % adds vertical spacing between verses. More such lines more space.     
		     \column { %% stanza 1 column 
	                  \line { \hspace #2.2 \column { \lower #2.4 \fontsize #8 "H" }   %%Drop Cap goes here
				  \hspace #-1    %% adjust this if other letters are too far from Drop Cap
				  \column  { \raise #0.0 "ARK the glad sound! the Saviour comes,"  "  The Saviour promised long!"  } }          
	                  \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 {   
					   "Let every heart prepare a throne," 
					   "    And every voice a song."
			  		}}
			       
			           } %% finish stanza 1
		\hspace #1 
           		\line { "2  "
			   \column {	     
				"He comes the prisoners to release" 
				"    In Satan's bondage held;" 
				"The gates of brass before him burst," 
				"    The iron fetters yield." 
			}}
		\hspace #1 
           		\line { "3  "
			  \column {	     
				"He comes the broken heart to bind," 
				"    The bleeding soul to cure," 
				"And with the treasures of his grace" 
				"    To enrich the humble poor." 
			}}
	   	\hspace #1 
           		\line { "4. "
			  \column {	     
				  "Our glad hosannas, Prince of peace," 
				  "    Thy welcome shall proclaim," 
				  "And heaven's eternal arches ring" 
				  "    With thy belovèd name."
			}}
	  }}
	} % stanza 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 g'1 g1 \bar "||" }}
	\context Voice = "altos"    { \relative c' {  \clef treble \global \voiceTwo e1 d1 \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 c'1 b1 \bar "||" }}
	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  c1 g1 \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 69 2) }}  %%Amen midi       
       
}  

} %%book bracket

Lily3

We are trying out a new workflow where L3 grabs the code, compiles and checks. After clearance, L3 will name the files and upload to repository. This ensures that what is checked and cleared is exactly what is uploaded.

Notes

Notes by Jkenny 00:05, 17 May 2007 (PDT)

  • Included lyrics from Hymn 6 Bristol and also the Amen block, set midi to the same tempo.
  • Managed to insert the 2 spacer dots in the lyrics "rich . ." by wrapping dots and words within quote marks. Now, if we want extra spacer hyphens this might work also, by using fake hyphens with quote marks.

Reviewed by stygiania 13:02, 17 May 2007 (PDT)

  • I see/hear no problems. 2nd opinion?

Comment by QMacrocarpa 05:09, 18 May 2007 (PDT)

  • Seems just fine! I didn't notice any unusual fonts, so will risk clearing and uploading files. :)


Record of Work

    • Lily1 - done --stygiania 22:25, 11 May 2007 (PDT) midi
    • Lily2 - done by Jkenny 16:36, 16 May 2007 (PDT). Ready for L3
    • Lily3 - reviewed by stygiania 13:02, 17 May 2007 (PDT) Looks good. 2nd opinion?
- Agree! L3 Cleared and files uploaded. --QMacrocarpa 05:20, 18 May 2007 (PDT)
    • Reset fonts. Jkenny 05:24, 22 May 2007 (PDT)