From: Shamus Hammons Date: Sun, 17 Jan 2016 16:04:21 +0000 (-0600) Subject: New song 'Wait By The Water' added. X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=music;a=commitdiff_plain;h=e763d513834a12aa56fa387de9a731a71f80dafd New song 'Wait By The Water' added. --- diff --git a/wait-by-the-water.ly b/wait-by-the-water.ly new file mode 100644 index 0000000..f041c43 --- /dev/null +++ b/wait-by-the-water.ly @@ -0,0 +1,368 @@ +\version "2.18.2" +\include "pop-chords.ly" +\include "english.ly" + +% Good sizes are 16, 18, & 20 +staffSize = #20 +#(set-default-paper-size "letter") +#(set-global-staff-size staffSize) +#(ly:set-option (quote no-point-and-click)) + +%{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %} + +\header +{ +%Let's bump up the title size and switch to the chord font. :-) + + title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Wait By The Water" } + subtitle = \markup { \override #'(font-family . sans) \fontsize #1.3 "Honoring The MoRanch Professional Women’s Group" } + composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Helen Currie Foster" } +% arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Craig Harris" } + tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version)) +% Let's try a chord dictionary +% 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;" } } +} + +% Useful tweak abbreviations (hn = harmony note) + +hn = #(define-music-function (parser location arg) (ly:music?) +;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font + + (set! (ly:music-property arg 'tweaks) + (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg) + + +% +% Song's structure +% +Global = +{ + \key c \major + \override Staff.TimeSignature #'style = #'() + \time 3/4 + + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { \override #'(font-family . sans) { \box { A } } } +% \once \override TextScript #'padding = #2.0 + s2.*0^\markup { \large \italic { Refrain } } +% Capo 4 version +% s1*0^\markup { \hspace #0.0 \raise #2.0 \larger \bold { "Moderate pop (*** CAPO 4 ***)" } } + + % Refrain + + s2.*16 \bar "|." % 1-16 + + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { \override #'(font-family . sans) { \box { B } } } + s2.*0^\markup { \large \italic { Verse } } + s2.*16 \bar ":|." % 16-32 + +%{ + s1*4 | % 15-18 + + s1*2 | % 19-20 + } + \alternative + { + { + s1 | % 21 + } + { + s1 | % 22 + } + } + + \repeat volta 2 + { + \mark \markup { \override #'(font-family . sans) { \box { C } } } + + s1*0^\markup { \large \bold \italic { Solos } } + s1*2 | % 23-24 + } + + % Coda + + s2. s4^\markup { \large \bold \italic { Free Time } } | % 39 + s1*3 \bar ":||" % 40-42 +%} +} + + +% +% Lead vocal +% +LeadVox = \relative c' +{ +% \set Staff.instrument = #"Lead vox" + \clef G + \override Staff.TimeSignature #'style = #'() +%Hm. Needed anymore? +% \override Score.SpacingSpanner #'average-spacing-wishes = ##f + + % Refrain + + e4 g4. d8 | % 1 + d4 c2 | % 2 + c'4 bf a | % 3 + g4 a2 | % 4 + e4 g d | % 5 + d4 c c' | % 6 + bf4. c8 a4 | % 7 + g2. | % 8 + + e4 g4. d8 | % 9 + d4 c2 | % 10 + c'4 bf a | % 11 + g4 a2 | % 12 + e4 g4. d8 | % 13 + d4 c2 | % 14 + bf4 c d | % 15 + c2. | % 16 + + + % Verse + + g'4 c c | % 17 + d4 c2 | % 18 + d4 c bf | % 19 + af4 bf2 | % 20 + c4 bf af | % 21 + g4 f ef | % 22 + d4 ef f | % 23 + g2. | % 24 + + g4 c c | % 25 + d4 c ~ c | % 26 + d4 c bf | % 27 + af4 bf2 | % 28 + c4 bf af | % 29 + g4 f ef | % 30 + d4 ef d | % 31 + c2. | % 32 +} + + +LeadVoxText = \lyricmode +{ + Wait by the wa -- ter, + Watch -- ing the ri -- ver, + Sing -- ing a -- long as it + moves to the sea, + + Just like the lime -- stone, + let us be chan -- nels, + Jus -- tice, for -- give -- ness, + mer -- cy and peace. + + Just like the wat -- er, + pa -- tient, per -- sis -- tent, + Mov -- ing a boul -- der, and + mov -- ing the banks, + + Let us keep flow -- ing, _ + Build -- ing, des -- troy -- ing, + Ho -- ly the wa -- ter and + ho -- ly our thanks. +} + +LeadVoxTextB = \lyricmode +{ + _ _ _ _ _ + _ _ _ _ _ + _ _ _ _ _ _ + _ _ _ _ + + _ _ _ _ _ + _ _ _ _ _ + _ _ _ _ _ + _ _ _ _ + + When we are dry _ + Parched in our des -- erts, + Parched in the wil -- der -- ness, + wait -- ing for rain, + + Lead us to drink from the + spring ev -- er -- last -- ing + Once we ar -- rive, ne -- ver + thirs -- ty a -- gain. +} + + +Riffs = \relative c +{ + \clef G +%Hm. Needed anymore? +% \override Score.SpacingSpanner #'average-spacing-wishes = ##f + + % Intro + +% \tiny +% \repeat percent 4 { e8_\markup { \italic { bass figure } } e e e e e e e } | % 1-4 +% \normalsize +} + + +% +% Chord names +% +Chords = \chordmode +{ + % Refrain + + c2. | % 1 + s2. | % 2 + bf2. | % 3 + s2. | % 4 + c2. | % 5 + s2. | % 6 + bf2. | % 7 + g2. | % 8 + + c2. | % 9 + s2. | % 10 + bf2. | % 11 + s2. | % 12 + c2. | % 13 + s2. | % 14 + g2.:m | % 15 + c2. | % 16 + + + % Verse + + c2. | % 17 + s2. | % 18 + bf2. | % 19 + s2. | % 20 + af2. | % 21 + c2.:m | % 22 + bf2. | % 23 + g2. | % 24 + + c2. | % 25 + s2. | % 26 + bf2. | % 27 + s2. | % 28 + af2. | % 29 + c2.:m | % 30 + g2.:m | % 31 + f2. | % 32 +} + + +% +% Chord rhythms +% +% Use a RhythmicStaff on the chords instead of this? +% It almost works, but not quite. Doesn't collapse chords above to single notes... +% +Rhythm = \relative c +{ +%% \set Voice.autoBeaming = ##f +%% \set Staff.instrument = #"Rhythm" + \override Staff.TimeSignature #'style = #'() + \override NoteHead #'style = #'slash + +%Not small enough... + \teeny +% \magnify #0.3 + % Refrain + + | % 1 + | % 2 + | % 3 + | % 4 + | % 5 + | % 6 + | % 7 + | % 8 + + | % 9 + | % 10 + | % 11 + | % 12 + | % 13 + | % 14 + | % 15 + | % 16 + + + % Verse + + | % 17 + | % 18 + | % 19 + | % 20 + | % 21 + | % 22 + | % 23 + | % 24 + + | % 25 + | % 26 + | % 27 + | % 28 + | % 29 + | % 30 + | % 31 + | % 32 + \normalsize +} + + +Dynamics = +{ + s2.*2 | % 1-2 + s4_\markup { \bold \italic { Drums In } } s2 | % 3 + s2. | % 4 + s4_\markup { \bold \italic { Band In } } s2 | % 5 +} + + +\score +{ + << + \set Score.skipBars = ##t + \set Score.melismaBusyProperties = #'() + +% \new Staff + << + \new ChordNames \Chords +%Capo 4 edition +% \new ChordNames \transpose b g \Chords +% \new RhythmicStaff << \Rhythm \Dynamics >> + >> + + \new Staff + << + \Global % The "roadmap" that everything else depends on + \new Voice = "lead" \LeadVox +% \new Voice \Riffs + \new Lyrics \lyricsto "lead" \LeadVoxText + \new Lyrics \lyricsto "lead" \LeadVoxTextB + >> + >> +} + + +\paper +{ + #(define fonts (make-pango-font-tree + "Times New Roman" + "DomCasual BT" + "Luxi Mono" + (/ staffSize 20))) + +% Spread staves vertically across last page (default: t) +% ragged-last-bottom = ##f +% Don't spread staves vertically across the page (default: f) + ragged-bottom = ##t +% Allow partial line for last stave (default: f) +% ragged-last = ##t + +% To find out what's eating the space at the top... +% annotate-spacing = ##t +%let's try this: [It works! Huzzah!] + obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) +}