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))
11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
15 %Let's bump up the title size and switch to the chord font. :-)
17 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "As The Deer" }
18 % composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
19 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
20 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
23 % Useful tweak abbreviations (hn = harmony note)
25 hn = #(define-music-function (parser location arg) (ly:music?)
26 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
28 (set! (ly:music-property arg 'tweaks)
29 (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
43 \once \override TextScript #'padding = #2.0
44 s1*0^\markup { \large { Moderate ballad } }
51 \mark \markup { \override #'(font-family . sans) { \box { A } } }
58 \mark \markup { \override #'(font-family . sans) { \box { B } } }
72 % A section (modulation)
76 \once \override Score.RehearsalMark #'padding = #2.0
77 \mark \markup { \override #'(font-family . sans) { \box { C } } }
85 \mark \markup { \override #'(font-family . sans) { \box { D } } }
109 LeadVox = \relative c'
112 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
123 a'4 a8 a g4. f8 | % 7
126 c4. d8 f ( e ) d c | % 10
132 <c' \hn a \hn e>4 <c \hn a \hn e> <c \hn g \hn e> <c \hn g \hn e>8 <b \hn g \hn e> | % 13
133 <a \hn f \hn c>4 <a \hn d, \hn b> <g \hn e \hn c>4. <\hn e c>8 | % 14
134 <a \hn f \hn d>4 <a \hn f \hn d> <a \hn f \hn c> <a \hn f \hn c>8 [ <g \hn e \hn c> ] | % 15
135 <f \hn d \hn a>4 <f \hn d \hn a>
136 << { \voiceOne <e \hn b>2 } \new Voice = "v" { \voiceTwo <\hn a,>4 ( <\hn gs> ) } >> \oneVoice | % 16
138 c4. d8 f ( e ) d c | % 18
145 % A section (modulation)
148 d4. e8 g fs e d | % 23
149 b'4. b8 a4. g8 | % 24
152 d4. e8 g fs e d | % 27
153 d4. fs8 e4. d8 | % 28
158 <d' \hn b \hn fs>4 <d \hn b \hn fs> <d \hn a \hn fs> <d \hn a \hn fs>8 <cs \hn a \hn fs> | % 30
159 <b \hn g \hn d>4 <b \hn e, \hn cs> <a \hn fs \hn d>4. <\hn fs d>8 | % 31
160 <b \hn g \hn e>4 <b \hn g \hn e> <b \hn g \hn d> <b \hn g \hn d>8 <a \hn fs \hn d> | % 32
161 <g \hn e \hn b>4 <g \hn e \hn b>
162 % << { \voiceOne <fs \hn cs>2 } \new Voice = "v" { \voiceTwo \override NoteHead #'font-size = #-3.5 b,4 ( as ) \override NoteHead #'font-size = #1.0 } >> \oneVoice | % 33
163 << { \voiceOne <fs \hn cs>2 } \new Voice = "v" { \voiceTwo <\hn b,>4 ( <\hn as> ) } >> \oneVoice | % 33
164 fs'4 a a fs8 e | % 34
165 d4. e8 g fs e d | % 35
166 d4. fs8 e4. d8 | % 36
174 d4. fs8 e4. d8 | % 39
176 d4. fs8 e4. d8 | % 41
177 << { \voiceOne d1 } \context Voice = v { \voiceThree s1 } >> \oneVoice | % 42
183 LeadVoxText = \lyricmode
185 As the deer pant -- eth for the wa -- ter
186 so my soul long -- eth a -- fter thee,
188 You a -- lone are my heart’s de -- sire _
189 and I long to wor -- ship thee. _
191 You a -- lone are my strength my shield;
192 To you a -- lone may my spi -- rit yield.
194 You a -- lone are my heart’s de -- sire _
195 and I long to wor -- ship thee.
199 I want you more than gold or sil -- ver,
200 on -- ly you can sa -- tis -- fy.
202 You a -- lone are the real joy gi -- ver
203 and the ap -- ple of my eye. _
205 You a -- lone are my strength my shield;
206 To you a -- lone may my spi -- rit yield.
208 You a -- lone are my heart’s de -- sire _
209 and I long to wor -- ship thee.
213 and I long to wor -- ship thee, _
214 and I long to wor -- ship thee.
217 LeadVoxTextB = \lyricmode
219 You’re my friend and you are my bro -- ther
220 e -- ven though you _ are a king,
222 I love you more than a -- ny o -- ther
223 so much more than a -- ny -- thing. _
242 << { \voiceOne s1 } \context Voice = v { \voiceThree \tiny fs4 a a fs8 e \normalsize } >> \oneVoice | % 42
243 d4. e8 g fs e d | % 43
269 d2:m7 g4:sus4 g | % 11
275 f4 g:sus2/f c2/e | % 14
277 d2:m/b e4:sus4 e | % 16
280 d2:m g4:sus4 g | % 19
286 % A section (modulation)
294 e2:m a4:sus4 a | % 28
300 g4 a:sus2/g d2/fs | % 31
302 e2:m/cs fs4:sus4 fs | % 33
305 e2:m7 a4:sus4 a | % 36
313 e2:m7 a4:sus4 a | % 39
315 e2:m7 a4:sus4 a | % 41
326 % Use a RhythmicStaff on the chords instead of this?
327 % It almost works, but not quite. Doesn't collapse chords above to single notes...
331 \numericTimeSignature
332 \override NoteHead #'style = #'slash
367 % A section (modulation)
408 s2 s4_\markup { \italic { rit. } } s | % 18
409 s4_\markup { \italic { A tempo } } s2. | % 19
413 s2 s4_\markup { \italic { rit. } } s | % 33
414 s4_\markup { \italic { A tempo } } s2. | % 34
418 s2 s4_\markup { \italic { rit. } } s | % 41
427 \Global % The "roadmap" that everything else depends on
431 << \new Voice = "lead" \LeadVox \new Voice \Riffs >>
432 \new Lyrics \lyricsto "lead" \LeadVoxText
433 \new Lyrics \lyricsto "lead" \LeadVoxTextB
438 \new ChordNames \Chords
439 \new RhythmicStaff << \Rhythm \Dynamics >>
442 \set Score.skipBars = ##t
443 \set Score.melismaBusyProperties = #'()
450 #(define fonts (make-pango-font-tree
456 % Spread staves vertically across last page (default: t)
457 % ragged-last-bottom = ##f
458 % Don't spread staves vertically across the page (default: f)
459 % ragged-bottom = ##t
460 % Allow partial line for last stave (default: f)
463 % To find out what's eating the space at the top...
464 % annotate-spacing = ##t