]> Shamusworld >> Repos - music/commitdiff
New chart "I Will Not Be Shaken".
authorShamus Hammons <jlhamm@acm.org>
Wed, 11 Oct 2017 03:18:36 +0000 (22:18 -0500)
committerShamus Hammons <jlhamm@acm.org>
Wed, 11 Oct 2017 03:18:36 +0000 (22:18 -0500)
i-will-not-be-shaken.ly [new file with mode: 0644]

diff --git a/i-will-not-be-shaken.ly b/i-will-not-be-shaken.ly
new file mode 100644 (file)
index 0000000..69ef3a2
--- /dev/null
@@ -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
+}
+