2 \include "pop-chords.ly"
5 % Good sizes are 16, 18, & 20
7 #(set-default-paper-size "letter")
8 #(set-global-staff-size staffSize)
9 #(ly:set-option (quote no-point-and-click))
13 %Let's bump up the title size and switch to the chord font. :-)
15 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "O Come, All Ye Faithful" }
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Traditional" }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Craig Harris" }
18 tagline = "Engraved by JLH and Lilypond 2.8.6"
26 LeadVox = \relative c'
28 % \set Voice.autoBeaming = ##f
29 % \set Staff.instrumentName = #"Lead vox"
32 \override Staff.TimeSignature #'style = #'()
34 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
38 \partial 4*1 s4 \bar "||" % 0
46 \mark \markup { \override #'(font-family . sans) { \box { A } } }
59 e4. ( d8 ) c4 f | % 16
72 \mark \markup { \override #'(font-family . sans) { \box { B } } }
85 e4. ( d8 ) c4 f | % 37
89 \break %Bah, only valid for size 16!!!
100 \mark \markup { \override #'(font-family . sans) { \box { C } } }
113 e4. ( d8 ) c4 f | % 57
122 bf4-> a-> g-> f-> | % 66
126 f1^\fermata \bar "|." % 70
129 LeadVoxText = \lyricmode
131 O come, all ye fai -- thful,
132 joy -- ful and tri -- um -- phant,
133 O come ye, O come _ ye to Beth -- _ le -- hem;
134 Come and be -- hold him, born the king of an -- _ gels;
136 O come let us a -- dore him,
137 O come let us a -- dore him,
138 O come let us a -- dore him, _
139 Christ, _ the Lord. __ _
141 Sing, choirs of an -- gels,
142 sing in ex -- ul -- ta -- tion,
143 O sing, all ye ci -- ti -- zens of hea -- ven a -- bove;
144 Glo -- ry to God, all glo -- ry in the high -- _ est;
146 O come let us a -- dore him,
147 O come let us a -- dore him,
148 O come let us a -- dore him, _
151 Yea, Lord, we greet thee,
152 born this hap -- py morn -- ing,
153 O Je -- sus to thee _ be all glo -- _ ry given;
154 Word of the Fa -- ther, now in flesh ap -- pear -- _ ing;
156 O come let us a -- dore him,
157 O come let us a -- dore him,
158 O come let us a -- dore him, _
161 O come let us a -- dore him, _
162 Christ, __ _ _ the Lord.
166 Riffs = \relative c''
170 \override Staff.TimeSignature #'style = #'()
172 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
177 \partial 4*1 a4 | % 0
178 bf4-> a-> g-> f-> | % 1
192 %Bah, can't we set this globally?
197 \partial 4*1 d4:7/fs | % 0
198 g4:m f/a g:m/bf g:7/b | % 1
199 c4 c/bf f/a bf:m/df | % 2
200 f2/c g4:m7/c c:9 | % 3
208 f2/a g4:m7/c a:aug7/cs | % 8
211 c2/g d4:m7/g g:7 | % 11
215 c4/e f d:m g:m/bf | % 15
217 f4 c/f f g:m/f | % 17
221 g4:m f/a g:m/bf g:7/b | % 21
225 g2:m7 g4:m7/c c:7 | % 25
230 g2:m9 c:sus4.7 | % 27
231 f4 c/e f c:7/g | % 28
232 g2:9 g4:m7/c a:aug7/cs | % 29
235 c2/g d4:m7/g g:7 | % 32
240 g2:sus4.7 c:sus4.7 | % 37
241 f4 c/f f g:m/f | % 38
244 ef2:maj9.11+ a4:m7/d d:7/fs | % 41
245 g4:m f/a g:m/bf g:7/b | % 42
246 c2 ef4:9 d:aug7 | % 43
247 g2:9 g4:m/c c:9 | % 44
248 f4 d:m g:m7 g:m7/c | % 45
253 g2:m7 c:sus4.7 | % 47
255 b2:m7.5- g4:m7/c a:aug7/cs | % 49
258 c2/g d4:m7/g g:7 | % 52
259 c2:sus4 e:m7.5- | % 53
260 a2:m7.5- d:aug7 | % 54
261 e2:m7.5- a:sus4.7 | % 55
262 a4:m7/d df:aug f:6/c g/b | % 56
263 bf2:9.11+ c:sus4.7 | % 57
264 f4 c/f f g:m/f | % 58
266 d4:m c/d d:m ef:9 | % 60
267 ef2:9.11+ a4:m7/d d:7/fs | % 61
268 g4:m f/a g:m/bf g:7/b | % 62
269 c2 ef4:9 d:aug7 | % 63
270 g2:9 g4:m/c a:7/cs | % 64
272 g4:m f/a g:m/bf g:7/b | % 66
273 c4 c/bf f/a bf:m/df | % 67
284 % Use a RhythmicStaff on the chords instead of this?
285 % It almost works, but not quite. Doesn't collapse chords above to single notes...
289 % \set Voice.autoBeaming = ##f
290 % \set Staff.instrumentName = #"Rhythm"
291 \override Staff.TimeSignature #'style = #'()
293 \override NoteHead #'style = #'slash
297 \partial 4*1 c4 \bar "||" % 0
301 c4 c c c \bar "||" % 4
325 c4 c c c \bar "||" % 25
348 c4 c c c \bar "||" % 45
376 c1^\fermata \bar "|." % 70
382 \override TextScript #'extra-offset = #'( 0.0 . -1.0 )
384 \partial 4*1 s4_\f | % 0
385 s4_\markup { \italic { full band, snare } } s2. | % 1
388 s4_\markup { \dynamic mf \italic { piano only } } s2. | % 5
390 s4_\markup { \dynamic mp \italic { bass in, cym } } s2. | % 17
392 s4 s \< s s_\f | % 20
394 s2 s_\markup { \italic { dr. fill } } | % 23
395 s4_\markup { \italic { dr. groove, s-stick 2&4 } } s2. | % 24
397 s4_\markup { \dynamic mp \italic { no backbeat } } s2. | % 38
399 s4 s \< s s_\f | % 41
400 s4_\markup { \italic { backbeat } } s2. | % 42
402 s2 s_\markup { \italic { dr. fill } } | % 45
403 s4_\markup { \italic { Majestic, slower w/snare } } s2. | % 46
405 s4_\markup { \dynamic mp \italic { no backbeat } } s2. | % 58
407 s4 s \< s_\markup { \hspace #0.0 \raise #-2.0 \italic { dr.fill } } s_\f | % 61
408 s4_\markup { \italic { backbeat } } s2. | % 62
410 s4_\markup { \italic { rit. } } s2. | % 69
418 % \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
419 \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
420 \new Lyrics \lyricsto "lead" \LeadVoxText
421 % \new Lyrics \lyricsto "lead" \LeadVoxTextB
424 \new ChoirStaff = "Rhythm"
426 \new ChordNames = "chords" \Chords
427 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
430 \set Score.skipBars = ##t
431 \set Score.melismaBusyProperties = #'()
436 % \context { \Staff \RemoveEmptyStaves }
437 % ragged-last-bottom = ##t
445 #(define fonts (make-pango-font-tree
451 % top-margin = -0.25 \in