From: Shamus Hammons Date: Wed, 19 Dec 2018 03:32:39 +0000 (-0600) Subject: New charts "America the Beautiful" and "Carol of the Bells". X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=music;a=commitdiff_plain;h=82e09116fc5c8287c3c62309f6ce4cd86aefe478 New charts "America the Beautiful" and "Carol of the Bells". --- diff --git a/carol-of-the-bells.ly b/carol-of-the-bells.ly new file mode 100644 index 0000000..bb99bd9 --- /dev/null +++ b/carol-of-the-bells.ly @@ -0,0 +1,551 @@ +\version "2.16.0" +\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 +{ + title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Carol of the Bells" } +% subtitle = \markup { \override #'(font-family . sans) \fontsize #1.3 "Genevan Psalter, 1551" } + composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Traditional" } + arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "Transcr. S. Hammons" } + tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version)) +} + + +% +% Lead vocal +% + +LeadVox = \relative c'' +{ + \set Staff.instrumentName = #"Sop." + \clef G + \key fs \minor + \numericTimeSignature + \time 3/4 + + % Intro + + s2. | % 1 + s2. | % 2 + s2. | % 3 + s2. | % 4 + + % Verse + + a4 gs8 a fs4 ~ | % 5 + fs2. ~ | % 6 + fs2. ~ | % 7 + fs2. | % 8 + + r2. | % 9 + r2. | % 10 + r2. | % 11 + r2. | % 12 + + r2. | % 13 + r2. | % 14 + r2. | % 15 + r2. | % 16 + + a4 gs8 a fs4 | % 17 + a4 gs8 a fs4 | % 18 + a4 gs8 a fs4 | % 19 + a4 gs8 a fs4 | % 20 + + a4 gs8 a fs4 | % 21 + a4 gs8 a fs4 | % 22 + a4 gs8 a fs4 | % 23 + a4 gs8 a fs4 | % 24 + + a4 gs8 a fs4 | % 25 + a4 gs8 a fs4 | % 26 + a4 gs8 a fs4 | % 27 + a4 gs8 a fs4 | % 28 + + a4 gs8 a fs4 | % 29 + a4 gs8 a fs4 | % 30 + a4 gs8 a fs4 | % 31 + a4 gs8 a fs4 | % 32 + + cs'4 b8 cs a4 | % 33 + cs4 b8 cs a4 | % 34 + cs4 b8 cs a4 | % 35 + cs4 b8 cs a4 | % 36 + + fs'8 fs fs fs e ( d ) | % 37 + cs4 cs8 cs b ( a ) | % 38 + b4 b8 b cs ( b ) | % 39 + fs4 fs8 fs fs4 | % 40 + + cs8 ds es fs gs a | % 41 + b8 cs b4 a | % 42 + cs,8 ds es fs gs a | % 43 + b8 cs b4 a | % 44 + + a4 gs8 a fs4 | % 45 + a4 gs8 a fs4 | % 46 + a4 gs8 a fs4 | % 47 + a4 gs8 a fs4 | % 48 + + a4 gs8 a fs4 | % 49 + a4 gs8 a fs4 | % 50 + a4 gs8 a fs4 | % 51 + a4 gs8 a fs4 | % 52 + + r2. | % 53 + r2. | % 54 + r2. | % 55 + r2. | % 56 + + r2. | % 57 + r2. | % 58 + r2. | % 59 + r2. | % 60 + + a4 gs8 a fs4 ~ | % 61 + fs2. ~ | % 62 + fs2. ~ | % 63 + fs2. ~ | % 64 + fs2.-\fermata \bar "|." % 65 +} + +AltoVox = \relative c'' +{ + \set Staff.instrumentName = #"Alto" + \clef G + \key fs \minor + \numericTimeSignature + \time 3/4 + + % Intro + + s2. | % 1 + s2. | % 2 + s2. | % 3 + s2. | % 4 + + % Verse + + r2. | % 5 + r2. | % 6 + r2. | % 7 + r2. | % 8 + + a4 gs8 a fs4 ~ | % 9 + fs2. ~ | % 10 + fs2. ~ | % 11 + fs2. | % 12 + + r2. | % 13 + r2. | % 14 + r2. | % 15 + r2. | % 16 + + r2. | % 17 + r2. | % 18 + r2. | % 19 + r2. | % 20 + + fs2. | % 21 + e2. | % 22 + d2. | % 23 + cs2. | % 24 + + fs2. | % 25 + e2. | % 26 + d2. | % 27 + cs2. | % 28 + + fs4 fs8 fs fs4 | % 29 + fs4 fs8 fs fs4 | % 30 + fs4 fs8 fs fs4 | % 31 + fs4 fs8 fs fs4 | % 32 + + a4 gs8 a fs4 | % 33 + a4 gs8 a fs4 | % 34 + a4 gs8 a fs4 | % 35 + a4 gs8 a fs4 | % 36 + + fs8 fs fs fs fs4 | % 37 + fs4 fs8 fs fs4 | % 38 + fs4 fs8 fs fs fs | % 39 + fs4 fs8 fs fs4 | % 40 + + r2. | % 41 + ds8 ds es4 fs | % 42 + r2. | % 43 + r2. | % 44 + + cs2. | % 45 + b2. | % 46 + e2. | % 47 + d2. | % 48 + + cs2. ~ | % 49 + cs2. ~ | % 50 + cs2. ~ | % 51 + cs2. | % 52 + + r2. | % 53 + r2. | % 54 + r2. | % 55 + r2. | % 56 + + r2. | % 57 + r2. | % 58 + r2. | % 59 + r2. | % 60 + + r2. | % 61 + e4 b8 d cs4 ~ | % 62 + cs2. ~ | % 63 + cs2. ~ | % 64 + cs2.-\fermata \bar "|." % 65 +} + +TenorVox = \relative c' +{ + \set Staff.instrumentName = #"Tenor" + \clef F + \key fs \minor + \numericTimeSignature + \time 3/4 + + % Intro + + s2. | % 1 + s2. | % 2 + s2. | % 3 + s2. | % 4 + + % Verse + + r2. | % 5 + r2. | % 6 + r2. | % 7 + r2. | % 8 + + r2. | % 9 + r2. | % 10 + r2. | % 11 + r2. | % 12 + + r2. | % 13 + r2. | % 14 + r2. | % 15 + r2. | % 16 + + r2. | % 17 + r2. | % 18 + r2. | % 19 + r2. | % 20 + + % Verse + + r2. | % 21 + r2. | % 22 + r2. | % 23 + r2. | % 24 + + d2. | % 25 + cs2. | % 26 + b2. | % 27 + fs2. | % 28 + + b4 b8 b b4 | % 29 + cs4 cs8 cs cs4 | % 30 + d4 d8 d d4 | % 31 + cs4 cs8 cs cs4 | % 32 + + cs4 cs8 cs cs4 | % 33 + ds4 ds8 ds ds4 | % 34 + e4 d8 d cs4 | % 35 + cs4 cs8 cs cs4 | % 36 + + cs8 cs cs cs a4 | % 37 + cs4 cs8 cs cs4 | % 38 + d4 d8 d e d | % 39 + cs4 cs8 cs cs4 | % 40 + + cs8 cs cs cs cs cs | % 41 + cs8 cs cs4 cs | % 42 + cs8 cs cs cs cs cs | % 43 + cs8 cs cs4 cs | % 44 + + e,2. | % 45 + d2. | % 46 + cs2. | % 47 + b2. | % 48 + + fs2. ~ | % 49 + fs2. ~ | % 50 + fs2. ~ | % 51 + fs2. | % 52 + + r2. | % 53 + r2. | % 54 + r2. | % 55 + r2. | % 56 + + r2. | % 57 + r2. | % 58 + r2. | % 59 + r2. | % 60 + + r2. | % 61 + r2. | % 62 + a'4 gs8 a fs4 ~ | % 63 + fs2. ~ | % 64 + fs2.-\fermata \bar "|." % 65 +} + +BassVox = \relative c +{ + \set Staff.instrumentName = #"Bass" + \clef F + \key fs \minor + \numericTimeSignature + \time 3/4 + + % Intro + + s2. | % 1 + s2. | % 2 + s2. | % 3 + s2. | % 4 + + % Verse + + r2. | % 5 + r2. | % 6 + r2. | % 7 + r2. | % 8 + + r2. | % 9 + r2. | % 10 + r2. | % 11 + r2. | % 12 + + r2. | % 13 + r2. | % 14 + r2. | % 15 + r2. | % 16 + + r2. | % 17 + r2. | % 18 + r2. | % 19 + r2. | % 20 + + % Verse + + r2. | % 21 + r2. | % 22 + r2. | % 23 + r2. | % 24 + + r2. | % 25 + r2. | % 26 + r2. | % 27 + r2. | % 28 + + cs4 cs8 cs cs4 | % 29 + fs4 fs8 fs fs4 | % 30 + b4 b8 b b4 | % 31 + fs4 fs8 fs fs4 | % 32 + + fs4 fs8 fs fs4 | % 33 + fs4 fs8 fs fs4 | % 34 + fs4 fs8 fs fs4 | % 35 + fs4 fs8 fs fs4 | % 36 + + a8 a a a a fs | % 37 + a4 a8 a fs4 | % 38 + a4 gs8 a fs4 | % 39 + a4 gs8 a fs4 | % 40 + + a4 gs8 a fs4 | % 41 + a4 gs8 a fs4 | % 42 + a4 gs8 a fs4 | % 43 + a4 gs8 a fs4 | % 44 + + e2. | % 45 + d2. | % 46 + cs2. | % 47 + b2. | % 48 + + fs2. ~ | % 49 + fs2. ~ | % 50 + fs2. ~ | % 51 + fs2. | % 52 + + r2. | % 53 + r2. | % 54 + r2. | % 55 + r2. | % 56 + + r2. | % 57 + r2. | % 58 + r2. | % 59 + r2. | % 60 + + r2. | % 61 + r2. | % 62 + r2. | % 63 + e'4 b cs | % 64 + fs,2.-\fermata \bar "|." % 65 +} + + +Riffs = \relative c' +{ + \teeny +%{ + 2. \times 2/3 { 8 } | % 1 + 4 | % 2 + s1*3 + r4 \times 2/3 { 8 } 4 | % 6 + s1*3 + r4 \times 2/3 { 8 } 4 | % 10 + s1*3 + r4 \times 2/3 { 8 } 4 | % 14 +%} +} + + +LeadVoxText = \lyricmode +{ + Hark hear the bells __ _ _ _ + + Hark how the bells + sweet sil -- ver bells + all seem to say + throw cares a -- way + + Christ -- mas is here + bring -- ing good cheer + to young and old, + meek and the bold + + Ring ring a dong, + that is their song + ring joy -- ful ring + all ca -- ro -- ling + + One seems to hear + words of good cheer + from ev' -- ry -- where + fill -- ing the air + + O, how they pound + rai -- sing the sound + o'er hill and dale + tell -- ing their tale + + Gay _ -- ly they ring _ + while peo -- ple sing _ + songs of good cheer _ + Christ -- mas is here + + Mer -- ry mer -- ry mer -- ry + mer -- ry Christ -- mas + Mer -- ry mer -- ry mer -- ry + mer -- ry Christ -- mas + + Hark how they send + on with -- out end + ring joy -- ful tome + to ev' -- ry home + + Hark how the bells + sweet sil -- ver bells + all seem to say + throw cares a -- way + + Ring ding -- a -- ling __ _ _ _ _ +} + +LeadVoxTextB = \lyricmode +{ + Sweet sil -- ver bells __ _ _ _ +} + +LeadVoxTextC = \lyricmode +{ +} + +LeadVoxTextD = \lyricmode +{ +} + + +Dynamics = +{ +%{ + s4_\markup { \italic { snare on 4, bass 8th notes } } s2. | % 1 + s1*26 | % 2-27 + s2 s4 \< s | % 28 + s4_\f s_\markup { \hspace #0.0 \raise #-2.0 \italic { snare 2 & 4 } } s2 | % 29 + s1*8 | % 30-37 + s2 s4 \< s \! | % 38 + s1 | % 39 + s2. s8 \> s \! | % 40 + s4_\markup { \hspace #0.0 \raise #-2.0 \italic { bass 8th notes, band builds each repeat } } s2. | % 41 + s1*8 | % 42-49 + s4 \< s2. | % 50 + s4_\f s2. | % 51 + s1*5 | % 52-56 + s4_\markup { \hspace #0.0 \raise #-2.0 \italic { rit. last time } } s2. | % 57 + s2 s4 \< s \! | % 58 +%} +} + + +\score +{ + << + \new ChoirStaff = "Rhythm" + << + \new Staff = UpperStaffA { << \new Voice = "lead" \LeadVox \new Voice \Riffs >> } + \new Lyrics \lyricsto "lead" \LeadVoxText + \new Lyrics \lyricsto "lead" \LeadVoxTextC + \new Lyrics \lyricsto "lead" \LeadVoxTextD + \new Staff = UpperStaffB { \new Voice = "alto" \AltoVox } + \new Lyrics \lyricsto "alto" \LeadVoxTextB + \new Staff = LowerStaffA { \new Voice = "tenor" \TenorVox } + \new Staff = LowerStaffB { \new Voice = "bass" \BassVox } + >> + + \set Score.skipBars = ##t + \set Score.melismaBusyProperties = #'() + >> +} + + +\paper +{ + #(define fonts (make-pango-font-tree + "Times New Roman" + "JazzText" + "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 +} + diff --git a/covers/america-the-beautiful.ly b/covers/america-the-beautiful.ly new file mode 100644 index 0000000..a854e5e --- /dev/null +++ b/covers/america-the-beautiful.ly @@ -0,0 +1,296 @@ +% Need to change chart to add dbl p/c+c, add dynamics, band indications + +\version "2.19.48" +\include "../pop-chords.ly" +\include "english.ly" + +% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26) +staffSize = #20 +#(set-default-paper-size "letter") +#(set-global-staff-size staffSize) +#(ly:set-option (quote no-point-and-click)) + +%{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %} + +\header +{ + title = \markup { \override #'(font-family . sans) \fontsize #3.5 "America, the Beautiful" } + composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Samuel Ward/Katherine Lee Bates" } +% arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" } + tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version)) +} + + +% +% Song's structure +% +Global = +{ + \clef G + \key c \major + \numericTimeSignature + \time 4/4 + + \repeat volta 4 + { + % Verse + + \partial 4*1 { s4 } + +% \mark \markup { \override #'(font-family . sans) { \box { A } } } + s1 %^\markup { \italic { w/Rhythm Fig. 1 (thru B) } } + s1*3 \break + s1*4 \break + s1*4 \break + s1*3 + \partial 4*3 { s2. } % 5-12 + } +} + + +% +% Lead vocal +% +LeadVox = \relative c'' +{ + % Verse + + g4 | % 0 + + g4. e8 e4 g | % 1 + g4. d8 d4 e | % 2 + f4 g a b | % 3 + g2. g4 | % 4 + + g4. e8 e4 g | % 5 + g4. d8 d4 d' | % 6 + cs4 d e a, | % 7 + d2. g,4 | % 8 + + e'4. e8 d4 c | % 9 + c4. b8 b4 c | % 10 + d4 b a g | % 11 + c2. c4 | % 12 + + c4. a8 a4 c | % 13 + c4. g8 g4 g | % 14 + a4 c g d' | % 15 + c2. | % 16 +} + + +LeadVoxText = \lyricmode +{ + << + { O beau -- ti -- ful for spa -- cious skies, + For am -- ber waves of grain, + For pur -- ple moun -- tain ma -- jes -- ties, + A -- bove the frui -- ted plain! + A -- me -- ri -- ca! A -- me -- ri -- ca! + God shed his grace on thee, + And crown thy good with bro -- ther -- hood + From sea to shi -- ning sea! } + + \new Lyrics = "verse2" \with { alignBelowContext = #"verse1" } + { \set associatedVoice = "Lead" + O beau -- ti -- ful for pil -- grim feet, + Whose stern im -- pas -- sioned stress, + A thor -- ough -- fare for free -- dom beat + A -- cross the wil -- der -- ness! + A -- me -- ri -- ca! A -- me -- ri -- ca! + God mend thine e -- v'ry flaw, + Con firm thy soul in self con -- trol + Thy li -- ber -- ty in law! } + + \new Lyrics = "verse3" \with { alignBelowContext = #"verse2" } + { \set associatedVoice = "Lead" + O beau -- ti -- ful for he -- roes proved + In li -- ber -- a -- ting strife, + Who more than self their coun -- try loved, + And mer -- cy more than life! + A -- me -- ri -- ca! A -- me -- ri -- ca! + May God thy gold re -- fine, + Till all suc -- cess be no -- ble -- ness, + And e -- v'ry gain di -- vine! } + + \new Lyrics = "verse4" \with { alignBelowContext = #"verse3" } + { \set associatedVoice = "Lead" + O beau -- ti -- ful for pa -- triot dream, + That sees be -- yond the years, + Thine a -- la -- bas -- ter ci -- ties gleam, + Un -- dimmed by hu -- man tears! + A -- me -- ri -- ca! A -- me -- ri -- ca! + God shed his grace on thee, + And crown thy good with bro -- ther -- hood + From sea to shi -- ning sea! } + >> +} + + +Riffs = \relative c' +{ + % Intro + +%{ \tiny + r4 g g8 a b c ~ | % 1 + c8 c b a g a b c ~ | % 2 + c8 c b a g a b c ~ | % 3 + c8 c b a g2 | % 4 + + s1*24 + + r4 g g8 a b c ~ | % 29 + c8 c b a g a b c ~ | % 30 + c8 c b a g a b c ~ | % 31 + c8 c b a g2 | % 32 + + s1*8 + + r4 g g8 a b c ~ | % 41 + c8 c b a g a b c ~ | % 42 + c8 c b a g d' e f ~ | % 43 + f8 f e d g2-\fermata | % 44 +%} +} + + +% +% Chord names +% +Chords = \chordmode +{ + % Verse + + s4 | % 0 + + c1 | % 1 + g1 | % 2 + g1:7 | % 3 + c1 | % 4 + + c1 | % 5 + g1 | % 6 + a1:7 | % 7 + d2:7 g:7 | % 8 + + c1 | % 9 + g1 | % 10 + g1:7 | % 11 + c2. c4:7 | % 12 + + f1 | % 13 + c1 | % 14 + f2 g:7 | % 15 + c2. | % 16 +} + + +% +% Chord rhythms +% +StaffC = \relative c +{ + \numericTimeSignature + \override NoteHead #'style = #'slash + \teeny + + % Verse + + c4 | % 0 + + c1 | % 1 + c1 | % 2 + c1 | % 3 + c2 r8 c4-> c8-> ~ | % 4 + + c1 | % 5 + c1 | % 6 + c1 | % 7 + c2 r8 c4-> c8-> ~ | % 8 + + c1 | % 9 + c1 | % 10 + c1 | % 11 + c2 r8 c4-> c8-> ~ | % 12 + + c2. ~ c8 c ~ | % 13 + c8 c4 c8 ~ c4 c ~ | % 14 + c8 c4 c8 ~ c4 c ~ | % 15 + c2. | % 16 +} + + +Dynamics = +{ +%{ + s1_\markup { \italic { snare pat. } } | % 1 + s1_\markup { \italic { simile } } | % 2 + s1*19 + s1_\markup { \italic { spacy } } | % 22 + s1*5 + s1 s \< s \! | % 28 + s1*22 + s1_\markup { \italic { Last time } } | % 51 +%} +} + + +\score +{ + << + +% \new ChoirStaff + << + \new ChordNames \Chords +% \new RhythmicStaff << \StaffC \Dynamics >> + >> + + \new Staff + << + \Global % The "roadmap" that everything else depends on + \new Voice = "lead" \LeadVox +% \new Voice = "riffs" \Riffs + \new Lyrics = "verse1" \lyricsto "lead" \LeadVoxText + >> + + \set Score.skipBars = ##t + \set Score.melismaBusyProperties = #'() + >> +} + +%{ +\layout +{ + \context + { + \Staff \override VerticalAxisGroup.default-staff-staff-spacing.basic-distance = #30 + } +} +%} + +\paper +{ + #(define fonts (make-pango-font-tree + "Times New Roman" + "LilyJAZZText" + "Luxi Mono" + (/ staffSize 20))) + +% basic-distance does nothing, so padding it is... + system-system-spacing = #'((padding . 10.0)) + markup-system-spacing = #'((padding . 10.0)) +% system-system-spacing = #'((basic-distance . 10.0) (padding . 10.0)) +% markup-system-spacing = #'((basic-distance . 10.0) (padding . 10.0)) +% system-system-spacing #'basic-distance = #10 +% markup-system-spacing #'basic-distance = #10 +% Don't 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 = ##f + +% To find out what's eating the space at the top... +% annotate-spacing = ##t +} + diff --git a/everlasting-god.ly b/everlasting-god.ly index 6921661..687b05d 100644 --- a/everlasting-god.ly +++ b/everlasting-god.ly @@ -1,4 +1,4 @@ -% Need to finish chart, add dynamics, band indications +% Need to change chart to add dbl p/c+c, add dynamics, band indications \version "2.19.48" \include "pop-chords.ly"