1 % Still need hairpins, directions, dynamics, etc...
4 \include "pop-chords.ly"
7 % Good sizes are 16, 18, & 20
9 #(set-default-paper-size "letter")
10 #(set-global-staff-size staffSize)
11 #(ly:set-option (quote no-point-and-click))
13 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
17 %Let's bump up the title size and switch to the chord font. :-)
19 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Lamb of God" }
20 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Twila Paris" }
21 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Craig Harris" }
22 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
32 \override Staff.TimeSignature #'style = #'()
41 \mark \markup { \override #'(font-family . sans) \box { A } }
43 s2.*8 \bar "||" % 4-11
47 \once \override Score.RehearsalMark #'self-alignment-X = #left
48 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
52 \once \override Score.RehearsalMark #'self-alignment-X = #right
53 \once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
54 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
56 s2.*2 \bar "||" % 19-20
58 \mark \markup { \override #'(font-family . sans) \box { C } }
60 s2.*8 \bar "||" % 21-28
62 \once \override Score.RehearsalMark #'self-alignment-X = #right
63 \mark \markup { \italic { D.S. al Coda } }
65 \stopStaff s2. \startStaff
66 \set Score.currentBarNumber = #29
70 \once \override Score.RehearsalMark #'self-alignment-X = #left
71 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
73 s2.*2 \bar "||" % 29-30
76 \mark \markup { \override #'(font-family . sans) \box { D } }
82 \mark \markup { \override #'(font-family . sans) \box { E } }
102 LeadVox = \relative c'
104 % \set Voice.autoBeaming = ##f
105 % \set Staff.instrument = #"Lead vox"
107 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
128 a4. c8 a8. g16 | % 12
151 % blank measure between last measure and coda
170 b4. d8 b8. a16 | % 39
183 LeadVoxText = \lyricmode
185 Your on -- ly son, no sin to hide,
186 but you have sent him from your side,
187 to walk up -- on this guilt -- y sod,
188 and to be -- come the lamb of God.
192 I love the ho -- ly lamb of God,
193 Oh, wash me in his pre -- cious blood,
194 my Je -- sus Christ the lamb of God.
196 Your gift of love, they cru -- ci -- fied,
197 they laughed and scorned him as he died,
198 the hum -- ble king, they named a fraud,
199 and sac -- ri -- ficed the lamb of God.
205 I was so lost, I should have died,
206 but you have brought me to your side,
207 to be led by your staff and rod,
208 and to be called a lamb of God.
212 I love the ho -- ly lamb of God,
213 Oh, wash me in his pre -- cious blood,
214 my Je -- sus Christ, the lamb of God.
238 s4. <c' e,>8 <b d,> <c e,> | % 19
241 s2.*9 | % 21-28 (+1 to skip for coda)
243 s4. c,16 d <e d>4 ~ | % 29
244 <e d>4 <e cs>8 s4. | % 30
257 f4:maj7 f:maj7/g g:7 | % 2
268 d4:m9 f:maj7 g:9 | % 10
269 c4:sus4 c c:sus2/e | % 11
279 c4/g f:maj7 g8:sus4.7 g:7 | % 18
285 c2 f8:maj7 g:7 | % 21
291 d4:m9 f:maj7 g | % 27
296 % blank measure between last measure and coda
303 s4 a:7 g:maj7/a | % 30
304 d2 g8:maj7 a:7 | % 31
307 a4:sus4 a d/fs | % 34
310 e4:m7 g:maj7 a:7 | % 37
311 d4:sus4 d d/fs | % 38
318 a4:sus4 a d/fs | % 42
321 d4/a g:maj7 e8:m7/a a:7 | % 45
323 d4:sus4 d d/fs | % 46
335 % \set Voice.autoBeaming = ##f
336 % \set Staff.instrument = #"Rhythm"
337 \override Staff.TimeSignature #'style = #'()
339 \override NoteHead #'style = #'slash
384 % blank measure between last measure and coda
385 %hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!!
386 \stopStaff s2. \startStaff
422 s4_\markup { \italic { Piano } } s2 | % 1
424 s4. s4._\markup { \italic { Band in } } | % 11
425 s2.*34 | % 12-44 (+1 for blank coda)
426 s4 s2_\markup { \italic { Rit. last time } } | % 45
430 s4_\markup { \italic { Ac. gtr only } } s2. | % 1
434 s4_\markup { \italic { Band in } } s2. | % 5
442 \set Score.skipBars = ##t
443 \set Score.melismaBusyProperties = #'()
447 \new ChordNames \Chords
449 % \new ChordNames \transpose f d \Chords
450 \new RhythmicStaff << \Rhythm \Dynamics >>
455 \Global % The "roadmap" that everything else depends on
456 \new Voice = "lead" \LeadVox
458 \new Lyrics \lyricsto "lead" \LeadVoxText
466 #(define fonts (make-pango-font-tree
472 % The first two seem to be obsolete...
474 % Don't spread staves vertically across last page (default: t)
475 % ragged-last-bottom = ##f
476 % Don't spread staves vertically across the page (default: f)
477 % ragged-bottom = ##t
478 % Allow partial line for last stave (default: f)
481 % To find out what's eating the space at the top...
482 % annotate-spacing = ##t
483 %let's try this: [It works! Huzzah!]
484 obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
486 % This doesn't quite do what I want :-P
487 system-system-spacing #'padding = #1
488 markup-system-spacing #'padding = #4
489 score-markup-spacing #'padding = #4
490 score-system-spacing #'padding = #4