From: Shamus Hammons <jlhamm@acm.org>
Date: Wed, 11 Oct 2017 03:18:36 +0000 (-0500)
Subject: New chart "I Will Not Be Shaken".
X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=music;a=commitdiff_plain;h=5ad74b940e59fe222504ef3144502774bd452c64

New chart "I Will Not Be Shaken".
---

diff --git a/i-will-not-be-shaken.ly b/i-will-not-be-shaken.ly
new file mode 100644
index 0000000..69ef3a2
--- /dev/null
+++ b/i-will-not-be-shaken.ly
@@ -0,0 +1,616 @@
+\version "2.16.0"
+\include "pop-chords.ly"
+\include "english.ly"
+
+% Good sizes are 16, 18, & 20
+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 "(I Will Not Be) Shaken" }
+	composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "T.Guerrero" }
+	arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
+	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 =
+{
+	\key g \major
+	\numericTimeSignature
+	\time 4/4
+
+	% Intro
+
+	\repeat volta 2
+	{
+		s1*4 |   % 1-4
+	}
+
+	\repeat volta 2
+	{
+		% Verse
+
+		\mark \markup { \override #'(font-family . sans) { \box { A } } }
+		s1^\markup { \italic { (1st X Gtr 16ths) } } |   % 5
+		s1*7 \bar "||"   % 6-12
+		\mark \markup { \override #'(font-family . sans) { \box { A9 } } }
+		s8 s2..^\markup { \italic { (1st X Add Bass & Kick) } } |   % 13
+		s1*6 |   % 14-19
+		s1^\markup { \italic { (Drum Fill) } } \bar "||"   % 14-20
+
+		% Chorus
+
+		\mark \markup { \override #'(font-family . sans) { \box { B } } }
+		s8 s2..^\markup { \italic { (Snare 2&4) } } |   % 21
+		s1*10 \bar "||"   % 22-31
+	}
+	\alternative
+	{
+		{
+			s1*2 |   % 32-33
+		}
+		{
+			s1 |   % 34
+		}
+	}
+
+	s1 \bar "||"   % 35
+
+	% Bridge
+
+	\mark \markup { \override #'(font-family . sans) { \box { C } } }
+	s1*6 |   % 36-41
+	s1^\markup { \italic { (Add Gtr. 16ths) } } |   % 42
+	s1*2 |   % 43-44
+	s1^\markup { \italic { (Drum Fill) } } \bar ".|:-||"   % 45
+
+	% Solos
+
+	\repeat volta 2
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { D } } }
+		s8 s2..^\markup { \bold { Solos } } |   % 46
+		s1*2 |   % 47-48
+	}
+	\alternative
+	{
+		{
+			s1 |   % 49
+		}
+		{
+			s1 \bar "||"   % 50
+		}
+	}
+
+	% Verse
+
+	\mark \markup { \override #'(font-family . sans) { \box { E } } }
+	s16 s2...^\markup { \italic { (Add Gtr. 16ths) } } |   % 51
+	s1^\markup { \italic { (Women Echo) } } |   % 52
+	s1 |   % 53
+	s1^\markup { \italic { (Women Echo) } } |   % 54
+	s2.. s8^\markup { \italic { (Tutti) } } |   % 55
+	s1*2 |   % 56-57
+	s1^\markup { \italic { (Drum Fill) } } \bar ".|:-||"   % 58
+
+	\repeat volta 2
+	{
+		% Chorus
+
+		\mark \markup { \override #'(font-family . sans) { \box { F } } }
+		s1*8 |   % 59-66
+	}
+
+	s1 |   % 67
+
+	\repeat volta 2
+	{
+		% Chorus
+
+		\mark \markup { \override #'(font-family . sans) { \box { G } } }
+		s1*4 |   % 68-71
+	}
+
+	s1 \bar "|."   % 72
+}
+
+
+%
+% Lead vocal
+%
+LeadVox = \relative c'
+{
+	\clef G
+
+	% Intro
+
+	R1*3 |   % 1-3
+	s2 r4 r8 d8 |   % 4
+
+	% Verse
+
+	g4 a b g |   % 5
+	e2 r4 r8 e |   % 6
+	a4 b c g |   % 7
+	fs2 r4 r8 fs |   % 8
+	b4 c d r8 fs, |   % 9
+	g8. a16 ~ a8 b ~ b4 r8 e, |   % 10
+	a4 b c g |   % 11
+	fs2 r4 r8 d |   % 12
+
+	g4 a b g |   % 13
+	e2 r4 r8 e |   % 14
+	a4 b c g |   % 15
+	fs2 r4 r8 fs |   % 16
+	b4 c8. d16 ~ d4 r8 fs, |   % 17
+	g8. a16 ~ a8 b ~ b4 r8 e, |   % 18
+	a4 b c g |   % 19
+	fs2. r4 |   % 20
+
+	% Chorus
+
+	r4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn g,>16 ~ |   % 21
+	<e \hn g,>4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn c>16 ~ |   % 22
+	<e \hn c>4 <g \hn c,>16 <g \hn c,>8 <g \hn c,>16 ~ <g \hn c,> <a \hn c,>8 <b \hn e,>16 ~ <b \hn e,> <g \hn e>8 <a \hn d,>16 ~ |   % 23
+	<a \hn d,>8. d,16 <g \hn d> <g \hn d>8 <g \hn d>16 ~ <g \hn d> <fs \hn c>8 <e \hn c>16 ~ <e \hn c> <d \hn a>8. |   % 24
+
+	r4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn g,>16 ~ |   % 25
+	<e \hn g,>4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn c>16 ~ |   % 26
+	<e \hn c>8. <g \hn c,>16 <g \hn c,> <g \hn c,>8 <g \hn c,>16 ~ <g \hn c,> <a \hn c,>8 <b \hn e,>16 ~ <b \hn e,> <g \hn e>8 <a \hn d,>16 ~ |   % 27
+	<a \hn d,>8. d,16 <g \hn d> <g \hn d>8 <g \hn d>16 ~ <g \hn d> <fs \hn c>8 <e \hn c>16 ~ <e \hn c> <d \hn a>8. |   % 28
+	r4 <g \hn b,>16 <g \hn b,>8 <b \hn d,>16 ~ <b \hn d,> <b \hn d,>8 <a \hn c,>16 ~ <a \hn c,> <g \hn b,>8. |   % 29
+	R1 |   % 30
+	R1 |   % 31
+
+	R1 |   % 32
+	R1 |   % 33
+
+	R1 |   % 34
+
+	R1 |   % 35
+
+	% Bridge
+
+	r4 d'16 d8 d16 ~ d b8 c16 ~ c d8 c16 ~ |   % 36
+	c16 c8 c16 ~ c b8 a16 ( g4 ) r |   % 37
+	r8. a16 c c8 c16 ~ c b8 a16 ~ a8 g |   % 38
+	c8 b16 a ~ a g8 a16 ~ a4 r |   % 39
+	r8. <b \hn d,>16 <d \hn g,> <d \hn g,>8 <d \hn g,>16 ~ <d \hn g,> <b \hn d,>8 <c \hn e,>16 ~ <c \hn e,> <d \hn g,>8 <d \hn g,>16 ~ |   % 40
+	<d \hn g,>16 <c \hn e,>8 <c \hn e,>16 ~ <c \hn e,> <b \hn d,>8 <a \hn c,>16 ( <g \hn b,>4 ) r |   % 41
+	r4 <b \hn g \hn e>16 <b \hn g \hn e>8 <b \hn g \hn e>16 ~ <b \hn g \hn e> <g \hn e \hn b>8 <a \hn fs \hn d>16 ~ <a \hn fs \hn d> ( <b \hn g \hn e>8. ) |   % 42
+	r4 <c \hn a \hn e>16 <c \hn a \hn e>8 <c \hn a \hn e>16 ~ <c \hn a \hn e> <b \hn g \hn d>8 <a \hn e \hn c>16 ~ <a \hn e \hn c> <g \hn e \hn c>8. |   % 43
+	r8. <b \hn d,>16 <d \hn g,> <d \hn g,>8 <d \hn g,>16 ~ <d \hn g,> <b \hn d,>8 <c \hn e,>16 ~ <c \hn e,> << { \voiceOne d8. ~ } \context Voice = vb { \voiceTwo \hn g,8. ( } >> |   % 44
+	<< { \voiceOne d'2. } \context Voice = vb { \voiceTwo \hn fs,2. ) } >> \oneVoice r4 |   % 45
+
+	 % Solos
+
+	R1 |   % 46
+	R1 |   % 47
+	R1 |   % 48
+
+	R1 |   % 49
+
+	r2 r4 r8 d |   % 50
+
+	% Verse
+
+	g4 a b g |   % 51
+	e2. r8 e |   % 52
+	a4 b c g |   % 53
+	fs2 r4 r8 fs |   % 54
+	b4 c d r8 fs, |   % 55
+	g8. a16 ~ a8 b ~ b4 r8 e, |   % 56
+	a4 b <c \hn g \hn e>-> <d \hn g, \hn e>-> |   % 57
+	<d \hn a \hn fs>2.-> r4 |   % 58
+
+	% Chorus
+
+	r4 <g, \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn g,>16 ~ |   % 59
+	<e \hn g,>4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn c>16 ~ |   % 60
+	<e \hn c>4 <g \hn c,>16 <g \hn c,>8 <g \hn c,>16 ~ <g \hn c,> <a \hn c,>8 <b \hn e,>16 ~ <b \hn e,> <g \hn e>8 <a \hn d,>16 ~ |   % 61
+	<a \hn d,>8. d,16 <g \hn d> <g \hn d>8 <g \hn d>16 ~ <g \hn d> <fs \hn c>8 <e \hn c>16 ~ <e \hn c> <d \hn a>8. |   % 62
+
+	r4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn g,>16 ~ |   % 63
+	<e \hn g,>4 <g \hn b,>16 <g \hn b,>8 <g \hn b,>16 ~ <g \hn b,> <a \hn c,>8 <b \hn d,>16 ~ <b \hn d,>16 <g \hn b,>8 <e \hn c>16 ~ |   % 64
+	<e \hn c>8. <g \hn c,>16 <g \hn c,> <g \hn c,>8 <g \hn c,>16 ~ <g \hn c,> <a \hn c,>8 <b \hn e,>16 ~ <b \hn e,> <g \hn e>8 <a \hn d,>16 ~ |   % 65
+	<a \hn d,>8. d,16 <g \hn d> <g \hn d>8 <g \hn d>16 ~ <g \hn d> <fs \hn c>8 <e \hn c>16 ~ <e \hn c> <d \hn a>8. |   % 66
+
+	r4 <g \hn b,>16 <g \hn b,>8 <b \hn d,>16 ~ <b \hn d,> <b \hn d,>8 <a \hn c,>16 ~ <a \hn c,> <g \hn b,>8. |   % 67
+
+	% Outro
+
+	R1 |   % 68
+	R1 |   % 69
+	R1 |   % 70
+	r4 <g \hn b,>16 <g \hn b,>8 <b \hn d,>16 ~ <b \hn d,> <b \hn d,>8 <a \hn c,>16 ~ <a \hn c,> <g \hn b,>8. |   % 71
+	R1-\fermata |   % 72
+}
+
+LeadVoxText = \lyricmode
+{
+	My soul finds rest in you,
+	my for -- tress and my rock,
+	my hope for life, my hid -- ing _ place, _
+	my re -- fuge and my God.
+
+	In you I've found my home,
+	my shel -- ter from the storm,
+	and I'll pour out _ my hear to _ you, _
+	and lean u -- pon your throne.
+
+	I will put _ my trust _ in you, _
+	I will put _ my hope _ there too, _
+	I will stand _ u -- pon _ your word, _
+	and I will not _ be sha -- _ ken,
+
+	I will let _ my prai -- _ ses show, _
+	hold -- ing on _ to what _ I know, _
+	be -- cause I know _ you're al -- _ ways there, _
+	and I will not _ be sha -- _ ken,
+	I will not _ be sha -- _ ken.
+
+	I will not _ be moved, _ I'm lean -- _ ing on _ the throne, _
+	be -- cause you died _ for me _ and called me to _ your own, _
+	and e -- ven when _ the dark -- _ est winds _ be -- gin _ to blow, _
+	I will stand _ my ground, _ _ I will not _ be moved, _ _
+	and I will not _ be sha -- _ ken. _
+
+	My soul finds rest in you,
+	my for -- tress and my rock,
+	my hope for life, my hid -- ing _ place, _
+	my re -- fuge and my God.
+
+	I will put _ my trust _ in you, _
+	I will put _ my hope _ there too, _
+	I will stand _ u -- pon _ your word, _
+	and I will not _ be sha -- _ ken,
+
+	I will let _ my prai -- _ ses show, _
+	hold -- ing on _ to what _ I know, _
+	be -- cause I know _ you're al -- _ ways there, _
+	and I will not _ be sha -- _ ken,
+	I will not _ be sha -- _ ken.
+
+	I will not _ be sha -- _ ken.
+}
+
+
+Riffs = \relative c''
+{
+	\clef G
+
+	\tiny
+
+	% Intro
+
+%{	e8 e ~ |   % 0
+	e8 cs4 b8 ~ b a4 b8 ~ |   % 1
+	b8 cs4. ~ cs4 e8 e ~ |   % 2
+	e8 cs4 b8 ~ b cs4 a8 ~ |   % 3
+	a2 s2 |    % 4
+%}
+	\normalsize
+}
+
+
+%
+% Chord names
+%
+Chords = \chordmode
+{
+	% Intro
+
+	g4:sus2 s8. c16:sus2 s2 |   % 1
+	g4:sus2 s8. c16:sus2 s2 |   % 2
+	g4:sus2 s8. c16:sus2 s2 |   % 3
+	e4:m7 s8. d16 s2 |   % 4
+
+	% Verse
+
+	g1:sus2 |   % 5
+	c1:sus2 |   % 6
+	a1:m7 |   % 7
+	d1 |   % 8
+	b1:m7 |   % 9
+	e1:m7 |   % 10
+	a1:m7 |   % 11
+	d1 |   % 12
+
+	g1:sus2 |   % 13
+	c1:sus2 |   % 14
+	a1:m7 |   % 15
+	d2 d/c |   % 16
+	b1:m7 |   % 17
+	c1:sus2 |   % 18
+	a1:m7 |   % 19
+	d2. c4:sus2 |   % 20
+
+	% Chorus
+
+	g1:sus2 |   % 21
+	c1:sus2 |   % 22
+	a1:m7 |   % 23
+	d4..:sus4 d16 s2 |   % 24
+	g1:sus2 |   % 25
+	c4..:sus2 g16/b s2 |   % 26
+	a1:m7 |   % 27
+	d4..:sus4 d16 s2 |   % 28
+	c4..:sus2 d16 s2 |   % 29
+	g4..:sus2 c16:sus2 s2 |   % 30
+	g4..:sus2 c16:sus2 s2 |   % 31
+
+	g4..:sus2 c16:sus2 s2 |   % 32
+	e4..:m7 d16 s2 |   % 33
+
+	g4..:sus2 c16:sus2 s2 |   % 34
+
+	g4..:sus2 c16:sus2 s2 |   % 35
+
+	% Bridge
+
+	g1:sus2 |   % 36
+	c1:sus2 |   % 37
+	a1:m7 |   % 38
+	c2:sus2 d4 c:sus2 |   % 39
+	g1:sus2 |   % 40
+	c1:sus2 |   % 41
+	e1:m7 |   % 42
+	f1:3.5.9 |   % 43
+	d1:sus4 |   % 44
+	d1 |   % 45
+
+	% Solos
+
+	g4..:sus2 c16:sus2 s2 |   % 46
+	g4..:sus2 c16:sus2 s2 |   % 47
+	g4..:sus2 c16:sus2 s2 |   % 48
+
+	e4..:m7 d16 s2 |   % 49
+
+	e4..:m7 d16 s2 |   % 50
+
+	% Verse
+
+	g1:sus2 |   % 51
+	c1:sus2 |   % 52
+	a1:m7 |   % 53
+	d2 d/c |   % 54
+	b1:m7 |   % 55
+	e1:m7 |   % 56
+	a1:m7 |   % 57
+	d2. c4:sus2 |   % 58
+
+	% Chorus
+
+	g1:sus2 |   % 59
+	c1:sus2 |   % 60
+	a1:m7 |   % 61
+	d4..:sus4 d16 s2 |   % 62
+	g1:sus2 |   % 63
+	c4..:sus2 g16/b s2 |   % 64
+	a1:m7 |   % 65
+	d4..:sus4 d16 s2 |   % 66
+
+	c4..:sus2 d16 s2 |   % 67
+
+	% Outro
+
+	g4..:sus2 c16:sus2 s2 |   % 68
+	g4..:sus2 c16:sus2 s2 |   % 69
+	g4..:sus2 c16:sus2 s2 |   % 70
+	e4..:m7 d16 s2 |   % 71
+
+	g1:sus2 |   % 72
+}
+
+
+%
+% Chord rhythms
+%
+Rhythm = \relative c
+{
+	\numericTimeSignature
+	\override NoteHead #'style = #'slash
+	\stemDown
+	\teeny
+
+	% Intro
+
+	c4 c8. c16-> ~ c4 c |   % 1
+	c4 c8. c16-> ~ c4 c |   % 2
+	c4 c8. c16-> ~ c4 c |   % 3
+	c4 c8. c16-> ~ c4 c |   % 4
+
+	% Verse
+
+	c1 |   % 5
+	c1 |   % 6
+	c1 |   % 7
+	c1 |   % 8
+	c1 |   % 9
+	c1 |   % 10
+	c1 |   % 11
+	c1 |   % 12
+
+	c1 |   % 13
+	c1 |   % 14
+	c1 |   % 15
+	c2 c |   % 16
+	c1 |   % 17
+	c1 |   % 18
+	c1 |   % 19
+	c4 c c c-> |   % 20
+
+	% Chorus
+
+	c4.. c16-> ~ c4 c |   % 21
+	c4.. c16-> ~ c4 c |   % 22
+	c4.. c16-> ~ c4 c |   % 23
+	c4.. c16-> ~ c4 c |   % 24
+	c4.. c16-> ~ c4 c |   % 25
+	c4.. c16-> ~ c4 c |   % 26
+	c4.. c16-> ~ c4 c |   % 27
+	c4.. c16-> ~ c4 c |   % 28
+	c4.. c16-> ~ c4 c |   % 29
+	c4 c8. c16-> ~ c4 c |   % 30
+	c4 c8. c16-> ~ c4 c |   % 31
+
+	c4 c8. c16-> ~ c4 c |   % 32
+	c4 c8. c16-> ~ c4 c |   % 33
+
+	c4 c8. c16-> ~ c4 c |   % 34
+
+	c4 c8. c16-> ~ c4 c |   % 35
+
+	% Bridge
+
+	c1 |   % 36
+	c1 |   % 37
+	c1 |   % 38
+	c2 c4 c-> |   % 39
+	c1 |   % 40
+	c1 |   % 41
+	c1-> |   % 42
+	c1-> |   % 43
+	c1-> |   % 44
+	c4 c c c |   % 45
+
+	% Solos
+
+	c4 c8. c16-> ~ c4 c |   % 46
+	c4 c8. c16-> ~ c4 c |   % 47
+	c4 c8. c16-> ~ c4 c |   % 48
+
+	c4 c8. c16-> ~ c4 c |   % 49
+
+	c4 c8. c16-> ~ c4 c |   % 50
+
+	% Verse
+
+	c1 |   % 51
+	c1 |   % 52
+	c1 |   % 53
+	c2 c |   % 54
+	c1 |   % 55
+	c1 |   % 56
+	c1 |   % 57
+	c4 c c c-> |   % 58
+
+	% Chorus
+
+	c4.. c16-> ~ c4 c |   % 59
+	c4.. c16-> ~ c4 c |   % 60
+	c4.. c16-> ~ c4 c |   % 61
+	c4.. c16-> ~ c4 c |   % 62
+	c4.. c16-> ~ c4 c |   % 63
+	c4.. c16-> ~ c4 c |   % 64
+	c4.. c16-> ~ c4 c |   % 65
+	c4.. c16-> ~ c4 c |   % 66
+
+	c4 c8. c16 ~ c2 |   % 67
+
+	% Outro
+
+	c4 c8. c16-> ~ c2 |   % 68
+	c4 c8. c16-> ~ c2 |   % 69
+	c4 c8. c16-> ~ c4 c |   % 70
+	c4 c8. c16-> ~ c4 c |   % 71
+
+	c1-\fermata |   % 72
+}
+
+
+Dynamics =
+{
+	s1_\f |   % 1
+
+	s1*3
+
+	s1_\mf |   % 5
+
+	s1*14
+
+	s4 s2._\< |   % 20
+	s1_\ff |   % 21
+
+	s1*23
+
+	s2 s_\< |   % 45
+	s1_\! |   % 46
+
+	s1*4
+
+	s1_\mf |   % 51
+
+	s1*6
+
+	s4 s2._\< |   % 58
+	s1_\ff |   % 59
+
+	s1*11
+
+	s2 s_\markup { \italic { Last X Rit. } } |   % 71
+}
+
+
+\score
+{
+	<<
+		\set Score.skipBars = ##t
+		\set Score.melismaBusyProperties = #'()
+		\Global		% The "roadmap" that everything else depends on
+
+		\context Staff
+		<<
+			\new Voice = "lead" \LeadVox
+			\new Voice \Riffs
+			\new Lyrics = "verse1" \lyricsto "lead" \LeadVoxText
+		>>
+
+		\new ChoirStaff
+		<<
+			\new ChordNames \Chords
+%Capo 4 edition
+%			\new ChordNames \transpose b g \Chords
+			\new RhythmicStaff << \Rhythm \Dynamics >>
+		>>
+	>>
+}
+
+
+\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
+}
+