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 "Word Of God, Speak" }
16 % composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
18 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
21 % Useful tweak abbreviations (hn = harmony note)
23 hn = #(define-music-function (parser location arg) (ly:music?)
24 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
26 (set! (ly:music-property arg 'tweaks)
27 (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
37 \override Staff.TimeSignature #'style = #'()
46 LeadVox = \relative c''
48 % \set Voice.autoBeaming = ##f
49 % \set Staff.instrumentName = #"Lead vox"
52 \override Staff.TimeSignature #'style = #'()
54 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
67 \voiceTwo r2 r4 g \oneVoice | % 8
73 \mark \markup { \override #'(font-family . sans) { \box { A } } }
77 g4. e8 e4 d8 ( c ) | % 11
80 a4 f c' b8 ( a ) | % 14
81 g4 e e8 ( d ) c ( d ) | % 15
82 e4. d8 c4 <g' \hn f \hn b,> \bar "||" % 16
86 \mark \markup { \override #'(font-family . sans) { \box { B } } }
88 <g \hn e \hn c>4 <c \hn g \hn e> <b \hn g \hn d> <d \hn b \hn g> | % 17
89 <c \hn a \hn f>4 <b \hn g \hn e>8 ( <a \hn f \hn d> ) <g \hn e \hn c>4 <a \hn f \hn c> | % 18
90 <g \hn e \hn c>4 <e \hn c \hn g> <e \hn c \hn a>8 ( <d \hn b> ) <c \hn a> ( <d \hn b \hn g> ) | % 19
91 <e \hn c \hn fs,>4 <e \hn c \hn fs,> <d \hn c \hn g> <g \hn f! \hn d> | % 20
92 <g \hn e \hn c>4 <c \hn g \hn e> <b \hn g \hn d> <d \hn g, \hn b,> | % 21
93 <c \hn a \hn f>4 <b \hn g \hn e>8 ( <a \hn f \hn d> ) <g \hn e \hn c>4 <a \hn f \hn c> | % 22
94 <g \hn e \hn c>4 <e \hn c \hn g> << { \voiceOne <e \hn c>8 ( <d \hn b> ) c ( d ) } \context Voice = "v2" { \voiceTwo \tiny a4 a8 b \normalsize } \oneVoice >> | % 23
95 \time 2/4 <e \hn c>4 <d \hn b> \time 4/4 | % 24
96 \voiceTwo c1 \oneVoice | % 25
103 \voiceTwo r2 r4 g' \oneVoice | % 28
113 \voiceTwo r2 r4 <a \hn d,> \oneVoice \bar "||" % 33
119 \mark \markup { \override #'(font-family . sans) { \box { C } } }
121 <fs \hn a,>4. <e \hn g,>8 <d \hn fs,>4 <a' \hn d,> | % 34
122 <b \hn d,>4 <g \hn b,> <g \hn b,> <b \hn d,> | % 35
123 <a \hn d,>4. <fs \hn a,>8 <fs \hn a,>4 <e \hn g,>8 ( <d \hn fs,> ) | % 36
124 <fs \hn a,>4 <fs \hn a,> <e \hn a> <a \hn e \hn cs> | % 37
125 <fs \hn d \hn a>4. <e \hn d \hn g,>8 <d \hn a \hn cs>4 <a' \hn fs \hn d> | % 38
126 <b \hn g \hn d>4 <g \hn d \hn b> <d' \hn f, \hn b,> <cs \hn f, \hn cs>8 ( <b \hn d,> ) | % 39
127 <a \hn fs \hn d>4 <fs \hn d \hn a> << { \voiceOne <fs \hn d>8 ( <e \hn cs> ) d ( e ) } \context Voice = "v2" { \voiceTwo \tiny b4 b8 cs \normalsize } \oneVoice >> | % 40
128 <fs \hn d \hn a>4. <e \hn cs \hn g>8 <d \hn fs,>4 <a' \hn g \hn cs,> \bar "||" % 41
132 \mark \markup { \override #'(font-family . sans) { \box { D } } }
134 <a \hn fs \hn d>4 <d \hn a \hn fs> <cs \hn a \hn e> <e \hn cs \hn a> | % 42
135 <d \hn b \hn g>4 <cs \hn a \hn fs>8 ( <b \hn g \hn e> ) <a \hn fs \hn d>4 <b \hn g \hn d> | % 43
136 <a \hn fs \hn d>4 <fs \hn d \hn a> <fs \hn d \hn b>8 ( <e \hn cs> ) <d \hn b> ( <e \hn cs \hn a> ) | % 44
137 <fs \hn d \hn gs,>4 <fs \hn d \hn gs,> <e \hn d \hn a> <a \hn g! \hn cs,> | % 45
138 <a \hn fs \hn d>4 <d \hn a \hn fs> <cs \hn a \hn e> <e \hn a, \hn cs,> | % 46
139 <d \hn g, \hn b,>4 <cs \hn fs, \hn a,>8 ( <b \hn e, \hn g,> ) <a \hn d, \hn fs,>4 <b \hn g \hn d> | % 47
140 <a \hn fs \hn d>4 <fs \hn d \hn a> << { \voiceOne <fs \hn d>8 ( <e \hn cs> ) d ( <e \hn cs> ) } \context Voice = "v2" { \voiceTwo \tiny b4 b8 a \normalsize } \oneVoice >> | % 48
141 <fs' \hn d \hn a>2 <e \hn cs \hn a> \bar "||" % 49
145 \mark \markup { \override #'(font-family . sans) { \box { E } } }
147 \voiceTwo d1 \oneVoice | % 50
159 LeadVoxText = \lyricmode
161 I'm find- ing my- self at a loss for words
162 and the fun- ny thing is, it's o- kay
163 The last thing I need is too be heard
164 but to hear what you might say
166 Word of God speak, would you pour down like rain,
167 wash- ing my eyes to see your ma- jes- ty
168 To be still and know that you're in this place,
169 please let me stay and rest in your ho- li- ness
174 Riffs = \relative c''
178 \override Staff.TimeSignature #'style = #'()
180 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
185 r8 g16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ | % 1
186 c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ | % 2
187 d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ | % 3
188 c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ | % 4
189 d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ | % 5
190 c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ | % 6
191 d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. | % 7
192 \voiceOne <g' d c g>1 \oneVoice | % 8
216 \time 2/4 s2 \time 4/4 | % 24
217 \voiceOne r8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ \oneVoice | % 25
218 c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ | % 26
223 d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. | % 27
224 \voiceOne <g' d c g>1 \oneVoice | % 28
227 d8 \repeatTie g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. | % 29
231 c8 bf16 f ~ f2. | % 30
232 c'8 bf16 f ~ f4 ~ f8. af16 ~ af bf8. | % 31
234 \voiceOne d2 e \oneVoice | % 33
260 \voiceOne r8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ \oneVoice | % 50
261 d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 e8. ~ | % 51
262 e8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ | % 52
263 d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 e8. ~ | % 53
264 e8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ | % 54
265 d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 e8. ~ | % 55
266 e8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ | % 56
267 d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 cs8. ~ | % 57
268 <d a fs d>1^\fermata | % 59
279 %Bah, can't we set this globally?
284 c2:sus2/a c:sus2/f | % 1
286 c2:sus2/a c:sus2/f | % 3
288 c2:sus2/a c:sus2/f | % 5
290 c2:sus2/e c:sus2/f | % 7
300 c2/f g4:sus4 g | % 12
304 c4/g g c g:sus4.7 \bar "||" % 16
309 f4 e8:m7 d:m7 c4 f | % 18
311 d2:9 g4:sus4.7 g:7 | % 20
313 f4 e8:m7 d:m7 c4 f | % 22
315 \time 2/4 c4/f g \time 4/4 | % 24
316 c2:sus2/a c:sus2/f | % 25
322 c2:sus2/e c:sus2/f | % 27
326 c2:sus2/e c:sus2/ef | % 29
333 g2/a a4 a:sus4.7 \bar "||" % 33
341 d4. e8:m7 d2/fs | % 38
344 d4/a a d d:sus4.7 \bar "||" % 41
349 g4 fs8:m7 e:m7 d4 g | % 43
351 e2:9 a4:sus4.7 a:7 | % 45
353 g4 fs8:m7 e:m7 d4 g | % 47
355 d2/g a \bar "||" % 49
361 d2:sus2/b g:6.9 | % 52
365 d2:sus2/fs g:6.9 | % 56
375 % Use a RhythmicStaff on the chords instead of this?
376 % It almost works, but not quite. Doesn't collapse chords above to single notes...
380 % \set Voice.autoBeaming = ##f
381 % \set Staff.instrumentName = #"Rhythm"
382 \override Staff.TimeSignature #'style = #'()
384 \override NoteHead #'style = #'slash
409 c4 c c c-> \bar "||" % 16
420 \time 2/4 c4 c \time 4/4 | % 24
438 c4 c c c \bar "||" % 33
449 c4 c c c-> \bar "||" % 41
472 c1^\fermata \bar "|." % 58
484 s4 \< s s \! s | % 28
486 s4 \< s s \! s | % 33
488 s2 s2_\markup { \italic { rit. } } | % 57
498 % \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
499 \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
500 \new Lyrics \lyricsto "lead" \LeadVoxText
503 \new ChoirStaff = "Rhythm"
505 \new ChordNames = "chords" \Chords
506 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
509 \set Score.skipBars = ##t
510 \set Score.melismaBusyProperties = #'()
514 \set Score.skipBars = ##t
515 \set Score.melismaBusyProperties = #'()
519 \new ChordNames \Chords
520 \new RhythmicStaff << \Rhythm \Dynamics >>
526 \new Voice = "lead" \LeadVox
528 \new Lyrics \lyricsto "lead" \LeadVoxText
536 #(define fonts (make-pango-font-tree
542 % Spread staves vertically across last page (default: t)
543 % ragged-last-bottom = ##f
544 % Don't spread staves vertically across the page (default: f)
545 % ragged-bottom = ##t
546 % Allow partial line for last stave (default: f)
549 % To find out what's eating the space at the top...
550 % annotate-spacing = ##t
551 %let's try this: [It works! Huzzah!]
552 obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)