1 % Need to change chart to add dbl p/c+c, add dynamics, band indications
4 \include "../pop-chords.ly"
7 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
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 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "America, the Beautiful" }
18 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Samuel Ward/Katherine Lee Bates" }
19 % arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" }
20 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
40 % \mark \markup { \override #'(font-family . sans) { \box { A } } }
41 s1 %^\markup { \italic { w/Rhythm Fig. 1 (thru B) } }
46 \partial 4*3 { s2. } % 5-12
54 LeadVox = \relative c''
82 LeadVoxText = \lyricmode
85 { O beau -- ti -- ful for spa -- cious skies,
86 For am -- ber waves of grain,
87 For pur -- ple moun -- tain ma -- jes -- ties,
88 A -- bove the frui -- ted plain!
89 A -- me -- ri -- ca! A -- me -- ri -- ca!
90 God shed his grace on thee,
91 And crown thy good with bro -- ther -- hood
92 From sea to shi -- ning sea! }
94 \new Lyrics = "verse2" \with { alignBelowContext = #"verse1" }
95 { \set associatedVoice = "Lead"
96 O beau -- ti -- ful for pil -- grim feet,
97 Whose stern im -- pas -- sioned stress,
98 A thor -- ough -- fare for free -- dom beat
99 A -- cross the wil -- der -- ness!
100 A -- me -- ri -- ca! A -- me -- ri -- ca!
101 God mend thine e -- v'ry flaw,
102 Con firm thy soul in self con -- trol
103 Thy li -- ber -- ty in law! }
105 \new Lyrics = "verse3" \with { alignBelowContext = #"verse2" }
106 { \set associatedVoice = "Lead"
107 O beau -- ti -- ful for he -- roes proved
108 In li -- ber -- a -- ting strife,
109 Who more than self their coun -- try loved,
110 And mer -- cy more than life!
111 A -- me -- ri -- ca! A -- me -- ri -- ca!
112 May God thy gold re -- fine,
113 Till all suc -- cess be no -- ble -- ness,
114 And e -- v'ry gain di -- vine! }
116 \new Lyrics = "verse4" \with { alignBelowContext = #"verse3" }
117 { \set associatedVoice = "Lead"
118 O beau -- ti -- ful for pa -- triot dream,
119 That sees be -- yond the years,
120 Thine a -- la -- bas -- ter ci -- ties gleam,
121 Un -- dimmed by hu -- man tears!
122 A -- me -- ri -- ca! A -- me -- ri -- ca!
123 God shed his grace on thee,
124 And crown thy good with bro -- ther -- hood
125 From sea to shi -- ning sea! }
135 r4 g g8 a b c ~ | % 1
136 c8 c b a g a b c ~ | % 2
137 c8 c b a g a b c ~ | % 3
142 r4 g g8 a b c ~ | % 29
143 c8 c b a g a b c ~ | % 30
144 c8 c b a g a b c ~ | % 31
149 r4 g g8 a b c ~ | % 41
150 c8 c b a g a b c ~ | % 42
151 c8 c b a g d' e f ~ | % 43
152 f8 f e d g2-\fermata | % 44
193 \numericTimeSignature
194 \override NoteHead #'style = #'slash
204 c2 r8 c4-> c8-> ~ | % 4
209 c2 r8 c4-> c8-> ~ | % 8
214 c2 r8 c4-> c8-> ~ | % 12
217 c8 c4 c8 ~ c4 c ~ | % 14
218 c8 c4 c8 ~ c4 c ~ | % 15
226 s1_\markup { \italic { snare pat. } } | % 1
227 s1_\markup { \italic { simile } } | % 2
229 s1_\markup { \italic { spacy } } | % 22
233 s1_\markup { \italic { Last time } } | % 51
244 \new ChordNames \Chords
245 % \new RhythmicStaff << \StaffC \Dynamics >>
250 \Global % The "roadmap" that everything else depends on
251 \new Voice = "lead" \LeadVox
252 % \new Voice = "riffs" \Riffs
253 \new Lyrics = "verse1" \lyricsto "lead" \LeadVoxText
256 \set Score.skipBars = ##t
257 \set Score.melismaBusyProperties = #'()
266 \Staff \override VerticalAxisGroup.default-staff-staff-spacing.basic-distance = #30
273 #(define fonts (make-pango-font-tree
279 % basic-distance does nothing, so padding it is...
280 system-system-spacing = #'((padding . 10.0))
281 markup-system-spacing = #'((padding . 10.0))
282 % system-system-spacing = #'((basic-distance . 10.0) (padding . 10.0))
283 % markup-system-spacing = #'((basic-distance . 10.0) (padding . 10.0))
284 % system-system-spacing #'basic-distance = #10
285 % markup-system-spacing #'basic-distance = #10
286 % Don't spread staves vertically across last page (default: t)
287 % ragged-last-bottom = ##f
288 % Don't spread staves vertically across the page (default: f)
289 % ragged-bottom = ##t
290 % Allow partial line for last stave (default: f)
293 % To find out what's eating the space at the top...
294 % annotate-spacing = ##t