The English Hymnal - Wiki Music Experiment/373

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

%%%373.png

%%%Hymn 238 Modern Tune.

%%%Rev 1



\version "2.10.23"



\header {



  dedication = \markup { \center-align { "THE HOLY NAME"

                 	\hspace #0.1 }}	



  title = \markup {"238 " \large \smallCaps "(Modern Tune)"}
  poet = \markup { \small {  \line { \sans {"JESU DULCIS MEMORIA."} \hspace #1 \roman {"(L. M.)"}} }}

  meter = \markup { \small { \italic {In moderate time} \fontsize #-5 \general-align #Y #DOWN \note #"2" #1 = 76.} }

  arranger = \markup { \small {\center-align {\italic "Proper melody from" \line {\italic "Cöln Gesangbuch" ", 1619." } } } }

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

}



%% Used to pull a note left. 

movenote = \once \override NoteColumn #'force-hshift = #'-0.1



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



%%% SATB voices



global = {



\time 4/2

\key bes \major

\set Staff.midiInstrument = "church organ"

}



soprano = \relative c' { g'2 f4 g4 a2 a2 bes2 a4(g) a1 g2 f!4 g4 a2 f2 g2 f4(e4) d1 \breathmark \bar "||" \break
g2 f4 g4 a2 a2 bes2 a4(g4) a1 d2 d4 c4 d2. c4 bes2 a2 g1 \bar "||" \break   }



alto = \relative c' { d2 d4 d4 f2 f2 f2 f4 (g4) fis1 d2 d4 d4 d2 d2 d2 cis2 \movenote d1 \bar "||" \break
d2 d4 d4 f2 f2 f2 f4(g4) d1 d2 f4 f4 f2. ees4 d2 d2 bes1 \bar "||" \break  }



tenor = \relative c { \clef bass bes'2 a4 bes4 c2 c2 d2 c4(g4) d'1 bes2 a4 bes4 a2 a2 bes2 a4(g4) fis1 \bar "||" \break
g2 a4 bes4 c2 c2 d2 c4(g4) fis1 f!2 bes4 a4 bes2. g4 g2 fis2 g1 \bar "||" \break   }



bass = \relative c {\clef bass g'2 d4 g4 f2 f2 bes,2 f'4(ees4) d1 g2 d4 g4 f2 d2 g,2 a2 d1 \bar "||" \break
bes2 d4 g4 f2 f2 bes,2 f'4(ees4) d1 bes2 bes4 f'4 bes,2. c4 d2 d2 g,1 \bar "||" \break  }



#(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 76 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 g'1 g1 \bar "||" }}

	\context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo c1 b1 \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 ees1 d1 \bar "||" }}

	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  c1 g1 \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 76 2) }}  %%Amen midi 

}%%Amen score

Lily2 Notes

Ebykm 03:06, 12 October 2009 (PDT)

• I'm not sure whether it is "ö" or "o" in Coln Gesangbuch. The scans show a possible "ö".