]> Shamusworld >> Repos - music/blob - if-we-are-the-body.ly
New charts "How Great Thou Art" and "In The Garden".
[music] / if-we-are-the-body.ly
1 \version "2.19.0"
2 \include "pop-chords.ly"
3 \include "english.ly"
4
5 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
6 staffSize = #18
7 #(set-default-paper-size "letter")
8 #(set-global-staff-size staffSize)
9 #(ly:set-option (quote no-point-and-click))
10
11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
12
13 \header
14 {
15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "If We Are The Body" }
16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Casting Crowns" }
17 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
18         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
19 }
20
21 % Useful tweak abbreviations (hn = harmony note)
22
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
25
26   (set! (ly:music-property arg 'tweaks)
27     (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
28
29
30 %
31 % Song's structure
32 %
33 Global =
34 {
35 %       \key fs \minor
36 % Transposed edition
37         \key e \minor
38         \numericTimeSignature
39         \time 4/4
40
41         % Intro
42
43         \repeat volta 2
44         {
45                 s1*2 |   % 1-2
46         }
47
48         \repeat volta 2
49         {
50                 % Verse
51
52                 s1*4 \bar "||"   % 3-6
53
54                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
55
56                 s1*16 \bar "||"   % 7-22
57
58                 % Chorus
59
60                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
61
62                 s1*15 |   % 23-37
63         }
64         \alternative
65         {
66                 {
67                         s1*5 |   % 38-42
68                 }
69                 {
70                         s1 |   % 43
71                 }
72         }
73
74         % Bridge
75
76         \mark \markup { \override #'(font-family . sans) { \box { C } } }
77
78         s1*8 |   % 44-51
79
80         \repeat volta 2
81         {
82                 % Chorus
83
84                 \mark \markup { \override #'(font-family . sans) { \box { D } } }
85
86                 s1*14 |   % 52-65
87         }
88         \alternative
89         {
90                 {
91                         s1*2 |   % 66-67
92                 }
93                 {
94                         s1 |   % 68
95                 }
96         }
97
98         % Outro
99
100         s1*3 |   % 69-71
101
102         \repeat volta 2
103         {
104                 s1*2 |   % 72-73
105         }
106
107         s1 \bar "|."   % 74
108 }
109
110
111 %
112 % Lead vocal
113 %
114 LeadVox = \relative c'
115 {
116         \clef G
117
118         % Intro
119
120         s1*2 |   % 1-2
121
122         % Verse
123
124         s1*3 |   % 3-5
125         s2.. fs8 |   % 6
126
127         a4. gs8 ~ gs a4. |   % 7
128         cs4. gs8 ~ gs4 a8 a ~ |   % 8
129         a4 r r2 |   % 9
130         r4 fs8 b ~ b a4 a8 ~ |   % 10
131         a4 r r r8 <\hn ds,> |   % 11
132         fs4. gs8 ~ gs a4. |   % 12
133         b4 a gs a8 cs ~ |   % 13
134         cs8 b4. r4 r8 cs,8 |   % 14
135         gs'4. a8 ~ a b4. |   % 15
136         gs4. a8 ~ a cs4. |   % 16
137         gs4. a8 ~ a b4. |   % 17
138         b4 a8 b ~ b cs4 << { \voiceTwo a8 ~ } \new Voice = "v" { \voiceOne <\hn b>8 ~ } >> |   % 18
139         << { \voiceTwo a2 } \context Voice = "v" { \voiceOne <\hn b>8 <\hn a>4. } >> \oneVoice r4 r8 <\hn fs> |   % 19
140         <\hn cs'>8 <\hn b> b a b a4 a8 ~ ( |   % 20
141         a8 fs4. ~ fs8 e4. ) |   % 21
142         r2 r4 a8 a |   % 22
143
144         % Chorus
145
146         cs8 b a b a4 r |   % 23
147         r4 e'8 e ~ e e4 e8 ~ |   % 24
148         e4.cs8 ~ cs b4. |   % 25
149         r4 e8 e ~ e fs4 e8 ~ |   % 26
150         e4. b8 ~ b a4. |   % 27
151         r4 a8 a ~ a b4 cs8 ~ |   % 28
152         cs4. b8 ~ b a4. |   % 29
153         r2 r4 a8 a |   % 30
154         cs8 b a b a4 r |   % 31
155         r4 e'8 e ~ e e4 e8 ~ |   % 32
156         e4. cs8 ~ cs b4. |   % 33
157         r4 e8 e ~ e e4 fs8 ~ |   % 34
158         fs4 cs b8 a4 e'8 ~ |   % 35
159         e4 cs8 d ~ d4 cs8 a ~ |   % 36
160         a2 r2 |   % 37
161
162         r4 fs8 b ~ b4 a8 a ~ |   % 38
163         a4 s2. |   % 39
164         s1 |   % 40
165         s1 |   % 41
166         s1 |   % 42
167
168         r1 |   % 43
169
170         % Bridge
171
172         e'4. e8 ~ e4 e |   % 44
173         fs4 cs b a8 a ~ |   % 45
174         a4 r r8 fs a fs |   % 46
175         cs'8 cs cs4 b a8 b ~ |   % 47
176         b4 r8 a cs e cs fs ~ |   % 48
177         fs4. b,8 ~ b a4 a8 ~ |   % 49
178         a4 r r2 |   % 50
179         r2 r4 r8 e |   % 51
180
181         % Chorus
182
183         cs'8 b a b a4 r |   % 52
184         r4 e'8 e ~ e e4 e8 ~ |   % 53
185         e4.cs8 ~ cs b4. |   % 54
186         r4 e8 e ~ e fs4 e8 ~ |   % 55
187         e4. b8 ~ b a4. |   % 56
188         r4 a8 a ~ a b4 cs8 ~ |   % 57
189         cs4. b8 ~ b a4. |   % 58
190         r2 r4 a8 a |   % 59
191         cs8 b a b a4 r |   % 60
192         r4 e'8 e ~ e e4 e8 ~ |   % 61
193         e4. cs8 ~ cs b4. |   % 62
194         r4 e8 e ~ e e4 fs8 ~ |   % 63
195         fs4 cs b8 a4 e'8 ~ |   % 64
196         e4 cs8 d ~ d4 cs8 a ~ |   % 65
197
198         a2 r |   % 66
199         r2 r4 r8 a |   % 67
200
201         a2 \repeatTie r |   % 68
202
203         % Outro
204
205         b4 a8 b ~ b4 cs8 a ~ ( |   % 69
206         a8 fs ) s2. |   % 70
207         s1 |   % 71
208
209         s1*2 |   % 72-73
210
211         s1 |   % 74
212 }
213
214
215 LeadVoxText = \lyricmode
216 {
217         It’s crowd -- ed _ in wor -- ship _ to -- day, _
218         and she _ slips in, _
219         _ try -- ing _ to fade in -- to the fac -- _ es.
220         The girls’ teas -- _ ing laugh -- ter _ is car -- ry -- _ ing
221         far -- ther than _ they know, _
222         _ _ _ far -- ther than they know. __ _ _ _ _
223
224         But if we are the bo -- dy,
225         why aren’t _ his arms _ reach -- _ ing,
226         why aren’t _ his hands _ heal -- _ ing,
227         why aren’t _ his words _ teach -- _ ing?
228         And if we are the bo -- dy,
229         why aren’t _ his feet _ go -- _ ing,
230         why is _ his love _ not show -- ing them _ there is _ a way. _
231         There is _ a way. _
232
233         Je -- sus _ paid much too high a price _
234         for us to pick and choose who should come, _
235         and we are the bo -- _ dy _ of Christ. _
236
237         If we are the bo -- dy,
238         why aren’t _ his arms _ reach -- _ ing,
239         why aren’t _ his hands _ heal -- _ ing,
240         why aren’t _ his words _ teach -- _ ing?
241         And if we are the bo -- dy,
242         why aren’t _ his feet _ go -- _ ing,
243         why is _ his love _ not show -- ing them _ there is _ a way. _
244
245         If
246
247         _
248
249         Jes -- sus is _ the way. __ _ _
250 }
251
252 LeadVoxTextB = \lyricmode
253 {
254         A trav -- ’ler _ is far a -- way from home; _
255         he sheds _ his coat _
256         and qui -- et -- _ ly sinks in -- to the back _ row.
257         The weight of _ their judg -- men -- _ tal glanc -- es _
258         tells him _ that _ his chanc -- es
259         are bet -- ter out _ on the road. _ _ _ _
260 }
261
262
263 %
264 % Riffs
265 %
266 Riffs = \relative c''
267 {
268         % Intro
269
270         \tiny
271         <a e>4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 1
272         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4. |   % 2
273         <a e>4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 3
274         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4. |   % 4
275         <a e>4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 5
276         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4 s8 |   % 6
277
278         s1*32 |   % 7-38
279
280         s4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 39
281         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4. |   % 40
282         <a e>4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 41
283         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4. |   % 42
284
285         s1*27 |   % 43-69
286
287         s4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 70
288         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4. |   % 71
289         <a e>4 <a e>4 ~ <a e>8 <a e>4 <gs e>8 ~ |   % 72
290         <gs e>8 <a e>4 <gs e>8 ~ <gs e> <a e>4. |   % 73
291         <fs a cs e>1-\fermata |   % 74
292 }
293
294
295 %
296 % Chord names
297 %
298 Chords = \chordmode
299 {
300         % Intro
301
302         fs1:m7 |   % 1
303         s1 |   % 2
304
305         % Verse
306
307         fs1:m7 |   % 3
308         s1*3 |   % 4-6
309
310         fs1:m7 |   % 7
311         s1 |   % 8
312         d1:sus2 |   % 9
313         s1 |   % 10
314         b1:sus4.7 |   % 11
315         b1:7 |   % 12
316         d1:sus2 |   % 13
317         e4.:sus4 e s4 |   % 14
318         fs1:m7 |   % 15
319         s1 |   % 16
320         d1:sus2 |   % 17
321         s1 |   % 18
322         b1:sus4.7 |   % 19
323         b1:7 |   % 20
324         d1:sus2 |   % 21
325         e4.:sus4 e s4 |   % 22
326
327         % Chorus
328
329         a1 |   % 23
330         s1 |   % 24
331         e2:sus4 e |   % 25
332         e2:sus4 e:5^3 |   % 26
333         fs1:m11 |   % 27
334         s1 |   % 28
335         d1 |   % 29
336         s1 |   % 30
337         a1 |   % 31
338         s1 |   % 32
339         e2:sus4 e |   % 33
340         e2:sus4 e:5^3 |   % 34
341         fs2..:m11 e8 |   % 35
342         s1 |   % 36
343         d1:9^7 |   % 37
344
345         s1 |   % 38
346         fs1:m7 |   % 39
347         s1 |   % 40
348         s1 |   % 41
349         s1 |   % 42
350
351         s1 |   % 43
352
353         % Bridge
354
355         e2.. fs8:m |   % 44
356         s4. e2 d8:sus2 |   % 45
357         s1 |   % 46
358         s2.. e8 |   % 47
359         s2.. fs8:m |   % 48
360         s4. e2 d8:sus2 |   % 49
361         s1 |   % 50
362         s1 |   % 51
363
364         % Chorus
365
366         a1 |   % 52
367         s1 |   % 53
368         e2:sus4 e |   % 54
369         e2:sus4 e:5^3 |   % 55
370         fs1:m11 |   % 56
371         s1 |   % 57
372         d1 |   % 58
373         s1 |   % 59
374         a1 |   % 60
375         s1 |   % 61
376         e2:sus4 e |   % 62
377         e2:sus4 e:5^3 |   % 63
378         fs2..:m11 e8 |   % 64
379         s1 |   % 65
380
381         d1:9^7 |   % 66
382         s1 |   % 67
383
384         d1:9^7 |   % 68
385
386         % Outro
387
388         s1 |   % 69
389         fs1:m7 |   % 70
390         s1 |   % 71
391
392         s1*2 |   % 72-73
393
394         s1 |   % 74
395 }
396
397
398 %
399 % Chord rhythms
400 %
401 Rhythm =
402 {
403         \numericTimeSignature
404         \override NoteHead #'style = #'slash
405         \teeny
406
407         % Intro
408
409         c4 c c c |   % 1
410         c4 c c c |   % 2
411
412         % Verse
413
414         c4 c c c |   % 3
415         c4 c c c |   % 4
416         c4 c c c |   % 5
417         c4 c c c |   % 6
418
419         c4 c c c |   % 7
420         c4 c c c |   % 8
421         c4 c c c |   % 9
422         c4 c c c |   % 10
423         c4 c c c |   % 11
424         c4 c c c |   % 12
425         c4 c c c |   % 13
426         c4 c8 c ~ c4 c |   % 14
427         c4 c c c |   % 15
428         c4 c c c |   % 16
429         c4 c c c |   % 17
430         c4 c c c |   % 18
431         c4 c c c |   % 19
432         c4 c c c |   % 20
433         c4 c c c |   % 21
434         c4 c8 c ~ c4 c |   % 22
435
436         % Chorus
437
438         c4 c c c |   % 23
439         c4 c c c |   % 24
440         c4 c c c |   % 25
441         c4 c c c |   % 26
442         c4 c c c |   % 27
443         c4 c c c |   % 28
444         c4 c c c |   % 29
445         c4 c c c |   % 30
446         c4 c c c |   % 31
447         c4 c c c |   % 32
448         c4 c c c |   % 33
449         c4 c c c |   % 34
450         c4 c c c8 c ~ |   % 35
451         c4 c c c |   % 36
452         c4 c c c |   % 37
453
454         c4 c c c |   % 38
455         c4 c c c |   % 39
456         c4 c c c |   % 40
457         c4 c c c |   % 41
458         c4 c c c |   % 42
459
460         c8 \repeatTie c c c c c c c |   % 43
461
462         % Bridge
463
464         c4 c c c8 c ~ |   % 44
465         c4 c8 c ~ c4 c8 c ~ |   % 45
466         c4 c c c |   % 46
467         c4 c c c8 c ~ |   % 47
468         c4 c c c |   % 48
469         c4 c8 c ~ c4 c8 c ~ |   % 49
470         c4 c c c |   % 50
471         c4 c c c |   % 51
472
473         % Chorus
474
475         c4 c c c |   % 52
476         c4 c c c |   % 53
477         c4 c c c |   % 54
478         c4 c c c |   % 55
479         c4 c c c |   % 56
480         c4 c c c |   % 57
481         c4 c c c |   % 58
482         c4 c c c |   % 59
483         c4 c c c |   % 60
484         c4 c c c |   % 61
485         c4 c c c |   % 62
486         c4 c c c |   % 63
487         c4 c c c8 c ~ |   % 64
488         c4 c c c |   % 65
489
490         c4 c c c |   % 66
491         c4 c c c |   % 67
492
493         c4 c c c |   % 68
494
495         % Outro
496
497         c4 c c c |   % 69
498         c4 c c c |   % 70
499         c4 c c c |   % 71
500
501         c4 c c c |   % 72
502         c4 c c c |   % 73
503
504         c1-\fermata |   % 74
505 }
506
507
508 Dynamics =
509 {
510 %{
511         % Intro
512         s4_\markup { \italic { Ac. gtr only } } s2. |   % 1
513
514         s1*3 |   % 2-4
515
516         s4_\markup { \italic { Band in } } s2. |   % 5
517 %}
518 }
519
520
521 \score
522 {
523         <<
524                 \Global         % The "roadmap" that everything else depends on
525
526                 \context Staff
527                 <<
528 %                       \context Staff << \new Voice = "lead" \LeadVox \new Voice \Riffs >>
529 % Transposed edition
530                         \new Voice = "lead" \transpose fs e \LeadVox
531                         \new Voice \transpose fs e \Riffs
532                         \new Lyrics \lyricsto "lead" \LeadVoxText
533                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
534                 >>
535
536                 \new ChoirStaff
537                 <<
538 %                       \new ChordNames \Chords
539 %Capo 3 edition
540                         \new ChordNames \transpose fs e \Chords
541                         \new RhythmicStaff << \Rhythm \Dynamics >>
542                 >>
543
544                 \set Score.skipBars = ##t
545                 \set Score.melismaBusyProperties = #'()
546         >>
547 }
548
549
550 \paper
551 {
552         #(define fonts (make-pango-font-tree
553                 "Times New Roman"
554                 "LilyJAZZText"
555                 "Luxi Mono"
556                 (/ staffSize 20)))
557
558 % Don't spread staves vertically across last page (default: t)
559 %       ragged-last-bottom = ##f
560 % Don't spread staves vertically across the page (default: f)
561 %       ragged-bottom = ##t
562 % Allow partial line for last stave (default: f)
563         ragged-last = ##t
564
565 % To find out what's eating the space at the top...
566 %       annotate-spacing = ##t
567 }
568