The English Hymnal - Wiki Music Experiment/379

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 to the 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.



Lily2 Code

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

%%%379.png

%%%Hymn 241 Thee, O Christ, the Father's splendour

%%%Rev 1



\version "2.10.23"



\header {



  dedication = \markup { \center-align { "ST. MICHAEL AND ALL ANGELS"

                 	\hspace #0.1 }}	



  title = \markup { "241" \large \smallCaps "(Modern Tune)" }
  poet = \markup { \small {  \line { \sans {"NEANDER."} \hspace #1 \roman {"(8 7. 8 7. 8 7.)"}} }}

  meter = \markup { \small { \italic {Moderately slow, dignified} \fontsize #-5 \general-align #Y #DOWN \note #"2" #1 = 66.} }

  arranger = \markup { \small {\center-align {\italic "From Chorale 'Unser Herrscher'" \line {\italic "by" \smallCaps "J. Neander" ", 1640-80." } } } }

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



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






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



%%% SATB voices



global = {



\time 4/2

\key c \major

\set Staff.midiInstrument = "church organ"

}



soprano = \relative c' {  \fdstartrepeat c2. d4 e2 c e2 f g g c2 b4(a) g2 e' d2 d c1 \breathmark \fdendrepeat \break
e2. e4 d2 d c2. c4 b2 b a2. a4 g2 c d2 b c1^\fermata \bar "||" }



alto = \relative c' { \fdstartrepeat c2. b4 c2 c c2 c d d c2 d e g a2 g e1 \fdendrepeat \break
g2. g4 g2 g e2. e4 e2 e c2 b c e d2 d e1 \bar "||" }



tenor = \relative c { \clef bass \fdstartrepeat e2. g4 g2 g a2 c c b a2 b c c c2 b c1 \fdendrepeat \break
c2. c4 c2 b a2. a4 a2 gis a2 f g a a2 g g1  \bar "||" }



bass = \relative c {\clef bass  \fdstartrepeat c2. g4 c2 e a2 a g g a2 g4(f) e2 c f2 g c,1 \fdendrepeat \break
c2 e4(f) g2 g \once \override NoteColumn #'force-hshift = #'0.3 a2 c,4 (d) e2 e f2 d e a f2 g c,1_\fermata \bar "||"  }



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



%%% 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 \remove "Bar_number_engraver" }

	\context { \Staff \remove "Time_signature_engraver" }

	\context { \Score \remove "Mark_engraver"  }

        \context { \Staff \consists "Mark_engraver"  }



	}



%%% Hymn midi



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



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

       }


%%Amen midi

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

}%%Amen score





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:

Links to L2 output version 1: