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))
11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
15 %Let's bump up the title size and switch to the chord font. :-)
17 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Go Tell It On The Mountain" }
18 subtitle = \markup { \override #'(font-family . sans) \fontsize #1.3 "Key of E & Chorus Only Version" }
19 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Traditional" }
20 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart/Shamus & Deborah Hammons/J. & Kat Michaels/Chris Craig" }
21 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
25 % Useful tweak abbreviations (hn = harmony note)
27 hn = #(define-music-function (parser location arg) (ly:music?)
28 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
30 (set! (ly:music-property arg 'tweaks)
31 (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
38 LeadVox = \relative c''
40 % \set Voice.autoBeaming = ##f
41 % \set Staff.instrument = #"Lead vox"
44 \override Staff.TimeSignature #'style = #'()
46 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
62 r1^\markup { \bold { Vamp } } | % 5
70 \mark \markup { \override #'(font-family . sans) { \box { A } } }
72 <b \hn g>2 <b \hn g>8 <a \hn e> <g \hn d> <e \hn c> | % 9
73 d8. ( <e \hn c>16 ~ <e \hn c>8 ) <g \hn b,> ~ <g \hn b,>2 | % 10
74 <a \hn c,>8 <a \hn c,>4 <a \hn c,>8 <g \hn d>4 <a \hn d,> | % 11
75 <b \hn g>4 <d \hn b> <e \hn c> ( <d \hn b> ) | % 12
76 <b \hn g>2 <b \hn g>8 <a \hn e> <g \hn d> <e \hn c> | % 13
77 d8. ( <e \hn c>16 ~ <e \hn c>8 ) <g \hn e> ~ <g \hn e>4 <c \hn g> | % 14
78 <b \hn d,>4 <b \hn d,> <a \hn c,>8 ( <g \hn b,> ) <a \hn c,>4 | % 15
79 <g \hn b,>2 r \bar "||" % 16
85 \mark \markup { \override #'(font-family . sans) { \box { B } } }
87 <b \hn g>2 <b \hn g>8 <a \hn e> <g \hn d> <e \hn c> | % 17
88 d8. ( <e \hn c>16 ~ <e \hn c>8 ) <g \hn b,> ~ <g \hn b,>2 | % 18
89 <a \hn c,>8 <a \hn c,>4 <a \hn c,>8 <g \hn d>4 <a \hn d,> | % 19
90 <b \hn g>4 <d \hn b> <e \hn c> ( <d \hn b> ) | % 20
91 <b \hn g>2 <b \hn g>8 <a \hn e> <g \hn d> <e \hn c> | % 21
92 d8. ( <e \hn c>16 ~ <e \hn c>8 ) <g \hn e> ~ <g \hn e>4 <c \hn g> | % 22
93 <b \hn d,>4 <b \hn d,> <a \hn c,>8 ( <g \hn b,> ) <a \hn c,>4 | % 23
98 r1-\fermata \bar "|." % 27
102 LeadVoxText = \lyricmode
104 Go tell it on the moun -- _ _ tain, _
105 o -- ver the hills and e -- vr’y -- where, _
106 Go tell it on the moun -- _ _ tain, _
107 that Je -- sus Christ _ is born!
109 Go tell it on the moun -- _ _ tain, _
110 o -- ver the hills and e -- vr’y -- where, _
111 Go tell it on the moun -- _ _ tain, _
112 that Je -- sus Christ _ is born!
116 Riffs = \relative c''
120 \override Staff.TimeSignature #'style = #'()
122 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
127 \partial 4 { r8 d16 e } | % 0
128 f8. e16 ~ e8 d8 ~ d4 r | % 1
129 c8. b16 ~ b8 g8 ~ g8 f g d'16 e | % 2
130 f8. e16 ~ e8 d8 ~ d4 c | % 3
131 b4. f'16 f g8 f g16 f d e | % 4
135 \repeat "percent" 3 % 1 - 6
137 << { \tiny f16 c f, <f' f,> ~ <f f,> f, c' f f8 e } \\ { \tiny f,,2 c'4 } >> | % 1
138 << { \tiny f'16 c f, <f' f,> ~ <f f,> f, c' f f8 e } \\ { \tiny bf,2 c4 } >> | % 2
140 << s2. \\ { \tiny d2 c4 } >> | % 7
141 << s2. \\ { \tiny bf2. } >> | % 8
146 \repeat "percent" 6 { f''16 c f, <f' f,> ~ <f f,> f, c' f f8 e | } % 16-21
152 \repeat "percent" 2 { f16 c f, f' ~ f f, c' f f8 e | } % 29-30
158 \repeat "percent" 2 { g16 d g, g' ~ g g, d' g g8 fs | } % 31-32
164 \repeat "percent" 4 { g16 d g, g' ~ g g, d' g g8 fs | } % 40-43
177 %Bah, can't we set this globally?
204 g4./b e8:m7 s2 | % 10
205 a2:m7 d4:sus4 d | % 11
217 g4./b e8:m7 s2 | % 18
218 a2:m7 d4:sus4 d | % 19
237 \numericTimeSignature
238 \override NoteHead #'style = #'slash
247 c8.-> c16-> ~ c8 c8-> ~ c2 | % 1
248 c8.-> c16-> ~ c8 c8-> ~ c2 | % 2
249 c8.-> c16-> ~ c8 c8-> ~ c2 | % 3
250 c8.-> c16-> ~ c8 c8-> ~ c2 | % 4
264 c4 c8 c8 ~ c4 c | % 10
268 c4 c8 c8 ~ c4 c | % 14
277 c4 c8 c8 ~ c4 c | % 18
281 c4 c8 c8 ~ c4 c | % 22
284 c8.-> c16-> ~ c8 c8-> ~ c2 | % 24
285 c8.-> c16-> ~ c8 c8-> ~ c2 | % 25
286 c8.-> c16-> ~ c8 c8-> ~ c2 | % 26
287 c8.-> c16-> ~ c8 c8-> ~ c2 \bar "|." % 27
295 s4_\markup { \italic { snare pat. } } s2 | % 1
296 s4_\markup { \italic { simile } } s2 | % 2
298 s4_\markup { \italic { spacy } } s2 | % 22
302 s4_\markup { \italic { Last time } } s2 | % 51
311 \new Staff = leadStaff { << \new Voice = "lead" \transpose g e \LeadVox \new Voice = "riffs" \transpose g e \Riffs >> }
312 \new Lyrics \lyricsto "lead" \LeadVoxText
315 \new ChoirStaff = "Rhythm"
317 \new ChordNames = "chords" \transpose g e \Chords
318 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
321 \set Score.skipBars = ##t
322 \set Score.melismaBusyProperties = #'()
329 #(define fonts (make-pango-font-tree
335 % Spread staves vertically across last page (default: t)
336 ragged-last-bottom = ##f
337 % Don't spread staves vertically across the page (default: f)
338 % ragged-bottom = ##t
339 % Allow partial line for last stave (default: f)
342 % To find out what's eating the space at the top...
343 % annotate-spacing = ##t