]> Shamusworld >> Repos - music/blob - he-who-began-a-good-work-in-you.ly
New song 'Wait By The Water' added.
[music] / he-who-began-a-good-work-in-you.ly
1 \version "2.16.0"
2 \include "pop-chords.ly"
3 \include "english.ly"
4
5 % Good sizes are 16, 18, & 20
6 staffSize = #16
7 #(set-default-paper-size "letter")
8 #(set-global-staff-size staffSize)
9 #(ly:set-option (quote no-point-and-click))
10
11
12 \header
13 {
14         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "He Who Began A Good Work In You" }
15         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Words & music by Andre Crouch" }
16         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart/Shamus Hammons" }
17         tagline  = "Engraved by JLH and Lilypond 2.8.2"
18 }
19
20
21 %
22 % Lead vocal
23 %
24
25 LeadXvoxA = \relative c'
26 {
27 %       \set Voice.autoBeaming = ##f
28         \set Staff.instrumentName = #"Lead vox"
29         \clef G
30         \key a \major
31         \time 4/4
32 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
33
34 %       \set Score.markFormatter = #format-mark-box-letters
35
36         \repeat volta 2
37         {
38                 R1^"Moderately, not too slow" |   % 1
39                 R1 |   % 2
40         }
41         \alternative
42         {
43                 {
44                         R1 |   % 3
45                         R1 |   % 4
46                 }
47                 {
48                         R1 |   % 5
49                         R1 \bar "||"   % 6
50                 }
51         }
52
53         % Chorus
54
55 %\mark \markup { \override #'(font-family . sans) { \box { A } } }
56 \once \override Score.RehearsalMark #'self-alignment-X = #left
57 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
58
59         \stemUp a'4. gs8 ~ gs4 r8 e |   % 7
60         fs [ gs ] a [ b ~ ] b gs4 e8 ~ |   % 8
61         e2 r |   % 9
62         R1 |   % 10
63         a4. gs8 ~ gs4 r8 e |   % 11
64         fs [ gs ] a [ b ~ ] b gs4 \stemDown cs8 ~ |   % 12
65         cs1 ~ |   % 13
66         cs2 r8 b cs [ d ~ ] |   % 14
67         d [ cs ] \stemUp b [ a ] a [ b ~ ] b4 |   % 15
68         r2 r8 \stemDown b cs [ d ~ ] |   % 16
69         d [ cs ] \stemUp b [ a ] \stemDown cs [ b ~ ] b4 |   % 17
70         r2 r8 b cs [ d ~ ] |   % 18
71         d [ cs ] \stemUp b [ a ~ ] a [ b ] \stemDown cs [ d ~ ] |   % 19
72 %\mark \markup { \musicglyph #"scripts.coda" } |   % 19
73 \once \override Score.RehearsalMark #'self-alignment-X = #right
74 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
75
76         d [ cs ] \stemUp b [ a ] a [ b ] gs [ a ~ ] \bar "||"   % 20
77
78         % Interlude
79
80         a2 r |   % 21
81         R1 |   % 22
82         R1 |   % 23
83         r2. r8 cs,16 [ d ] \bar"||"   % 24
84
85         % Verse
86
87 \mark \markup { \override #'(font-family . sans) { \box { B } } }
88
89         e8 [ e ] e [ e ~ ] e [ d ] cs4 |   % 25
90         e8 [ fs ] gs [ a ~ ] a [ gs ] e [ d ~ ] |   % 26
91         d4 r r8 e fs [ b, ] ~ |   % 27
92         b2 r4 r8 e16 [ fs ] |   % 28
93         gs8 [ gs ] gs [ gs ~ ] gs [ fs ] e4 |   % 29
94         gs8 [ gs ] gs [ gs ~ ] gs [ a ] b [ e, ~ ] |   % 30
95         e2. r4 |   % 31
96         R1 |   % 32
97         e8 [ e ] e [ e ~ ] e4 r8 cs16 [ d ] |   % 33
98         e8 [ fs ] gs [ a ~ ] a [ gs ] e4 |   % 34
99         fs8 [ fs ] fs [ fs ~ ] fs4 d8 [ e ] |   % 35
100         fs [ gs ] a [ b ~ ] b [ a ] fs4 |   % 36
101         gs8 [ gs ] gs [ gs ~ ] gs fs4 e8 |   % 37
102         \times 2/3 { gs4 gs gs  } \times 2/3 { gs a \stemDown b  } |   % 38
103         \stemUp a1 |   % 39
104         R1
105 \once \override Score.RehearsalMark #'self-alignment-X = #right
106 \mark "D.S. al Coda"
107         \bar "||"   % 40
108 %       \break
109
110         % Coda (chorus again)
111
112 %\stopStaff s1 \startStaff
113 s1
114 \set Score.currentBarNumber = #41
115
116 \once \override Score.RehearsalMark #'self-alignment-X = #left
117 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
118
119         d8 \repeatTie [ cs ] \stemUp b [ a ] a [ b ] gs4 \bar "||" \mark \default    % 43
120
121 \mark \markup { \override #'(font-family . sans) { \box { C } } }
122
123         \stemUp a4. gs8 ~ gs4 r8 e |   % 42
124         fs [ gs ] a [ b ~ ] b gs4 e8 ~ |   % 43
125         e2 r |   % 44
126         R1 |   % 45
127         a4. gs8 ~ gs4 r8 e |   % 46
128         fs [ gs ] a [ b ~ ] b gs4 \stemDown cs8 ~ |   % 47
129         cs1 ~ |   % 48
130         cs2 r8 b cs [ d ~ ] |   % 49
131         d [ cs ] \stemUp b [ a ] a [ b ~ ] b4 |   % 50
132         r2 r8 \stemDown b cs [ d ~ ] |   % 51
133         d [ cs ] \stemUp b [ a ] \stemDown cs [ b ~ ] b4 |   % 52
134         r2 r8 b cs [ d ~ ] |   % 53
135         d [ cs ] \stemUp b [ a ~ ] a [ b ] \stemDown cs [ d ~ ] |   % 54
136 %       d [ cs ] \stemUp b [ a ] a [ b ] gs [ a ~ ] \bar "|:"   % 55
137         d [ cs ] \stemUp b [ a ] a [ b ] gs4 |   % 55
138
139         % Ending
140
141         \repeat volta 2
142         {
143                 a2 r |   % 56
144                 R1 |   % 57
145         }
146         \alternative
147         {
148                 {
149                         R1 |   % 58
150                         R1 |   % 59
151                 }
152                 {
153                         R1 |   % 60
154                 }
155         }
156
157         r1^\fermata \bar "|."   % 61
158 }
159
160 LeadXvoxATextA = \lyricmode
161 {
162                 He who  _ be- gan a good work  _ in you  _
163                 He who  _ be- gan a good work  _ in you  _
164                  _ Will be fai-  _ thful to com- plete it  _
165                 Will be fai-  _ thful to com- plete it  _
166                 He who start-  _ ed the work  _ will be fai-
167                  _ thful to com- plete it in you  _
168                 
169                 If the trou- ble you're fac-  _ ing is
170                 slow- ly re- pla-  _ cing your hope  _ with des- pair _
171                 And the pro- cess is long  _ and you're
172                 lo- sing your songs  _ in the night  _
173                 You can be sure  _ that the Lord has his hand  _ on you
174                 Safe and se- cure  _ He will ne- ver a- band-  _ on you
175                 You are his trea-  _ sure And
176                 He finds His plea- sure in you
177
178                 _ thful to com- plete it in
179
180                 He who  _ be- gan a good work  _ in you  _
181                 He who  _ be- gan a good work  _ in you  _
182                  _ Will be fai-  _ thful to com- plete it  _
183                 Will be fai-  _ thful to com- plete it  _
184                 He who start-  _ ed the work  _ will be fai-
185                  _ thful to com- plete it in you  _
186 }
187
188
189 %
190 % Background vocals
191 %
192
193 BgXvoxA = \relative c'
194 {
195 %       \set Voice.autoBeaming = ##f
196         \set Staff.instrumentName = #"BG vox"
197         \clef G
198         \key a \major
199         \time 4/4
200
201         \repeat volta 2
202         {
203                 R1 |   % 1
204                 R1 |   % 2
205         }
206         \alternative
207         {
208                 {
209                         R1 |   % 3
210                         R1 |   % 4
211                 }
212                 {
213                         R1 |   % 5
214                         R1 |   % 6
215                 }
216         }
217         \bar "||"
218
219         % Chorus
220
221         R1_\markup { \italic { 1st time unison, 2nd harmony } } |   % 7
222         R1 |   % 8
223         R1 |   % 9
224         R1 |   % 10
225
226 %But this does... FINALLY!
227 %{
228 % lyrics follow voice above
229         R1 |   % 11
230         r2 r4 r8 << { \voiceOne fs'8 ~ } \context Voice = "v" { \voiceTwo <b, gs> ~ } >> |   % 12
231         << { \voiceOne fs'2 ~ fs4. f8 ~ } \context Voice = v { \voiceTwo <b, gs>1 ~ } >> |   % 13
232         << { \voiceOne f'2 } \context Voice = v { \voiceTwo <b, gs>2 } >> \oneVoice r2 |   % 14
233 %}
234
235 % lyrics follow voice below
236         R1 |   % 11
237         r2 r4 r8 << { \voiceOne <b' gs> ~ } \context Voice = "v" { \voiceTwo fs8 ~ } >> |   % 12
238         << { \voiceOne <b gs>1 ~ } \context Voice = v { \voiceTwo fs2 ~ fs4. f8 ~ } >> |   % 13
239         << { \voiceOne <b gs>2 } \context Voice = v { \voiceTwo f2 } >> \oneVoice r2 |   % 14
240
241         <d' a fs>1 |   % 15
242         <b a fs>4. <b gs e>8 ~ <b gs e>4 r |   % 16
243         <d a fs>1 |   % 17
244         <b a fs>4. <b gs e>8 ~ <b gs e>4 r8 <a fs d> ~ |   % 18
245         <a fs d>4. <a e cs>8 ~ <a e cs>4. <fs d b>8 ~ |   % 19
246         <fs d b>4 <fs d b>8 <fs d b> <fs d b> <fs d a> <fs d a> <e cs a> ~ |   % 20
247
248         % Interlude
249
250         <e cs a>2 r |   % 21
251         R1 |   % 22
252         R1 |   % 23
253         R1 |   % 24
254
255         % Verse
256
257         R1 |   % 25
258         R1 |   % 26
259         R1 |   % 27
260         R1 |   % 28
261         R1 |   % 29
262         R1 |   % 30
263         R1 |   % 31
264         R1 |   % 32
265
266         a8 [ a ] a [ a ~ ] a4 r8 a16 [ a ] |   % 33
267         a8 [ a ] b [ cs ~ ] cs [ a ] gs4 |   % 34
268         R1 |   % 35
269         R1 |   % 36
270         R1 |   % 37
271         R1 |   % 38
272         R1 |   % 39
273         R1 |   % 40
274
275         % Coda (chorus again)
276
277 \stopStaff s1 \startStaff
278 \set Score.currentBarNumber = #41
279
280         R1 \bar "||"   % 41
281
282         R1 |   % 42
283         R1 |   % 43
284         R1 |   % 44
285         R1 |   % 45
286         R1 |   % 46
287         R1 |   % 47
288         R1 |   % 48
289         R1 |   % 49
290         R1 |   % 50
291         R1 |   % 51
292         R1 |   % 52
293         R1 |   % 53
294         R1 |   % 54
295         R1 |   % 55
296
297         % Ending
298
299         \repeat volta 2
300         {
301                 R1 |   % 56
302                 R1 |   % 57
303         }
304         \alternative
305         {
306                 {
307                         R1 |   % 58
308                         R1 |   % 59
309                 }
310                 {
311                         R1 |   % 60
312                 }
313         }
314
315         r1^\fermata \bar "|."   % 61
316 }
317
318 BgXvoxATextA = \lyricmode
319 {
320 %\set associatedVoice = foo
321 %       Not
322 %       you __ _ _ _ _
323         you __ _ _
324 %\set associatedVoice = bg
325         ooo fai- thful _ ooo fai- thful _
326         Ah __ _ _ _ _ _ to com- plete it in you _
327 }
328
329
330 %
331 % Instrumental lines
332 %
333
334 RhythmB = \relative c'
335 {
336 %       \set Voice.autoBeaming = ##f
337 %       \set Staff.instrumentName = #"Rhythm"
338         \clef G
339         \key a \major
340         \time 4/4 
341         
342         \repeat volta 2
343         {
344                 \stemDown a'8 [ b cs b ~ ] b [ e ~ ] e4 |
345                 d8 [ e cs b ~ ] b2 |   % 4
346         }
347         \alternative
348         {
349                 {
350                         a8 [ b cs b ~ ] b [ e cs a ~ ] |
351                         \stemUp a1 |
352                 }
353                 {
354                         \stemDown a8 [ b cs b ~ ] b [ e cs a ~ ] |
355                         \stemUp a1 |
356                 }
357         }
358         \bar "||"
359
360         % Chorus
361
362         R1 |   % 9
363         R1 |
364         R1 |   % 11
365         R1 |
366         R1 |   % 13
367         R1 |
368         R1 |   % 15
369         R1 |
370         R1 |   % 17
371         R1 |
372         R1 |   % 19
373         R1 |
374         R1 |   % 21
375         R1 |
376
377         % Interlude
378
379         \stemDown a8 [ b cs b ~ ] b [ e ~ ] e4 |
380         d8 [ e cs b ~ ] b2 |   % 24
381         a8 [ b cs b ~ ] b [ e cs a ~ ] |
382         \stemUp a1 |   % 26
383
384         % Verse
385
386         R1 |
387         R1 |
388         R1 |   % 29
389         R1 |
390         R1 |   % 31
391         R1 |
392         R1 |   % 33
393         R1 |
394         R1 |   % 35
395         R1 |
396         R1 |   % 37
397         R1 |
398         R1 |   % 39
399         R1 |
400         R1 |   % 41
401         R1 | 
402
403         % Coda (chorus again)
404
405 \stopStaff s1 \startStaff
406 \set Score.currentBarNumber = #41
407
408         R1 \bar "||"   % 43
409         R1 |
410         R1 |   % 45
411         R1 |
412         R1 |   % 47
413         R1 |
414         R1 |   % 49
415         R1 |
416         R1 |   % 51
417         R1 |
418         R1 |   % 53
419         R1 |
420         R1 |   % 55
421         R1 |
422         R1 |   % 57
423
424         % Ending
425
426         \repeat volta 2
427         {
428                 \stemDown a8 [ b cs b ~ ] b [ e ~ ] e4 |
429                 d8 [ e cs b ~ ] b2 |   % 4
430         }
431         \alternative
432         {
433                 {
434                         a8 [ b cs b ~ ] b [ e cs a ~ ] |
435                         \stemUp a1 |
436                 }
437                 {
438                         \stemDown a8 [ b cs b ~ ] b [ e cs a ~ ] |
439                 }
440         }
441
442         \stemUp a1^\fermata \bar "|."
443 }
444
445
446 %
447 % Chord names
448 %
449
450 Chords = \chordmode
451 {
452 %Bah, can't we set this globally?
453 %\set chordNameExceptions = #popChords
454 %\set chordRootNamer = #chord-name->pop-markup
455
456 %       \popChords
457
458         \repeat volta 2
459         {
460                 a4. cs4.:m7 s4 |
461                 d4. e4.:sus4 e4 |   % 4
462         }
463         \alternative
464         {
465                 {
466                         a4. cs2:m7 d8 |
467                         s2 d/e |
468                 }
469                 {
470                         fs4.:m7 e2 d8 |
471                         s2 d/e |
472                 }
473         }
474
475         % Chorus
476
477         a4. e4./gs s4 |
478         d4./fs e4./gs s8 cs8:m7 |   % 10
479         s1 |
480         b2:m7 d/e |   % 12
481         a4. e/gs s4 |
482         d4./fs e2/gs cs8:sus4.7 |   % 14
483         s2. s8 cs:7 |
484         s1 |   % 16
485         b1:m7 |
486         e4.:sus4 e s4 |   % 18
487         b1:m7 |
488         e4.:sus4 e s8 d8 |   % 20
489         s4. a2/cs b8:m7 |
490         s2 d4/e e |   % 22
491
492         % Interlude
493
494         a4. cs4.:m7 s4 |
495         d4. e4.:sus4 e4 |   % 24
496         fs4.:m7 e2 d8 |
497         s2 d/e |   % 26
498
499         % Verse
500
501         a4. e/gs s4 |
502         d4./fs a/e s4 |   % 28
503         d4. cs:m7 s8 b8:m7 |
504         s4. b:m7/a s4 |   % 30
505         e4./gs d/fs s4 |
506         e1 |   % 32
507         a1 |
508 %       d1/e |   % 34
509 % alt:
510         c2/d d |   % 34
511
512         a4. e/gs s4 |
513         d4./fs a/e s4 |   % 36
514         d4. cs:m7 s4 |
515         b4.:m7 b:m7/a s4 |   % 38
516         e4./gs d/fs s4 |
517         e4.:sus4 e s4 |   % 40
518         a1 |
519 %       d1/e |   % 42
520 % alt:
521         c2/d d |   % 42
522
523         % Coda (chorus again)
524
525 s1 |
526         b2:m7 d4/e e |   % 43
527         a4. e4./gs s4 |
528         d4./fs e4./gs s8 cs8:m7 |   % 45
529         s1 |
530 %       b2:m7 d/e |   % 47
531 % On Ed's chart it's like so:
532         d/e |   % 47
533         a4. e/gs s4 |
534         d4./fs e2/gs cs8:sus4.7 |   % 49
535         s2. s8 cs:7 |
536         s1 |   % 51
537         b1:m7 |
538         e4.:sus4 e s4 |   % 53
539         b1:m7 |
540         e4.:sus4 e s8 d8 |   % 55
541         s4. a2/cs b8:m7 |
542         s2 d4/e e |   % 57
543
544         % Ending
545
546         \repeat volta 2
547         {
548                 a4. cs4.:m7 s4 |
549                 d4. e4.:sus4 e4 |   % 59
550         }
551         \alternative
552         {
553                 {
554                         a4. cs2:m7 d8 |
555                         s2 d/e |
556                 }
557                 {
558                         fs4.:m7 e2 d8 |
559                 }
560         }
561
562         s1 |
563 }
564
565
566 %
567 % Chord rhythms
568 %
569
570 % Use a RhythmicStaff on the chords instead of this?
571 % It almost works, but not quite. Doesn't collapse chords to single notes...
572
573 StaffC = \relative c
574 {
575 %       \set Voice.autoBeaming = ##f
576 %       \set Staff.instrumentName = #"Rhythm"
577         \time 4/4 
578         
579         \override NoteHead #'style = #'slash
580
581         \repeat volta 2
582         {
583                 \stemDown c'4. c8 ~ c4 c |   %1
584                 c4. c8 ~ c4 c |   % 2
585         }
586         \alternative
587         {
588                 {
589                         c4. c8 ~ c4. c8 ~ |   % 3
590                         c4 c c c |   % 4
591                 }
592                 {
593                         c4. c8 ~ c4. c8 ~ |   % 5
594                         c4 c c c |   % 6
595                 }
596         }
597         \bar "||"
598
599         % Chorus
600
601         c4. c8 ~ c4 c |   % 7
602         c4. c8-> c4 r8 c8 ~ |   % 8
603         c4 c c c |   % 9
604         c4 c c c |   % 10
605         c4. c8 ~ c4 c |   % 11
606         c4. c8 ~ c4. c8 ~ |   % 12
607         c4 c c r8 c8 ~ |   % 13
608         c4 c c c |   % 14
609
610         c4 c c c |   % 15
611         c4. c8 ~ c4 c |   % 16
612         c4 c c c |   % 17
613         c4. c8 ~ c4 r8 c8 ~ |   % 18
614         c4. c8 ~ c4. c8 ~ |   % 19
615         c4 c c c |   % 20
616
617         % Interlude
618
619         c4. c8 ~ c4 c |   % 21
620         c4. c8 ~ c4 c |   % 22
621         c4. c8 ~ c4. c8 ~ |   % 23
622         c4 c c c |   % 24
623
624         % Verse
625
626         c4. c8 ~ c4 c |   % 25
627         c4. c8 ~ c4 c |   % 26
628         c4. c8 ~ c4 r8 c8 ~ |   % 27
629         c4. c8 ~ c4 c |   % 28
630         c4. c8 ~ c4 c |   % 29
631         c4 c c c |   % 30
632         c4 c c c |   % 31
633         c4 c c c |   % 32
634
635         c4. c8 ~ c4 c |   % 33
636         c4. c8 ~ c4 c |   % 34
637         c4. c8 ~ c4 c |   % 35
638         c4. c8 ~ c4 c |   % 36
639         c4. c8 ~ c4 c |   % 37
640         c4. c8 ~ c4 c |   % 38
641         c4 c c c |   % 39
642         c4 c c c |   % 40
643
644         % Coda (chorus again)
645
646 \stopStaff s1 \startStaff
647 \set Score.currentBarNumber = #41
648
649         c4 c c c \bar "||"   % 41
650         c4. c8 ~ c4 c |   % 42
651         c4. c8-> c4 r8 c8 ~ |   % 43
652         c4 c c c |   % 44
653         c4 c c c |   % 45
654         c4. c8 ~ c4 c |   % 46
655         c4. c8 ~ c4. c8 ~ |   % 47
656         c4 c c r8 c8 ~ |   % 48
657         c4 c c c |   % 49
658
659         c4 c c c |   % 50
660         c4. c8 ~ c4 c |   % 51
661         c4 c c c |   % 52
662         c4. c8 ~ c4 r8 c8 ~ |   % 53
663         c4. c8 ~ c4. c8 ~ |   % 54
664         c4 c c c |   % 55
665
666         % Ending
667
668         \repeat volta 2
669         {
670                 \stemDown c4. c8 ~ c4 c |   % 56
671                 c4. c8 ~ c4 c |   % 57
672         }
673         \alternative
674         {
675                 {
676                         c4. c8 ~ c4. c8 ~ |   % 58
677                         c4 c c c |   % 59
678                 }
679                 {
680                         c4._\markup { \italic { rit. } } c8 ~ c4. c8 ~ |   % 60
681                 }
682         }
683
684         c1 ^\fermata \bar "|."   % 61
685 }
686
687
688 \score
689 {
690         <<
691                 \new ChoirStaff = "Vox"
692                 <<
693                         \new Staff = LeadVox { \new Voice = "lead" \LeadXvoxA }
694                         \new Lyrics \lyricsto "lead" \LeadXvoxATextA
695                         \new Staff = BgVox { \new Voice = "bg" \BgXvoxA }
696                         \new Lyrics \lyricsto "bg" \BgXvoxATextA
697                 >>
698
699                 \new ChoirStaff = "Rhythm"
700                 <<
701                         \new Staff = "riff" \RhythmB
702                         \new ChordNames = "chords" \Chords
703                         \new RhythmicStaff = "chordRhythm" \StaffC
704                 >>
705
706                 \set Score.skipBars = ##t
707                 \set Score.melismaBusyProperties = #'()
708         >>
709         \layout {
710 %               ragged-last-bottom = ##t
711                 ragged-last = ##t
712         }
713 }
714
715 \paper
716 {
717   #(define fonts (make-pango-font-tree
718     "Times New Roman"
719     "DomCasual BT"
720     "Luxi Mono"
721     (/ staffSize 20)))
722 }