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 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Here I Am To Worship" }
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "T. Hughes" }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
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.0 (ly:music-property arg 'tweaks))) arg)
40 % \once \override TextScript #'padding = #2.0
41 % s1*0^\markup { \large \italic { Piano only } }
49 \mark \markup { \override #'(font-family . sans) { \box { A } } }
54 \once \override Score.RehearsalMark #'self-alignment-X = #left
55 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
61 \once \override Score.RehearsalMark #'self-alignment-X = #right
62 \once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
63 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
73 \mark \markup { \override #'(font-family . sans) { \box { C } } }
88 \once \override Score.RehearsalMark #'self-alignment-X = #right
89 \mark \markup { \italic { D.S. al Coda } }
91 % blank measure between last measure and coda
92 \stopStaff s1 \startStaff
93 \set Score.currentBarNumber = #31
97 \once \override Score.RehearsalMark #'self-alignment-X = #left
98 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
101 \mark \markup { \override #'(font-family . sans) { \box { D } } }
102 s1*8 \bar "||" % 32-39
104 \mark \markup { \override #'(font-family . sans) { \box { E } } }
105 s1*8 \bar "|." % 40-47
112 LeadVox = \relative c''
123 <gs \hn e \hn b>4 <gs \hn e \hn b>8 <a \hn e \hn b> <fs \hn e \hn b>4 <fs \hn ds \hn b>8 <gs \hn e \hn b> | % 6
124 <a \hn e \hn cs>4 <gs \hn e \hn cs>8 <fs \hn e \hn cs> <fs \hn cs \hn a> e <cs \hn a>4 | % 7
125 <gs' \hn e \hn b>4 <gs \hn e \hn b>8 <a \hn e \hn b> <fs \hn e \hn b>4 <fs \hn ds \hn b>8 <gs \hn e \hn b> ~ | % 8
126 <gs \hn e \hn b>8 <e \hn b \hn a> ~ <e \hn b \hn a>2 r4 | % 9
127 <gs \hn e \hn b>4 <gs \hn e \hn b>8 <a \hn e \hn b> <fs \hn e \hn b>4 <fs \hn ds \hn b>8 <gs \hn e \hn b> | % 10
128 <a \hn fs \hn cs>4 <a \hn fs \hn cs>8 <gs \hn e \hn cs> <fs \hn cs \hn a> e <e \hn cs \hn a>4 | % 11
129 <gs \hn e \hn b>4 <gs \hn e \hn b>8 <a \hn e \hn b> <fs \hn e \hn b>4 <fs \hn ds \hn b>8 <gs \hn e \hn cs> ~ | % 12
130 <gs \hn e \hn cs>8 <e \hn b \hn a> ~ <e \hn b \hn a>2 r4 | % 13
131 r4 r8. cs16 <a' \hn fs \hn cs>8 <gs \hn e \hn b> <gs \hn e \hn b> <fs \hn ds \hn b> | % 14
135 <gs \hn e \hn b>4 <gs \hn e \hn b> <a \hn fs \hn cs>8 <gs \hn e \hn b> <fs \hn ds \hn b> <e \hn b \hn gs> | % 15
136 <fs \hn ds \hn b>4 <fs \hn ds \hn b> <a \hn fs \hn cs>8 <gs \hn e \hn b> <gs \hn e \hn b> <fs \hn ds \hn a> | % 16
137 <gs \hn e \hn b>4 <gs \hn e \hn b> <gs \hn e \hn b>8 <b \hn gs \hn e>4 <e, \hn cs \hn a>8 ~ | % 17
138 <e \hn cs \hn a>4 r8 cs16 <a' \hn fs> <a \hn fs \hn cs>8 <gs \hn e \hn b> <gs \hn e \hn b> <fs \hn ds \hn b> | % 18
139 <gs \hn e \hn b>4 <gs \hn e \hn b> <a \hn fs \hn cs>8 <gs \hn e \hn b> <gs \hn e \hn b> <fs \hn cs \hn gs> | % 19
140 <fs \hn ds \hn b>4 <fs \hn ds \hn b> <a \hn fs \hn cs>8 <gs \hn e \hn b> <gs \hn e \hn b> <fs \hn ds \hn gs,> | % 20
141 <gs \hn e \hn b>4 <gs \hn e \hn b> <gs \hn e \hn b>8 <b \hn gs \hn e>4 <e, \hn cs \hn a>8 ~ | % 21
143 <e \hn cs \hn a>2 s | % 22
146 <e \hn cs \hn a>2-\repeatTie r8 b gs' fs ~ | % 24
150 fs4 <fs \hn ds \hn b>8 <gs \hn e \hn b> ~ <gs \hn e \hn b>4 <b \hn gs \hn e>8 <a \hn e \hn cs> ~ | % 25
151 <a \hn e \hn cs>8 <gs \hn e \hn b>4 <fs \hn e \hn b>8 ~ <fs \hn e \hn b>4 <gs \hn e \hn b>8 <fs \hn ds \hn b>8 ~ | % 26
152 <fs \hn ds \hn b>4 <fs \hn ds \hn b>8 <gs \hn e \hn cs> ~ <gs \hn e \hn cs>4 <b \hn fs \hn e>8 <a \hn e \hn cs> ~ | % 27
154 a8 gs4 fs8 ~ fs b, <gs' \hn e> <gs \hn ds \hn b> | % 28
156 <a \hn e \hn cs>8-\repeatTie <gs \hn e \hn cs>4 <fs \hn e \hn b>8 ~ <fs \hn e \hn b>2 ~ | % 29
158 <fs \hn e \hn b>4 r8. cs16 <a' \hn fs \hn cs>8 <gs \hn e \hn b> <gs \hn e \hn b> <fs \hn ds \hn b> | % 30
160 s1 % blank bar for coda
164 <e \hn cs>4.-\repeatTie ~ <e \hn cs>16 cs <a' \hn fs>8 <gs \hn e> <gs \hn e> <fs \hn ds> | % 31
166 <gs \hn e>4 <gs \hn e> <a \hn fs>8 <gs \hn e> <fs \hn ds> <e \hn b> | % 32
167 <fs \hn ds>4 <fs \hn ds> <a \hn fs>8 <gs \hn e> <gs \hn e> <fs \hn ds> | % 33
168 <gs \hn e>4 <gs \hn e> <gs \hn e>8 <b \hn gs>4 <e, \hn cs>8 ~ | % 34
169 <e \hn cs>4. cs16 <a' \hn fs> <a \hn fs>8 <fs \hn e> <gs \hn e> <fs \hn ds> | % 35
170 <gs \hn e>4 <gs \hn e> <a \hn fs>8 <gs \hn e> <gs \hn e> <fs \hn cs> | % 36
171 <fs \hn ds>4 <fs \hn ds> <a \hn fs>8 <gs \hn e> <gs \hn e> <fs \hn ds> | % 37
172 <gs \hn e>4 <gs \hn e> <gs \hn e>8 <b \hn gs>4 <e, \hn cs>8 ~ | % 38
173 <e \hn cs>2 r8 b gs' fs ~ | % 39
175 fs4 fs8 gs ~ gs4 b8 a ~ | % 40
176 a8 gs4 fs8 ~ fs4 e8 fs ~ | % 41
177 fs4 fs8 gs ~ gs4 b8 a ~ | % 42
178 a8 gs4 fs8 ~ fs8 e ~ e4 ~ | % 43
186 LeadVoxTextA = \lyricmode
188 Light of the world, you stepped down in -- to dark -- _ ness,
189 O -- pened my eyes, let me _ see, _
190 Beau -- ty that made this _ heart _ a -- dore _ you,
191 Hope of a life spent with _ you. _
193 So here I am to wor -- ship,
194 here I am to bow down,
195 here I am to say that you’re my God, _
196 And you’re al -- to -- geth -- er love -- ly,
197 al -- to -- geth -- er wor -- thy,
198 al -- to -- geth -- er won -- der -- ful to me. _ _
200 And I’ll ne -- _ ver know _
202 to see _ my sin _ u -- pon _ that cross _
209 _ _ So here I am to wor -- ship,
210 here I am to bow down,
211 here I am to say that you’re my God, _
212 and you’re al -- to -- geth -- er love -- ly,
213 al -- to -- geth -- er wor -- thy,
214 al -- to -- geth -- er won -- der -- ful to me, _
216 And I’ll ne -- _ ver know _
218 to see _ my sin _ u -- pon _ that cross _ _ _ _
222 LeadVoxTextB = \lyricmode
224 King of all days, oh so high -- ly ex -- al -- _ ted,
225 glo -- rious in hea -- ven a -- _ bove, _
226 Hum -- bly you came to the Earth you cre -- a -- _ ted,
227 all for love’s sake be -- came _ poor. _
231 Riffs = \relative c''
235 gs4 gs a8 gs fs e | % 1
236 fs4 fs a8 gs gs fs | % 2
237 gs4 gs gs8 b4 e,8 ~ | % 3
238 e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 4
239 e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 5
243 r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 22
244 e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 23
248 s1 % blank bar for Coda
252 r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 44
253 e a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 45
254 e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 46
255 <a b e>1-\fermata | % 47
342 \override NoteHead #'style = #'slash
393 % blank measure between last measure and coda
394 %hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!!
395 \stopStaff s1 \startStaff
422 s4_\markup { \italic { add cymbal colors } } s2. | % 5
423 s2 s16 s \> s4 s16 s \! | % 5
427 s4_\markup { \italic { Unison 1st X } } s2. | % 6
432 s4_\markup { \italic { snare on D.S. } } s2. | % 15
437 s4_\markup { \italic { Unison 1st X } } s2. | % 25
439 s4.. s16_\markup { \italic { big fill } } \< s4. s8-\f | % 30
441 s1 % blank bar for coda
445 s2 s8 \< s4 s8 \! | % 31
448 s2 s8 \> s4 s8-\mp | % 39
450 s4_\markup { \italic { floating } } s2. | % 40
457 \set Score.skipBars = ##t
458 \set Score.melismaBusyProperties = #'()
460 \Global % The "roadmap" that everything else depends on
464 \new Voice = "lead" \LeadVox
466 \new Lyrics \lyricsto "lead" \LeadVoxTextA
467 \new Lyrics \lyricsto "lead" \LeadVoxTextB
472 \new ChordNames \Chords
473 \new RhythmicStaff << \Rhythm \Dynamics >>
481 #(define fonts (make-pango-font-tree
487 % Spread staves vertically across last page (default: t)
488 % ragged-last-bottom = ##f
489 % Don't spread staves vertically across the page (default: f)
490 % ragged-bottom = ##t
491 % Allow partial line for last stave (default: f)
494 % To find out what's eating the space at the top...
495 % annotate-spacing = ##t
496 %let's try this: [It works! Huzzah!][nope... :-/]
497 % obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)