2 \include "pop-chords.ly"
\r
3 \include "english.ly"
\r
5 % Good sizes are 16, 18, & 20
\r
7 #(set-default-paper-size "letter")
\r
8 #(set-global-staff-size staffSize)
\r
9 #(ly:set-option (quote no-point-and-click))
\r
11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
\r
15 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Great Is The Lord" }
\r
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Michael W. Smith" }
\r
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
\r
18 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
\r
27 \override Staff.TimeSignature #'style = #'()
\r
33 s2.*4 \bar "||:" % 1-4
\r
39 \mark \markup { \override #'(font-family . sans) { \box { A } } }
\r
41 s2.*8 \bar "||" % 5-12
\r
45 \mark \markup { \override #'(font-family . sans) { \box { B } } }
\r
69 LeadVox = \relative c'
\r
71 % \set Staff.instrument = #"Lead vox"
\r
72 % \override Staff.TimeSignature #'style = #'()
\r
74 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
\r
85 e8 d e f4 f16 e | % 5
\r
86 d8 g f e4 e16 d | % 6
\r
87 c8 f e d4 c16 b | % 7
\r
89 e8 d e f4 f16 e | % 9
\r
90 d8 g f e4 e16 d | % 10
\r
91 c8 f e d4 c16 b | % 11
\r
96 bf'8 bf a bf4 bf8 | % 13
\r
98 bf'8 bf a bf4 a8 | % 15
\r
100 bf8 bf a bf4 bf8 | % 17
\r
101 a8 d a b4 b8 | % 18
\r
104 d4. ~ d8 c b | % 21
\r
108 d4. ~ d8 c b | % 25
\r
117 r2.^\fermata | % 29
\r
121 LeadVoxText = \lyricmode
\r
124 he is ho -- ly and just;
\r
125 By his po -- wer we trust
\r
129 he is faith -- ful and true;
\r
130 By his mer -- cy he proves
\r
134 And wor -- thy of glo -- ry,
\r
136 And wor -- thy of praise,
\r
138 Now lift up your voice,
\r
139 Now lift up your voice,
\r
140 Great __ _ _ is the Lord! __ _
\r
141 Great __ _ _ is the Lord!
\r
151 Riffs = \relative c'''
\r
153 % \set Voice.autoBeaming = ##f
\r
154 % \set Staff.instrument = #"Lead vox"
\r
155 \override Staff.TimeSignature #'style = #'()
\r
159 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
\r
163 c16 g f8 r f16 e c8 r | % 1
\r
164 c'16 g f8 r f16 e c g' c e | % 2
\r
165 <c f>16 <g e'> <f c'>8 r <f c'>16 <e g> <c f>8 r | % 3
\r
166 c'16 g f e d e c4. | % 4
\r
177 r4. r8 g16 c e g | % 12
\r
181 bf8-> r4 r4. | % 13
\r
182 r4. r8 g,16 c e g | % 14
\r
183 bf8-> r4 r4. | % 15
\r
184 r4. r8 g,16 c e g | % 16
\r
185 bf8-> r4 r4 bf8 | % 17
\r
186 a8 d a b4 b8 | % 18
\r
189 d4. ~ d8 c b | % 21
\r
190 << c2. ~ \\ { r4. a,8 b c } >> | % 22
\r
191 << c'2. \\ { c,4. b8. \tieUp c16 ~ c8 \tieNeutral } >> | % 23
\r
193 d4. ~ d8 c b | % 25
\r
195 c16 g f8 r f16 e c8 r | % 26
\r
196 c'16 g f e d e c4. | % 27
\r
198 c'16 g f8 r f16 e c8 r | % 28
\r
202 c'16 g f e d e c4.^\fermata | % 29
\r
210 Chords = \chordmode
\r
212 %Bah, can't we set this globally?
\r
227 f8 c/e d:m7 c4. | % 8
\r
231 f8 c/e d:m7 c4. | % 12
\r
235 bf8/c s f/c bf4./c | % 13
\r
237 bf8/c s f/c bf4./c | % 15
\r
239 bf8/c s f/c bf4./c | % 17
\r
240 d4./fs g8 g4/f | % 18
\r
241 e4. a8:m a4:m/g | % 19
\r
264 % Use a RhythmicStaff on the chords instead of this?
\r
265 % It almost works, but not quite. Doesn't collapse chords above to single notes...
\r
267 Rhythm = \relative c
\r
269 % \set Staff.instrument = #"Rhythm"
\r
270 \override Staff.TimeSignature #'style = #'()
\r
271 \override NoteHead #'style = #'slash
\r
314 c4. c^\fermata | % 29
\r
330 s8_\f s4 s4. | % 13
\r
337 \Global % The "roadmap" that everything else depends on
\r
341 \new Voice = "lead" \LeadVox
\r
342 \new Lyrics \lyricsto "lead" \LeadVoxText
\r
347 % \remove "Time_signature_engraver"
\r
348 % \remove "Clef_engraver"
\r
349 %Hmm, removing this screws up the formatting...
\r
350 % \remove "Key_engraver"
\r
352 \override StaffSymbol #'staff-space = #(magstep -3.0)
\r
357 \new ChoirStaff = "Rhythm"
\r
359 % \new Staff = "riff" \RhythmB
\r
360 \new ChordNames = "chords" \Chords
\r
361 \new RhythmicStaff << \Rhythm \Dynamics >>
\r
364 \set Score.skipBars = ##t
\r
365 \set Score.melismaBusyProperties = #'()
\r
372 #(define fonts (make-pango-font-tree
\r
378 % Don't spread staves vertically across last page (default: t)
\r
379 % ragged-last-bottom = ##f
\r
380 % Don't spread staves vertically across the page (default: f)
\r
381 % ragged-bottom = ##t
\r
382 % Allow partial line for last stave (default: f)
\r
385 % To find out what's eating the space at the top...
\r
386 % annotate-spacing = ##t
\r
387 %let's try this: [It works! Huzzah!]
\r
388 obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
\r