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"
26 LeadVox = \relative c''
28 \set Voice.autoBeaming = ##f
29 % \set Staff.instrumentName = #"Lead vox"
32 \override Staff.TimeSignature #'style = #'()
34 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
36 \set Score.markFormatter = #format-mark-box-letters
39 g2 ~ g8 [ b, d g ] | % 1
46 \once \override Score.RehearsalMark #'self-alignment-X = #left
47 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
50 a4 fs8 [ d ] ~ d4 a'4 | % 4
52 fs4 d8 [ b ] ~ b4 fs'4 | % 6
53 e2 ~ e8 [ g g e ] | % 7
54 d8 [ g ] ~ g4 g b | % 8
69 \mark \markup { \override #'(font-family . sans) { \box { B } } }
75 b2 ~ b8 [ b b b ] | % 16
84 b2 ~ b8 [ b b b ] | % 24
91 %\once \override Score.RehearsalMark #'self-alignment-X = #right
92 %\mark \markup { \italic { D.S. } }
93 a2. b4^\markup { \bold \italic { D.S. } } \bar "||" % 27
104 g1-\fermata \bar "|." % 33
107 LeadVoxText = \lyricmode
111 Give thanks with a gra- teful heart _
112 Give thanks to the ho- ly one _
113 Give thanks, _ be- cause he's gi- ven _
114 Je- sus Christ, his son
119 And now, let the weak say 'I am strong'
120 Let the poor say 'I am rich' _
121 Be- cause of what the Lord has done for us
123 And now, let the weak say 'I am strong'
124 Let the poor say 'I am rich' _
125 Be- cause of what the Lord has done for us
142 %Bah, can't we set this globally?
193 % Use a RhythmicStaff on the chords instead of this?
194 % It almost works, but not quite. Doesn't collapse chords above to single notes...
198 \set Voice.autoBeaming = ##f
199 % \set Staff.instrumentName = #"Rhythm"
200 \override Staff.TimeSignature #'style = #'()
202 \override NoteHead #'style = #'slash
244 c1-\fermata \bar "|." % 33
252 \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
253 \new Lyrics \lyricsto "lead" \LeadVoxText
256 \new ChoirStaff = "Rhythm"
258 \new ChordNames = "chords" \Chords
259 \new RhythmicStaff = "chordRhythm" \StaffC
262 \set Score.skipBars = ##t
263 \set Score.melismaBusyProperties = #'()
268 \context { \Staff \RemoveEmptyStaves }
269 % ragged-last-bottom = ##t
277 #(define fonts (make-pango-font-tree