2 \include "pop-chords.ly"
5 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
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 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))
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.5 (ly:music-property arg 'tweaks))) arg)
54 \mark \markup { \override #'(font-family . sans) { \box { A } } }
56 s1*16 \bar "||" % 7-22
60 \mark \markup { \override #'(font-family . sans) { \box { B } } }
76 \mark \markup { \override #'(font-family . sans) { \box { C } } }
84 \mark \markup { \override #'(font-family . sans) { \box { D } } }
114 LeadVox = \relative c'
127 a4. gs8 ~ gs a4. | % 7
128 cs4. gs8 ~ gs4 a8 a ~ | % 8
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
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
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
162 r4 fs8 b ~ b4 a8 a ~ | % 38
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
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
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
201 a2 \repeatTie r | % 68
205 b4 a8 b ~ b4 cs8 a ~ ( | % 69
215 LeadVoxText = \lyricmode
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. __ _ _ _ _
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. _
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. _
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. _
249 Jes -- sus is _ the way. __ _ _
252 LeadVoxTextB = \lyricmode
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. _ _ _ _
266 Riffs = \relative c''
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
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
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
356 s4. e2 d8:sus2 | % 45
360 s4. e2 d8:sus2 | % 49
403 \numericTimeSignature
404 \override NoteHead #'style = #'slash
426 c4 c8 c ~ c4 c | % 14
434 c4 c8 c ~ c4 c | % 22
460 c8 \repeatTie c c c c c c c | % 43
465 c4 c8 c ~ c4 c8 c ~ | % 45
469 c4 c8 c ~ c4 c8 c ~ | % 49
512 s4_\markup { \italic { Ac. gtr only } } s2. | % 1
516 s4_\markup { \italic { Band in } } s2. | % 5
524 \Global % The "roadmap" that everything else depends on
528 % \context Staff << \new Voice = "lead" \LeadVox \new Voice \Riffs >>
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
538 % \new ChordNames \Chords
540 \new ChordNames \transpose fs e \Chords
541 \new RhythmicStaff << \Rhythm \Dynamics >>
544 \set Score.skipBars = ##t
545 \set Score.melismaBusyProperties = #'()
552 #(define fonts (make-pango-font-tree
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)
565 % To find out what's eating the space at the top...
566 % annotate-spacing = ##t