The English Hymnal - Wiki Music Experiment/382

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

%%%382.png

%%%Hymn 243 Around the throne of God a band

%%%Rev 1



\version "2.10.23"



\header {



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

                 	\hspace #0.1 }}	



  title = "243"
  poet = \markup { \small {  \line { \sans {"SOLOTHURN."} \hspace #1 \roman {"(L. M.)"}} }}

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

  arranger = \markup { \small \italic "Swiss Traditional Melody." }

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

}



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




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



%%% SATB voices



global = {



\time 4/4

\key ees \major

\set Staff.midiInstrument = "church organ"

}

unison = \relative c' { \partial 4 ees4^\markup { \small \italic "Voices in unison." } \bar "|" ees4 f g ees \bar "|" bes'2 f \bar "|" ees2. \bar "||" \stemDown bes'4 \bar "|" bes4 c d bes \bar "|" ees2 c \bar "|" bes2. \bar "||" \break
bes4 \bar "|" ees4 d c bes \bar "|" ees4 c bes \breathmark \bar "||" bes4 \stemUp \bar "|" ees,4 f g aes \bar "|" bes2 f2 \bar "|" ees2. \bar "||" }


soprano = \relative c' { \partial 4 ees4 \bar "|" ees f g ees \bar "|" bes'2 f2 \bar "|" ees2. \bar "||" bes'4 \bar "|" bes4 c d bes \bar "|" ees2 c2 \bar "|" bes2. \bar "||" \break
bes4 \bar "|" ees4 d c bes \bar "|" ees4 c bes \bar "||" bes4 \bar "|" ees,4 f g aes \bar "|" bes2 f2 \bar "|" ees2. \bar "||" }



alto = \relative c' {  \partial 4 bes4 \bar "|" <bes ees>2  <c ees>2 \bar "|" <bes ees>2 <c d>2 bes2. \bar "||" ees4 \bar "|" <d bes'>2 d2 \bar "|" <ees g>2 <ees f>2 \bar "|" <d f>2. \bar "||" \break
<d f>4 \bar "|" <ees bes'>2 aes4 f \bar "|" ees4 f g \bar "||" d4 \bar "|" ees2 ees \bar "|" <bes ees>2 <bes d>2 \bar "|" bes2. \bar "||" }



tenor = \relative c { \clef bass \partial 4 g'4 \bar "|" g2  g \bar "|" ees2 aes \bar "|" g2. \bar "||" g4 \bar "|" f2 bes \bar "|" bes2 a \bar "|" bes2. \bar "||" \break
bes4 \bar "|" bes2 c4 d \bar "|" aes2 g4 \bar "||" aes4 \bar "|"  bes2 bes \bar "|" ees,2 aes \bar "|" g2. \bar "||" }



bass = \relative c {\clef bass  \partial 4 ees4 \bar "|" ees2  c \bar "|" g2 bes \bar "|" ees2. \bar "||" ees4 \bar "|" bes2 g' \bar "|" c,2 f \bar "|" bes,2. \bar "||" \break
aes'4 \bar "|" g2 aes4 bes \bar "|" c,4 d ees \bar "||" f4 \bar "|"  g2 ees \bar "|" g,2 bes \bar "|" ees2. \bar "||" }



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



%%% score block	

	

\score{



\new ChoirStaff	

<<
	<<
		\context Staff = unison { \voiceOne \global \unison }

			\new PianoStaff
				<<

				\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 { \Score timing = ##t }
	\context { \PianoStaff \remove "Span_bar_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 ees1^\markup { \small \italic "Harmony." } ees1 \bar "||" }}

	\context Voice = "altos"    { \relative c' { \clef treble \global \voiceTwo c1 bes1 \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 aes'1 g1 \bar "||" }}

	\context Voice = "basses" { \relative c { \clef bass \global \voiceFour  aes1 ees'1 \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: