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 "Wait By The Water" }
18 subtitle = \markup { \override #'(font-family . sans) \fontsize #1.3 "Honoring The MoRanch Professional Women’s Group" }
19 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Helen Currie Foster" }
20 % arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Craig Harris" }
21 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
22 % Let's try a chord dictionary
23 % subtitle = \markup { \center-column { "F#m" \fret-diagram-terse #"x;x;4;2;2;2;" } " " \center-column { "F#m/F" \fret-diagram-terse #"x;x;3;2;2;2;" } " " \center-column { "F#m/E" \fret-diagram-terse #"x;x;2;2;2;2;" } " " \center-column { "F#m/Eb" \fret-diagram-terse #"x;x;1;2;2;2;" } " " \center-column { "Em7" \fret-diagram-terse #"o;2;2;o;3;o;" } " " \center-column { "A13" \fret-diagram-terse #"x;o;2;o;2;2;" } }
26 % Useful tweak abbreviations (hn = harmony note)
28 hn = #(define-music-function (parser location arg) (ly:music?)
29 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
31 (set! (ly:music-property arg 'tweaks)
32 (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
41 \override Staff.TimeSignature #'style = #'()
44 \once \override Score.RehearsalMark #'self-alignment-X = #left
45 \mark \markup { \override #'(font-family . sans) { \box { A } } }
46 % \once \override TextScript #'padding = #2.0
47 s2.*0^\markup { \large \italic { Refrain } }
49 % s1*0^\markup { \hspace #0.0 \raise #2.0 \larger \bold { "Moderate pop (*** CAPO 4 ***)" } }
53 s2.*16 \bar "|." % 1-16
55 \once \override Score.RehearsalMark #'self-alignment-X = #left
56 \mark \markup { \override #'(font-family . sans) { \box { B } } }
57 s2.*0^\markup { \large \italic { Verse } }
58 s2.*16 \bar ":|." % 16-32
77 \mark \markup { \override #'(font-family . sans) { \box { C } } }
79 s1*0^\markup { \large \bold \italic { Solos } }
85 s2. s4^\markup { \large \bold \italic { Free Time } } | % 39
86 s1*3 \bar ":||" % 40-42
94 LeadVox = \relative c'
96 % \set Staff.instrument = #"Lead vox"
98 \override Staff.TimeSignature #'style = #'()
100 % \override Score.SpacingSpanner #'average-spacing-wishes = ##f
145 LeadVoxText = \lyricmode
147 Wait by the wa -- ter,
148 Watch -- ing the ri -- ver,
149 Sing -- ing a -- long as it
152 Just like the lime -- stone,
153 let us be chan -- nels,
154 Jus -- tice, for -- give -- ness,
157 Just like the wat -- er,
158 pa -- tient, per -- sis -- tent,
159 Mov -- ing a boul -- der, and
160 mov -- ing the banks,
162 Let us keep flow -- ing, _
163 Build -- ing, des -- troy -- ing,
164 Ho -- ly the wa -- ter and
168 LeadVoxTextB = \lyricmode
181 Parched in our des -- erts,
182 Parched in the wil -- der -- ness,
183 wait -- ing for rain,
185 Lead us to drink from the
186 spring ev -- er -- last -- ing
187 Once we ar -- rive, ne -- ver
188 thirs -- ty a -- gain.
196 % \override Score.SpacingSpanner #'average-spacing-wishes = ##f
201 % \repeat percent 4 { e8_\markup { \italic { bass figure } } e e e e e e e } | % 1-4
257 % Use a RhythmicStaff on the chords instead of this?
258 % It almost works, but not quite. Doesn't collapse chords above to single notes...
262 %% \set Voice.autoBeaming = ##f
263 %% \set Staff.instrument = #"Rhythm"
264 \override Staff.TimeSignature #'style = #'()
265 \override NoteHead #'style = #'slash
317 s4_\markup { \bold \italic { Drums In } } s2 | % 3
319 s4_\markup { \bold \italic { Band In } } s2 | % 5
326 \set Score.skipBars = ##t
327 \set Score.melismaBusyProperties = #'()
331 \new ChordNames \Chords
333 % \new ChordNames \transpose b g \Chords
334 % \new RhythmicStaff << \Rhythm \Dynamics >>
339 \Global % The "roadmap" that everything else depends on
340 \new Voice = "lead" \LeadVox
342 \new Lyrics \lyricsto "lead" \LeadVoxText
343 \new Lyrics \lyricsto "lead" \LeadVoxTextB
351 #(define fonts (make-pango-font-tree
357 % Spread staves vertically across last page (default: t)
358 % ragged-last-bottom = ##f
359 % Don't spread staves vertically across the page (default: f)
361 % Allow partial line for last stave (default: f)
364 % To find out what's eating the space at the top...
365 % annotate-spacing = ##t
366 %let's try this: [It works! Huzzah!]
367 obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)