From: Shamus Hammons Date: Fri, 22 Sep 2017 23:35:35 +0000 (-0500) Subject: New chart "Garments Of Praise". X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=music;a=commitdiff_plain;h=9137601cceff4002cb036e9bf13ea7911d145170 New chart "Garments Of Praise". --- diff --git a/garments-of-praise.ly b/garments-of-praise.ly new file mode 100644 index 0000000..21080d2 --- /dev/null +++ b/garments-of-praise.ly @@ -0,0 +1,506 @@ +% Needs band direction, dynamics, figure annotations + +\version "2.19.0" +\include "pop-chords.ly" +\include "english.ly" + +% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26) +staffSize = #16 +#(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 "Garments Of Praise" } + composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Jamie Harville" } + arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" } + tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version)) +} + +% 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 = +{ + \clef G + \key g \major + \numericTimeSignature + \time 4/4 + + % Intro + + s1*4 \bar ".|:-||" % 1-4 + + \repeat volta 3 + { + % A Section + +% \mark \markup { \override #'(font-family . sans) { \box { A } } } + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" } + s1*15 | % 5-19 + } + \alternative + { + { + \set Score.repeatCommands = #'((volta "1.")) + s1 | % 20 + \set Score.repeatCommands = #'((volta #f)) + } + { + \set Score.repeatCommands = #'((volta "2.–3.") end-repeat) % That's an ndash in there... + s1 \bar "||" % 21 + \set Score.repeatCommands = #'((volta #f)) + } + } + + % B Section + + \mark \markup { \override #'(font-family . sans) { \box { B } } } + s1*14 \bar "||" % 22-35 + \once \override Score.RehearsalMark #'self-alignment-X = #right + \once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible + \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" } + s1*2 | % 36-37 + + \once \override Score.RehearsalMark #'self-alignment-X = #right + \mark \markup { \italic { D.S. al Coda } } + +\stopStaff s1 \startStaff +\set Score.currentBarNumber = #38 + + % Coda + + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { { \musicglyph #"scripts.coda" } "Coda" } + s1*2 \bar "||" % 38-39 + + % Outro + + \mark \markup { \override #'(font-family . sans) { \box { C } } } + s1*2 \bar ".|:-||" % 40-41 + + \repeat volta 2 + { + \mark \markup { \override #'(font-family . sans) { \box { D } } } + s1*8 \bar "||" % 42-49 + + \mark \markup { \override #'(font-family . sans) { \box { E } } } + s1*16 | % 50-65 + } + + s1 \bar "|." % 66 +} + + +% +% Lead vocal +% +LeadVox = \relative c'' +{ + % Intro + + R1*3 | % 1-3 + r2 r8 g16 g ~ g8 g16 a ~ | % 4 + + % A Section + + 8 4 8 2 ~ | % 5 + 4 r8 16 8. 16 ~ 8 | % 6 + 8. 16 ~ 8 ~ 2 ~ | % 7 + 4 r r r8 16 | % 8 + 8. 16 ~ 8 ~ 4 8 | % 9 + 4 r 4. 8 ~ | % 10 + 8 4. ~ 2 | % 11 + r2 r8 16 ~ 8 16 ~ | % 12 + 8 4 8 2 ~ | % 13 + 4 r8 16 8. 16 ~ 8 | % 14 + 8. 16 ~ 8 ~ 2 ~ | % 15 + 4 r r2 | % 16 + 8. 16 ~ 8 8. 16 ~ 8 | % 17 + 4 r 8. 16 ~ 8 ~ | % 18 + 8 4. ~ 2 | % 19 + + r2 r8 16 ~ 8 16 \laissezVibrer | % 20 + + r2 r4 8 | % 21 + + % B Section + + 4 8 ~ 4 8 ~ | % 22 + 2 r4 8 16 ~ | % 23 + 8 16 ~ 4 ~ 2 ~ | % 24 + 4 r r 8 | % 25 + 4 8 ~ 4 8 ~ | % 26 + 2 r4 r8 16 | % 27 + 16 8. ~ 4 ~ 2 ~ | % 28 + 4 r r 8 | % 29 + 4 8 ~ 4 8 ~ | % 30 + 2 r8 r16 8. | % 31 + 8. 16 ~ 4 ~ 2 ~ | % 32 + 4 r r 8 | % 33 + 8. 16 ~ 8 ~ 8 4. ~ | % 34 + 2 r4 r8 | % 35 + + 8. 16 ~ 8 ~ 4. ~ | % 36 + 2 r8 16 ~ 8 16 \laissezVibrer | % 37 + +s1 % Blank bar for coda + + % Coda + + 8. 16 ~ 8 ~ 4. ( | % 38 + 1 | % 39 + + 1 ) | % 40 + s1 | % 41 + + % Outro + + s1*7 | % 42-48 + s2. 8 | % 49 + + 4. 8 r 16 8. | % 50 + 4. 8 r 16 8. | % 51 + 8. 16 ~ 8 8. 16 ~ 8 | % 52 + 2 r4 8 | % 53 + 4. 8 r 16 8. | % 54 + 4. 8 r 16 8. | % 55 + 8. 16 ~ 8 8. 16 ~ 8 | % 56 + 2 r4 8 | % 57 + + 4. 8 r 16 8. | % 58 + 4. 8 r 16 8. | % 59 + 8. 16 ~ 8 8. 16 ~ 8 | % 60 + 2 r4 8 | % 61 + 4. 8 r 16 8. | % 62 + 4. 8 r 16 8. | % 63 + 8. 16 ~ 8 8. 16 ~ 8 | % 64 + 2 r2 | % 65 + + R1-\fermata | % 66 +} + + +LeadVoxText = \lyricmode +{ + Put on _ the gar -- _ ments of praise, _ + for the spi -- rit _ of hea -- vi -- _ ness, _ _ + Let the oil of _ glad -- _ ness flow down from your _ throne. _ + Put on _ the gar -- _ ments of praise, _ + for the spi -- rit _ of heav -- i -- _ ness, _ _ + your joy _ is my strength _ a -- lone, my strength _ a -- _ lone. _ + + Put on _ the gar- + + Make these bro -- ken wea -- _ ry bones _ + rise to dance _ a -- gain, _ _ _ + Wet this dry and thirs -- _ ty land _ + with a ri -- ver, _ _ _ + Lord our eyes are fixed _ on you, _ + and we are wait -- ing, _ _ _ + for your gar -- land _ of _ grace, _ + as we praise _ your _ name. _ + + Put on _ the gar- + + we praise _ your _ name _ _ + + Hal -- le -- lu jah, sing hal -- le -- lu -- jah, + we give all hon -- or _ and praise to _ your name, + Hal -- le -- lu jah, sing hal -- le -- lu -- jah, + we trade our sor -- rows _ for gar -- ments _ of praise. + + Hal -- le -- lu jah, sing hal -- le -- lu -- jah, + we give all hon -- or _ and praise to _ your name, + Hal -- le -- lu jah, sing hal -- le -- lu -- jah, + we trade our sor -- rows _ for gar -- ments _ of praise. +} + + +Riffs = \relative c'' +{ + \tiny + + s1*42 | % 1-41 (incl. blank coda bar) + + g16 a b c d8 d d16 c b8 c16 b a8 | % 43 + g16 a b c d8 d16 e f e d8 c4 | % 44 + g16 a b c d8 d d16 c b8 c16 b a8 | % 45 + g16 a b c d8 g, a16 g f8 g4 | % 46 + g16 a b c d8 d d16 c b8 c16 b a8 | % 47 + g16 a b c d8 d16 e f e d8 c4 | % 48 + g16 a b c d8 d d16 c b8 c16 b a8 | % 49 + g16 a b c d8 g, a16 g f8 g4 | % 50 + + \normalsize +} + + +% +% Chord names +% +Chords = \chordmode +{ + % Intro + + g1 | % 1 + s1 | % 2 + s1 | % 3 + s1 | % 4 + + % A Section + + g1 | % 5 + s2 g:sus4 | % 6 + s8. g16 s2. | % 7 + s1 | % 8 + d1 | % 9 + c1 | % 10 + g1 | % 11 + s1 | % 12 + s1 | % 13 + s2 g:sus4 | % 14 + s8. g16 s2. | % 15 + s1 | % 16 + d1 | % 17 + c1 | % 18 + g1 | % 19 + + s1 | % 20 + + s1 | % 21 + + % B Section + + c1 | % 22 + s1 | % 23 + g1 | % 24 + s1 | % 25 + c1 | % 26 + s1 | % 27 + d1 | % 28 + s1 | % 29 + c1 | % 30 + s1 | % 31 + e1:m | % 32 + s1 | % 33 + a1:m | % 34 + c1 | % 35 + + d1 | % 36 + s1 | % 37 + +s1 % blank bar for coda + + % Coda + + d1 | % 38 + c1 | % 39 + + g1 | % 40 + s1 | % 41 + + % Outro + + g1 | % 42 + s1 | % 43 + s1 | % 44 + s2 f4 c | % 45 + g1 | % 46 + s1 | % 47 + s1 | % 48 + s2 f4 c | % 49 + + g1 | % 50 + c4./g g8 s2 | % 51 + c8./g g16 s2. | % 52 + s2 f4 c | % 53 + g1 | % 54 + c4./g g8 s2 | % 55 + c8./g g16 s2. | % 56 + s2 f4 c | % 57 + + g1 | % 58 + c4./g g8 s2 | % 59 + c8./g g16 s2. | % 60 + s2 f4 c | % 61 + g1 | % 62 + c4./g g8 s2 | % 63 + c8./g g16 s2. | % 64 + s2 f4 c | % 65 + + g1 | % 66 +} + + +% +% Chord rhythms +% +StaffC = \relative c +{ + \numericTimeSignature + \override NoteHead #'style = #'slash + \teeny + + % Intro + + c8. c16 c8 c c c16 c c4 | % 1 + c8. c16 c8 c c c16 c c4 | % 2 + c8. c16 c8 c c c16 c c4 | % 3 + c8. c16 c8 c c c16 c c4 | % 4 + + % A Section + + c4 c c c | % 5 + c4 c c c | % 6 + c8. c16 ~ c4 c c | % 7 + c4 c c c | % 8 + c4 c c c | % 9 + c4 c c c | % 10 + c4 c c c | % 11 + c4 c c c | % 12 + c4 c c c | % 13 + c4 c c c | % 14 + c8. c16 ~ c4 c c | % 15 + c4 c c c | % 16 + c4 c c c | % 17 + c4 c c c | % 18 + c4 c c c | % 19 + + c4 c c c | % 20 + + c4 c c c | % 21 + + % B Section + + c4 c c c | % 22 + c4 c c c | % 23 + c4 c c c | % 24 + c4 c c c | % 25 + c4 c c c | % 26 + c4 c c c | % 27 + c4 c c c | % 28 + c4 c c c | % 29 + c4 c c c | % 30 + c4 c c c | % 31 + c4 c c c | % 32 + c4 c c c | % 33 + c4 c c c | % 34 + c4 c c c | % 35 + + c4 c c c | % 36 + c4 c c c | % 37 + +\stopStaff s1 \startStaff % blank bar for coda + + % Coda + + c4 c c c | % 38 + c4 c c c | % 39 + + c1 ~ | % 40 + c1 | % 41 + + % Outro + + c4 c c c | % 42 + c4 c c c | % 43 + c4 c c c | % 44 + c4 c c-> c-> | % 45 + c4 c c c | % 46 + c4 c c c | % 47 + c4 c c c | % 48 + c4 c c-> c-> | % 49 + + c4 c c c | % 50 + c4. c8 c4 c | % 51 + c8. c16 ~ c4 c c | % 52 + c4 c c-> c-> | % 53 + c4 c c c | % 54 + c4. c8 c4 c | % 55 + c8. c16 ~ c4 c c | % 56 + c4 c c-> c-> | % 57 + + c4 c c c | % 58 + c4. c8 c4 c | % 59 + c8. c16 ~ c4 c c | % 60 + c4 c c-> c-> | % 61 + c4 c c c | % 62 + c4. c8 c4 c | % 63 + c8. c16 ~ c4 c c | % 64 + c4 c c-> c-> | % 65 + + c1-\fermata | % 66 +} + + +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 +{ + << + \Global % The "roadmap" that everything else depends on + + \context Staff + << + \new Voice = "lead" \LeadVox + \new Voice = "riffs" \Riffs + \new Lyrics \lyricsto "lead" \LeadVoxText + >> + + \new ChoirStaff + << + \new ChordNames \Chords + \new RhythmicStaff << \StaffC \Dynamics >> + >> + + \set Score.skipBars = ##t + \set Score.melismaBusyProperties = #'() + >> +} + + +\paper +{ + #(define fonts (make-pango-font-tree + "Times New Roman" + "LilyJAZZText" + "Luxi Mono" + (/ staffSize 20))) + +% 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 = ##t + +% To find out what's eating the space at the top... +% annotate-spacing = ##t +} +