]> Shamusworld >> Repos - music/blob - the-heart-of-worship.ly
New charts "How Great Thou Art" and "In The Garden".
[music] / the-heart-of-worship.ly
1 % Still needs hairpins/etc
2
3 \version "2.19.0"
4 \include "pop-chords.ly"
5 \include "english.ly"
6
7 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
8 staffSize = #16
9 #(set-default-paper-size "letter")
10 #(set-global-staff-size staffSize)
11 #(ly:set-option (quote no-point-and-click))
12
13 \header
14 {
15         title    = \markup { \override #'(font-family . sans)
16                 { \fontsize #3.5 "The Heart Of Worship" } }
17         composer = \markup { \override #'(font-family . sans) "Michael W. Smith" }
18         arranger = \markup { \override #'(font-family . sans) "arr. Ed Smart" }
19         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
20 }
21
22
23 %
24 % Song's structure
25 %
26 Global =
27 {
28         \clef G
29         \key d \major
30         \numericTimeSignature
31         \time 4/4
32
33         % Intro
34
35         s8^\markup { \hspace #0.0 \raise #1.5 { 8th note ballad } } s2.. |   % 1
36         s1*4 \normalsize \bar ".|:-||"   % 2-5
37
38         \repeat volta 2
39         {
40                 % Verse
41
42                 \once \override Score.RehearsalMark #'self-alignment-X = #left
43                 \mark \markup { \override #'(font-family . sans) { \box { A } } \italic { 1st time piano } }
44
45                 s1*8 \bar "||"   % 6-13
46
47                 % Prechorus
48
49                 \once \override Score.RehearsalMark #'self-alignment-X = #left
50                 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" \italic { band in } }
51
52                 s1*8 \bar "||"   % 14-21
53
54                 % Chorus
55
56                 \once \override Score.RehearsalMark #'self-alignment-X = #left
57                 \mark \markup { \override #'(font-family . sans) { \box { C } } \italic { snare } }
58
59                 s1*7 |   % 22-28
60                 \once \override Score.RehearsalMark #'self-alignment-X = #right
61                 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
62         }
63         \alternative
64         {
65                 {
66                         s1*3 |   % 29-31
67                 }
68                 {
69                         s1 \bar "||"   % 32
70                 }
71         }
72
73         % Solo
74
75         \once \override Score.RehearsalMark #'self-alignment-X = #left
76         \mark \markup { \override #'(font-family . sans) { \box { D } } \italic { solo } }
77
78         s1*8 \bar "||"   % 33-40
79
80         \once \override Score.RehearsalMark #'self-alignment-X = #right
81         \mark \markup { \italic { D.S. al Coda } }
82
83         % Coda
84
85 %\stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
86 \stopStaff s1 \startStaff
87 \set Score.currentBarNumber = #41
88
89         \once \override Score.RehearsalMark #'self-alignment-X = #left
90         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
91
92         s1 \bar "||"   % 41
93
94         \mark \markup { \override #'(font-family . sans) { \box { E } } }
95         s1*13 \bar "|."   % 42-54
96 }
97
98
99 %
100 % Lead vocal
101 %
102 LeadVox = \relative c''
103 {
104         % Intro
105
106         s1*5 |   % 1-5
107
108         % Verse
109
110         r4. a16 a a8 d,4 e8 ~ |   % 6
111         e2 fs8 e e d16 d ~ |   % 7
112         d4. a'16 a a8 d,4 e8 ~ |   % 8
113         e2 r |   % 9
114         r4. a16 a a8 d,4 e8 ~ |   % 10
115         e2 fs8 e e d16 d ~ |   % 11
116         d4. a'16 a a8 d,4 e8 ~ |   % 12
117         e2 r |   % 13
118
119         % Prechorus
120
121         r8 g g g fs e d e ~ |   % 14
122         e4. e16 d fs8 e d b |   % 15
123         r8 g' g g fs e d e ~ |   % 16
124         e2 r |   % 17
125         r8 g g g fs e d e ~ |   % 18
126         e4. e16 d fs8 e d b |   % 19
127         r8 g' g g a fs b fs16 e ~ |   % 20
128         e2 r |   % 21
129
130         % Chorus
131
132         r8 a a a a d, d b' ~ |   % 22
133         b8 a4 fs8 ~ fs e r d16 d |   % 23
134         fs8 fs16 g ~ g8 fs ~ fs2 |   % 24
135         fs8 fs16 g ~ g8 fs ~ fs e4 d8 |   % 25
136         r8 a' a a a d, d b' ~ |   % 26
137         b8 a4 fs8 ~ fs e r d16 d |   % 27
138         fs8 fs16 g ~ g8 fs ~ fs2 |   % 28
139
140         fs8 fs16 g ~ g8 fs ~ fs e4 d8 ~ |   % 29
141         d2 r |   % 30
142         R1 |   % 31
143
144         fs8 fs16 g ~ g8 fs ~ fs e4 d8 ~ |   % 32
145
146         % Solo
147
148         d2 r |   % 33
149         R1*7 |   % 33-40
150
151         % Coda
152
153         s1 % blank bar for coda
154
155         fs8 fs16 g ~ g8 fs ~ fs e4 d8 |   % 41
156
157         r8 a' a a a d, d b' ~ |   % 42
158         b8 a4 fs8 ~ fs e r d16 d |   % 43
159         fs8 fs16 g ~ g8 fs ~ fs2 |   % 44
160         fs8 fs16 g ~ g8 fs ~ fs e4 d8 |   % 45
161         r8 a' a a a d, d b' ~ |   % 46
162         b8 a4 fs8 ~ fs e r d16 d |   % 47
163         fs8 fs16 g ~ g8 fs ~ fs2 |   % 48
164         fs8 fs16 g ~ g8 fs ~ fs e4 d16 d |   % 49
165
166         fs8 fs16 g ~ g8 fs ~ fs2 |   % 50
167         fs8 fs16 g ~ g8 fs ~ fs e4 d16 d |   % 51
168
169         fs8 fs16 g ~ g8 fs ~ fs2 |   % 50
170         fs8 fs16 g ~ g8 fs ~ fs e4 d8 ~ |   % 53
171         d1^\fermata |   % 54
172 }
173
174
175 LeadVoxText = \lyricmode
176 {
177         When the mu- sic fades _ all is stripped a- way _
178         And I simp- ly come _
179         Long- ing just to bring _ some- thing that's of worth _
180         That will bless your heart _
181
182         I'll bring you more than a song _
183         for a song in it- self
184         Is not what you have re- quired _
185         You see much deep- er with- in _
186         through the way things ap- pear
187         You're look- ing in- to my heart __ _ _
188
189         I'm com- ing back to the heart _ of wor- _ ship
190         and it's all a- bout _ you, _ all a- bout _ you _ Je- sus
191         I'm sor- ry Lord for the thing _ I've made _ it
192         when it's all a- bout _ you, _ all a- bout _ you _ Je- sus _
193
194         all a- bout _ you _ Je- sus _
195         all a- bout _ you _ Je- sus
196
197         I'm com- ing back to the heart _ of wor- _ ship
198         and it's all a- bout _ you, _ all a- bout _ you _ Je- sus
199         I'm sor- ry Lord for the thing _ I've made _ it
200         when it's all a- bout _ you, _ all a- bout _ you _ Lord
201         when it's all a- bout _ you, _ all a- bout _ you _ Lord
202         when it's all a- bout _ you, _ all a- bout _ you _ Je- sus
203 }
204
205 LeadVoxTextB = \lyricmode
206 {
207         King of end- less worth _ no one could ex- press _
208         How much you de- serve _
209         Though I'm weak and poor _ all I have is yours _
210         Ev- ery sin- gle breath _
211 }
212
213
214 %
215 % Riffs
216 %
217 Riffs = \relative c''
218 {
219         % Intro
220
221         \tiny
222         r8 a a a a d, d b' ~ |   % 1
223         b8 a4 fs8 ~ fs e4 d16 d |   % 2
224         fs8 fs16 g ~ g8 fs ~ fs2 |   % 3
225         fs8 fs16 g ~ g8 fs ~ fs e4. ~ |   % 4
226         e1 |   % 5
227         \normalsize
228 }
229
230
231 %
232 % Chord names
233 %
234 Chords = \chordmode
235 {
236         % Intro
237
238         d1 |   % 1
239         a1:sus2/cs |   % 2
240         e4.:m7 d:sus2/fs s4 |   % 3
241         g4. a:sus4 s4 |   % 4
242         a1 |   % 5
243
244         % Verse
245
246         d1 |   % 6
247         a1 |   % 7
248         e1:m7 |   % 8
249         a2:sus4 a |   % 9
250         d1 |   % 10
251         a1:sus2/cs |   % 11
252         e1:m7 |   % 12
253         a2:sus4 a |   % 13
254
255         % Prechorus
256
257         e2:m7 d:sus2/fs |   % 14
258         a2:sus4 d/fs |   % 15
259         e2:m7 d:sus2/fs |   % 16
260         a2:sus4 a |   % 17
261         e2:m7 d:sus2/fs |   % 18
262         a2:sus4 d/fs |   % 19
263         e2:m7 d:sus2/fs |   % 20
264         a2:sus4 a |   % 21
265
266         % Chorus
267
268         d1 |   % 22
269         a1:sus2/cs |   % 23
270         e4.:m7 d:sus2/fs s4 |   % 24
271         g4. a:sus4 a4 |   % 25
272         d1 |   % 26
273         a1:sus2/cs |   % 27
274         e4.:m7 d:sus2/fs s4 |   % 28
275
276         g4. a:sus4 a4 |   % 29
277         d1 |   % 30
278         a2:sus4 a |   % 31
279
280         g4. a:sus4 a4 |   % 32
281
282         % Solo
283
284         d1 |   % 33
285         a1:sus2/cs |   % 34
286         e4.:m7 d:sus2/fs s4 |   % 35
287         g4. a:sus4 a4 |   % 36
288         d1 |   % 37
289         a1:sus2/cs |   % 38
290         e4.:m7 d:sus2/fs s4 |   % 39
291         g4. a:sus4 a4 |   % 40
292
293         % Coda
294
295         s1 % blank bar for coda
296
297         g4. a:sus4 a4 |   % 41
298         d1 |   % 42
299         a1:sus2/cs |   % 43
300         e4.:m7 d:sus2/fs s4 |   % 44
301         g4. a:sus4 a4 |   % 45
302         d1 |   % 46
303         a1:sus2/cs |   % 47
304         e4.:m7 d:sus2/fs s4 |   % 48
305         g4. a:sus4 a4/fs |   % 49
306         e4.:m7 d:sus2/fs s4 |   % 50
307         g4. a:sus4 a4/fs |   % 51
308         e4.:m7 d:sus2/fs s4 |   % 52
309         g4. a:sus4 a4 |   % 53
310         d1 |   % 54
311 }
312
313
314 %
315 % Chord rhythms
316 %
317 StaffC = \relative c
318 {
319         \numericTimeSignature
320         \override NoteHead #'style = #'slash
321         \teeny
322
323         % Intro
324
325         c4-\f c c c |   % 1
326         c4 c c c |   % 2
327         c4.-> c8-> ~ c4 c |   % 3
328         c4.-> c8-> ~ c2 |   % 4
329         c1 |   % 5
330
331         % Verse
332
333         c4-\mp c c c |   % 6
334         c4 c c c |   % 7
335         c4 c c c |   % 8
336         c4 c c c |   % 9
337         c4 c c c |   % 10
338         c4 c c c |   % 11
339         c4 c c c |   % 12
340         c4 c c c |   % 13
341
342         % Prechorus
343
344         c4-\mf c c c |   % 14
345         c4 c c c |   % 15
346         c4 c c c |   % 16
347         c4 c c c |   % 17
348         c4 c c c |   % 18
349         c4 c c c |   % 19
350         c4 c c c |   % 20
351         c4 c c c |   % 21
352
353         % Chorus
354
355         c4-\f c c c |   % 22
356         c4 c c c |   % 23
357         c4.-> c8-> ~ c4 c |   % 24
358         c4.-> c8-> ~ c4 c |   % 25
359         c4 c c c |   % 26
360         c4 c c c |   % 27
361         c4.-> c8-> ~ c4 c |   % 28
362
363         c4.-> c8-> ~ c4 c |   % 29
364         c4 c c c |   % 30
365         c4 c c c |   % 31
366
367         c4.-> c8-> ~ c4 c |   % 32
368
369         % Solo
370
371         c4 c c c |   % 33
372         c4 c c c |   % 34
373         c4.-> c8-> ~ c4 c |   % 35
374         c4.-> c8-> ~ c4 c |   % 36
375         c4 c c c |   % 37
376         c4 c c c |   % 38
377         c4.-> c8-> ~ c4 c |   % 39
378         c4.-> c8-> ~ c4 c |   % 40
379
380         % Coda
381
382 \stopStaff s1 \startStaff |
383
384         c4.-> c8-> ~ c4 c |   % 41
385         c4 c c c |   % 42
386         c4 c c c |   % 43
387         c4.-> c8-> ~ c4 c |   % 44
388         c4.-> c8-> ~ c4 c |   % 45
389         c4 c c c |   % 46
390         c4 c c c |   % 47
391         c4.-> c8-> ~ c4 c |   % 48
392         c4.-> c8-> ~ c4 c |   % 49
393         c4.-> c8-> ~ c4 c |   % 50
394         c4.-> c8-> ~ c4 c |   % 51
395         c4.-> c8-> ~ c4 c |   % 52
396         c4.-> c8->_\markup { \italic { rit. } } ~ c4 c |   % 53
397         c1^\fermata |   % 54
398 }
399
400
401 \score
402 {
403         <<
404                 \Global         % The "roadmap" that everything else depends on
405
406                 \context Staff
407                 <<
408                         \new Voice = "lead" \LeadVox
409                         \new Voice \Riffs
410                         \new Lyrics \lyricsto "lead" \LeadVoxText
411                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
412                 >>
413
414                 \new ChoirStaff
415                 <<
416                         \new ChordNames \Chords
417                         \new RhythmicStaff \StaffC
418                 >>
419
420                 \set Score.skipBars = ##t
421                 \set Score.melismaBusyProperties = #'()
422         >>
423 }
424
425
426 \paper
427 {
428         #(define fonts (make-pango-font-tree
429                 "Times New Roman"
430                 "LilyJAZZText"
431                 "Luxi Mono"
432                 (/ staffSize 20)))
433
434 % Don't spread staves vertically across last page (default: t)
435 %       ragged-last-bottom = ##f
436 % Don't spread staves vertically across the page (default: f)
437 %       ragged-bottom = ##t
438 % Allow partial line for last stave (default: f)
439         ragged-last = ##t
440
441 % To find out what's eating the space at the top...
442 %       annotate-spacing = ##t
443 }
444