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 "The First Noel" }
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "English Carol" }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
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
50 s2 fs8 e \bar "||" % 8
54 \mark \markup { \override #'(font-family . sans) { \box { A } } }
56 d4. ( e8 ) fs ( g ) | % 9
65 \mark \markup { \override #'(font-family . sans) { \box { A9 } } }
67 d4. ( e8 ) fs ( g ) | % 17
74 fs2 fs8 ( e ) \bar "||" % 24
75 \break % bah, only valid for size 18
79 %\mark \markup { \override #'(font-family . sans) { \box { B } } }
80 \once \override Score.RehearsalMark #'self-alignment-X = #left
81 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
83 d4. ( e8 ) fs ( g ) | % 25
98 fs2^\markup { \hspace #3.0 \raise #1.0 { D.S. } } fs8 ( e ) \bar "||" % 34
112 LeadVoxText = \lyricmode
114 The _ first _ no -- _ el the _ an -- gel did say
115 Was to cer -- tain poor shep -- herds in fields as they lay
116 In _ fields _ where _ they lay _ keep -- ing their sheep
117 On a cold win -- ter’s night _ that was _ so deep.
119 No -- _ el, _ no -- _ el! No -- _ el, no -- el!
120 Born is the king _ of Is -- _ ra -- el!
128 LeadVoxTextB = \lyricmode
130 They _ look -- _ ed _ up and _ saw _ a star
131 Shi -- ning in _ the east _ be -- yond _ them far
132 And _ to _ the _ earth it _ gave _ great light,
133 And _ so it con -- tin -- ued both day _ and night.
141 \override Staff.TimeSignature #'style = #'()
143 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
148 \partial 4*1 fs8 e | % 0
175 %Bah, can't we set this globally?
180 \partial 4*1 d4/a | % 0
190 g4:6/b a:11^9.7 g | % 5
192 e2:m7 a4:sus4.7 | % 7
202 a4:13 b:m a/cs | % 16
210 e2:m7 a4:sus4.7 | % 23
216 a2:9^7 d4:9^7/fs | % 26
219 g4:6/b a:11^9.7 g | % 29
220 d4:sus2/fs g fs:m | % 30
225 e2:m7 a4:sus4.7 | % 31
229 e2:m7 a4:sus4.7 | % 33
233 e2:m7 a4:sus4.7 | % 35
238 g4:6/b a:11^9.7 g | % 37
239 d4:sus2/fs g fs:m | % 38
240 e2:m7 a4:sus4.7 | % 39
249 % Use a RhythmicStaff on the chords instead of this?
250 % It almost works, but not quite. Doesn't collapse chords above to single notes...
254 % \set Voice.autoBeaming = ##f
255 % \set Staff.instrumentName = #"Rhythm"
256 \override Staff.TimeSignature #'style = #'()
258 \override NoteHead #'style = #'slash
262 \partial 4*1 c4 \bar "||" % 0
293 c4 c c \bar "||" % 24
323 c2.^\fermata \bar "|." % 40
330 % \override TextScript #'staff-padding = #-4.0
332 \once \override TextScript #'extra-offset = #'( 0.0 . -1.0 )
333 \partial 4*1 s8_\markup { \italic { guitar, light perc. } } s8
337 s4_\markup { \italic { bass in 1st X } } s2
341 s4_\markup { \italic { add snare } } s2
349 % \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
350 \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
351 \new Lyrics \lyricsto "lead" \LeadVoxText
352 \new Lyrics \lyricsto "lead" \LeadVoxTextB
355 \new ChoirStaff = "Rhythm"
357 \new ChordNames = "chords" \Chords
358 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
361 \set Score.skipBars = ##t
362 \set Score.melismaBusyProperties = #'()
367 % \context { \Staff \RemoveEmptyStaves }
368 ragged-last-bottom = ##t
376 #(define fonts (make-pango-font-tree
382 % top-margin = -0.25 \in