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 "Hallelujah (Your Love Is Amazing)" }
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))
21 % Let's try a chord dictionary
22 % subtitle = \markup { \center-align { "F#m" \fret-diagram-terse #"x;x;4;2;2;2;" } " " \center-align { "F#m/F" \fret-diagram-terse #"x;x;3;2;2;2;" } " " \center-align { "F#m/E" \fret-diagram-terse #"x;x;2;2;2;2;" } " " \center-align { "F#m/Eb" \fret-diagram-terse #"x;x;1;2;2;2;" } " " \center-align { "Em7" \fret-diagram-terse #"o;2;2;o;3;o;" } " " \center-align { "A13" \fret-diagram-terse #"x;o;2;o;2;2;" } }
25 % Useful tweak abbreviations (hn = harmony note)
27 hn = #(define-music-function (parser location arg) (ly:music?)
28 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
30 (set! (ly:music-property arg 'tweaks)
31 (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
40 \override Staff.TimeSignature #'style = #'()
43 % \once \override TextScript #'padding = #2.0
44 % s1*0^\markup { \large \bold { Samba } }
46 % s1*0^\markup { \hspace #0.0 \raise #2.0 \bigger \bold { "Moderate pop (*** CAPO 4 ***)" } }
59 \mark \markup { \override #'(font-family . sans) { \box { A } } }
62 \mark \markup { \override #'(font-family . sans) { \box { B } } }
77 \mark \markup { \override #'(font-family . sans) { \box { C } } }
84 \mark \markup { \override #'(font-family . sans) { \box { D } } }
99 s1*5 \bar "|." % 39-43
106 LeadVox = \relative c'
108 % \set Staff.instrument = #"Lead vox"
110 \override Staff.TimeSignature #'style = #'()
112 % \override Score.SpacingSpanner #'average-spacing-wishes = ##f
113 \set tupletSpannerDuration = #(ly:make-moment 1 4)
120 r2 e16 g8 g16 ~ g e8 a16 ~ | % 4
124 a4 b e,16 g8 g16 ~ g e8 a16 ~ | % 5
125 a4 b e,16 g8 g16 ~ g e8 a16 ~ | % 6
126 a4 b e,8 g16 g ~ g e8 g16 ~ | % 7
127 g4 r e16 g8 g16 ~ g e8 a16 ~ | % 8
128 a4 b e,16 g8 g16 ~ g e8 a16 ~ | % 9
129 a4 b8. \tiny e,16 \normalsize e16 g8 g16 ~ g e8 a16 ~ | % 10
130 a4 b e,16 g8 g16 ~ g e8 e16 ~ | % 11
131 e16 ( d c8 ) r4 r c'8 c16 c ~ | % 12
135 c16 b ~ b8 ~ b4 r b8 b16 b ~ | % 13
136 b16 a ~ a8 ~ a2 a8 g16 a ~ | % 14
137 a16 b ~ b8 ~ b4 r2 | % 15
138 a16 a8 b16 ~ b g8 g16 ~ g4 c8 c16 c ~ | % 16
139 c16 b ~ b8 ~ b4 r b8 b16 b ~ | % 17
140 b16 a ~ a8 ~ a2 a8 g16 a ~ | % 18
141 a16 b ~ b8 ~ b4 r2 | % 19
143 a16 a8 b16 ~ b g8 g16 ~ g2 | % 20
144 r2 e16 g8 g16 ~ g e8 a16 | % 21
146 a16 a8 b16 ~ b g8 g16 ~ g2 | % 22
150 r2 a16 a8 b16 ~ b g ~ g8 ~ | % 23
151 g8 e16 ( d ~ d4 ) r2 | % 24
152 r2 a'16 a8 b16 ~ b g ~ g8 ~ | % 25
153 g8 b4 a8 ( ~ a4 g8 ) fs ~ | % 26
154 fs4 r a16 a8 b16 ~ b g ~ g8 ~ | % 27
155 g8 e16 ( d ~ d2 ) r4 | % 28
156 r2 r4 c'8 c16 c ~ | % 29
160 c16 b ~ b8 ~ b4 r b8 b16 b ~ | % 30
161 b16 a ~ a8 ~ a2 a8 g16 a ~ | % 31
162 a16 b ~ b8 ~ b4 r2 | % 32
163 a16 a8 b16 ~ b g8 g16 ~ g4 c8 c16 c ~ | % 33
164 c16 b ~ b8 ~ b4 r b8 b16 b ~ | % 34
165 b16 a ~ a8 ~ a2 a8 g16 a ~ | % 35
166 a16 b ~ b8 ~ b4 r2 | % 36
168 a16 a8 b16 ~ b g8 g16 ~ g4 c8 c16 c | % 37
170 a16 a8 b16 ~ b g8 g16 ~ g2 | % 38
175 r2 a16 a8 b16 ~ b g ~ g8 ~ | % 40
177 r2 a16 a8 b16 ~ b g ~ g8 ~ | % 42
178 g8 g ~ g2.-\fermata | % 43
182 LeadVoxText = \lyricmode
184 Your love is _ a -- ma -- _ zing,
185 stea -- dy and _ un -- chang -- _ ing
186 Your love is _ a moun -- _ tain,
187 firm be -- neath _ my feet. _
188 Your love is _ a mys -- _ t’ry
189 how you gent -- _ ly lift _ me
190 _ When I am _ sur -- round -- _ ed
191 your love car -- _ ries me. _ _ _
193 Hal -- le -- lu -- _ jah! _ _
194 Hal -- le -- lu -- _ jah! _ _
195 Hal -- le -- lu -- _ jah! _ _
196 Your love makes _ me sing, _
197 Hal -- le -- lu -- _ jah! _ _
198 Hal -- le -- lu -- _ jah! _ _
199 Hal -- le -- lu -- _ jah! _ _
200 Your love makes _ me sing _
202 Your love is _ sur -- pri-
204 Your love makes _ me sing! _
206 Yes you make _ me _ _ sing _ _
207 Lord you make _ me _ _ sing, sing, _ _ sing _
208 How you make _ me _ _ sing _ _
210 Hal -- le -- lu -- _ jah! _ _
211 Hal -- le -- lu -- _ jah! _ _
212 Hal -- le -- lu -- _ jah! _ _
213 Your love makes _ me sing, _
214 Hal -- le -- lu -- _ jah! _ _
215 Hal -- le -- lu -- _ jah! _ _
216 Hal -- le -- lu -- _ jah! _ _
217 Your love makes _ me sing _
221 Your love makes _ me sing _
222 Your love makes _ me _ _ sing _
223 Your love makes _ me _ _ sing! _
226 LeadVoxTextB = \lyricmode
229 I can feel _ it ris -- _ ing
230 All the joy _ that’s grow -- _ ing,
231 deep in -- side _ of me. _
232 Ev -- ’ry time _ I see _ you
233 all your good -- _ ness shines _ through,
234 and I can feel _ this God _ song
235 ris -- ing up _ in me. _ _ _
246 Your love is _ a -- ma-
254 % \override Score.SpacingSpanner #'average-spacing-wishes = ##f
255 \set tupletSpannerDuration = #(ly:make-moment 1 4)
339 % Use a RhythmicStaff on the chords instead of this?
340 % It almost works, but not quite. Doesn't collapse chords above to single notes...
344 %% \set Voice.autoBeaming = ##f
345 %% \set Staff.instrument = #"Rhythm"
346 \override Staff.TimeSignature #'style = #'()
347 \override NoteHead #'style = #'slash
423 % s4_\markup { \italic { 1st X: Melody, 2nd X+: Solos } } s2. | % 5
425 % s4_\markup { \bold \italic { Double Chorus 2nd X } } s2. | % 39
427 % s4_\markup { \bold { Tutti } } s2. | % 47
430 % s4_\markup { \large \bold \italic { Solo } } s2 | % 40
437 \set Score.skipBars = ##t
438 \set Score.melismaBusyProperties = #'()
442 \new ChordNames \Chords
444 % \new ChordNames \transpose b g \Chords
445 \new RhythmicStaff << \Rhythm \Dynamics >>
450 \Global % The "roadmap" that everything else depends on
451 \new Voice = "lead" \LeadVox
453 \new Lyrics \lyricsto "lead" \LeadVoxText
454 \new Lyrics \lyricsto "lead" \LeadVoxTextB
462 #(define fonts (make-pango-font-tree
468 % Spread staves vertically across last page (default: t)
469 ragged-last-bottom = ##f
470 % Don't spread staves vertically across the page (default: f)
471 % ragged-bottom = ##t
472 % Allow partial line for last stave (default: f)
475 % To find out what's eating the space at the top...
476 % annotate-spacing = ##t
477 %let's try this: [It works! Huzzah!]
478 obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)