2 \include "pop-chords.ly"
5 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
7 #(set-default-paper-size "letter")
8 #(set-global-staff-size staffSize)
9 #(ly:set-option (quote no-point-and-click))
11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
15 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "O Come, O Come, Emmanuel" }
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Thomas Helmore" }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
18 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
34 s1^\markup { \hspace #0.0 \raise #1.0 { Half time feel } } | % 1
41 \mark \markup { \override #'(font-family . sans) { \box { A } } }
42 s1*12 \bar "||" % 9-20
46 \once \override Score.RehearsalMark #'self-alignment-X = #left
47 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
58 s2. s4^\markup { \hspace #0.0 \raise #0.6 { D.S. } } \bar "||" % 34
67 s1*3 \bar "|." % 37-39
74 LeadVox = \relative c'
113 s2. \stemUp d'4 \stemNeutral | % 34
125 LeadVoxText = \lyricmode
127 O come, O come, Em -- ma -- _ _ nu -- el,
128 and ran -- som cap -- tive Is -- _ _ ra -- el,
129 That mourns in lone -- ly ex -- _ ile here,
130 Un -- til the Son of God _ _ ap -- pear.
132 Re -- joice! Re -- joice! Em -- ma -- _ _ nu -- el
133 shall come to thee, O Is -- _ _ ra -- el!
143 shall come to thee, O Is -- _ _ ra -- el!
146 LeadVoxTextB = \lyricmode
148 _ come, thou day -- spring, come _ _ and cheer
149 Our spi -- rits by thine ad -- _ _ vent here;
150 Dis -- perse the gloo -- my clouds _ of night,
151 And death’s dark sha -- dows put _ _ to flight.
155 Riffs = \relative c''
160 r2 <d a g>4. <cs fs, e>8 ~ | % 1
162 r2 <d a g>4. <cs fs, e>8 ~ | % 3
164 r2 <d a g>4. <cs fs, e>8 ~ | % 5
166 r2 <d a g>4. <a fs e d>8 ~ | % 7
167 <a fs e d>2. s4 | % 8
171 r2 <d a g>4. <cs fs, e>8 ~ | % 27
173 r2 <d a g>4. <a fs e d>8 ~ | % 29
174 <a fs e d>2. s4 | % 30
176 r2 <d a g>4. <cs fs, e>8 ~ | % 31
178 r2 <d a g>4. \stemDown <a fs e d>8 ~ | % 33
179 <a fs e d>8 <a fs e d> <a fs e d> <a fs e d> <a fs e d> <a fs e d> <a fs e d> <a fs e d> \stemNeutral | % 34
181 r2 <d a g>4. <a fs e d>8 ~ | % 35
182 <a fs e d>2. s4 | % 36
188 RiffsBass = \relative c
192 \numericTimeSignature
199 <e b e,>4. b8 <e e,>4. <e b e,>8 ~ | % 1
200 <e b e,>2.. <d a d,>8 | % 2
201 <e b e,>4. b8 <e e,>4. <e b e,>8 ~ | % 3
202 <e b e,>2.. <d a d,>8 | % 4
203 <e b e,>4. b8 <e e,>4. <e b e,>8 ~ | % 5
204 <e b e,>2.. <d a d,>8 | % 6
205 <e b e,>4. b8 <e e,>4. b8 ~ | % 7
210 <e b e,>4. b8 <e e,>4. <e b e,>8 ~ | % 27
211 <e b e,>2.. <d a d,>8 | % 28
212 <e b e,>4. b8 <e e,>4. b8 ~ | % 29
215 <e b e,>4. b8 <e e,>4. <e b e,>8 ~ | % 31
216 <e b e,>2.. <d a d,>8 | % 32
217 <e b e,>4. b8 <e e,>4. b8 ~ | % 33
220 <e b e,>4. b8 <e e,>4. <e b e,>8 ~ | % 35
255 a2:m7 c:maj7/d | % 19
262 a2:m7 b:7.9-.13- | % 23
292 \numericTimeSignature
293 \override NoteHead #'style = #'slash
339 c8 c c c c c c c | % 34
357 s4_\markup { \italic { 1st X colors, 2nd X lite sn. } } s2. | % 9
366 s4 s \> s s \! | % 26
371 s4 s \< s s \! | % 34
375 s4 s \> s s \! | % 36
379 s4_\markup { \italic { rit. } } s2. | % 38
386 \Global % The "roadmap" that everything else depends on
390 \new Voice = "lead" \LeadVox
391 \new Voice = "riffs" \Riffs
392 \new Lyrics \lyricsto "lead" \LeadVoxText
393 \new Lyrics \lyricsto "lead" \LeadVoxTextB
397 \new Staff = leadStaffBass { \new Voice = "leadbass" \RiffsBass }
402 \new ChordNames \Chords
403 \new RhythmicStaff << \StaffC \Dynamics >>
406 \set Score.skipBars = ##t
407 \set Score.melismaBusyProperties = #'()
412 \context { \Staff \RemoveEmptyStaves }
419 #(define fonts (make-pango-font-tree
425 % Don't spread staves vertically across last page (default: t)
426 % ragged-last-bottom = ##f
427 % Don't spread staves vertically across the page (default: f)
429 % Allow partial line for last stave (default: f)
432 % To find out what's eating the space at the top...
433 % annotate-spacing = ##t