2 \include "pop-chords.ly"
5 staffSize = #18 % or 16
6 #(set-default-paper-size "letter")
7 #(set-global-staff-size staffSize)
8 #(ly:set-option (quote no-point-and-click))
12 %Let's bump up the title size and switch to the chord font. :-)
14 title = \markup { \override #'(font-family . sans)
15 { \fontsize #3.5 "Give Thanks" } }
16 composer = \markup { \override #'(font-family . sans) "Henry Smith" }
17 arranger = \markup { \override #'(font-family . sans) "arr. Shamus Hammons" }
18 tagline = "Engraved by JLH and Lilypond 2.8.2"
25 LeadVox = \relative c''
27 \set Voice.autoBeaming = ##f
28 % \set Staff.instrumentName = #"Lead vox"
31 \override Staff.TimeSignature #'style = #'()
33 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
35 \set Score.markFormatter = #format-mark-box-letters
38 g2 ~ g8 [ b, d g ] | % 1
45 \once \override Score.RehearsalMark #'self-alignment-X = #left
46 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
49 a4 fs8 [ d ] ~ d4 a'4 | % 4
51 fs4 d8 [ b ] ~ b4 fs'4 | % 6
52 e2 ~ e8 [ g g e ] | % 7
53 d8 [ g ] ~ g4 g b | % 8
68 \mark \markup { \override #'(font-family . sans) { \box { B } } }
74 b2 ~ b8 [ b b b ] | % 16
83 b2 ~ b8 [ b b b ] | % 24
90 %\once \override Score.RehearsalMark #'self-alignment-X = #right
91 %\mark \markup { \italic { D.S. } }
92 a2. b4^\markup { \bold \italic { D.S. } } \bar "||" % 27
103 g1-\fermata \bar "|." % 33
106 LeadVoxText = \lyricmode
110 Give thanks with a gra- teful heart _
111 Give thanks to the ho- ly one _
112 Give thanks, _ be- cause he's gi- ven _
113 Je- sus Christ, his son
118 And now, let the weak say 'I am strong'
119 Let the poor say 'I am rich' _
120 Be- cause of what the Lord has done for us
122 And now, let the weak say 'I am strong'
123 Let the poor say 'I am rich' _
124 Be- cause of what the Lord has done for us
189 \set Voice.autoBeaming = ##f
190 \numericTimeSignature
192 \override NoteHead #'style = #'slash
235 c1-\fermata \bar "|." % 33
244 \new Voice = "lead" \LeadVox
245 \new Lyrics \lyricsto "lead" \LeadVoxText
250 \new ChordNames \Chords
251 \new RhythmicStaff \StaffC
254 \set Score.skipBars = ##t
255 \set Score.melismaBusyProperties = #'()
260 \context { \Staff \RemoveEmptyStaves }
267 #(define fonts (make-pango-font-tree
273 % Don't spread staves vertically across last page (default: t)
274 % ragged-last-bottom = ##f
275 % Don't spread staves vertically across the page (default: f)
276 % ragged-bottom = ##t
277 % Allow partial line for last stave (default: f)
280 % To find out what's eating the space at the top...
281 % annotate-spacing = ##t