]> Shamusworld >> Repos - music/commitdiff
New chart "Lord, You Have My Heart".
authorShamus Hammons <jlhamm@acm.org>
Thu, 21 Sep 2017 02:17:07 +0000 (21:17 -0500)
committerShamus Hammons <jlhamm@acm.org>
Thu, 21 Sep 2017 02:17:07 +0000 (21:17 -0500)
lord-you-have-my-heart.ly

index 1b40378df3f7bc7b2db4d49f1148a57c3783f2a2..58ffd41ad48fe8e7c1f1dc15ef2b88d315893b43 100644 (file)
@@ -5,7 +5,7 @@
 \include "english.ly"
 
 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
-staffSize = #18
+staffSize = #20
 #(set-default-paper-size "letter")
 #(set-global-staff-size staffSize)
 #(ly:set-option (quote no-point-and-click))
@@ -13,12 +13,19 @@ staffSize = #18
 \header
 {
        title    = \markup { \override #'(font-family . sans)
-               { \fontsize #3.5 "Lord You Have My Heart" } }
+               { \fontsize #3.5 "Lord, You Have My Heart" } }
 %      composer = \markup { \override #'(font-family . sans) "" }
        arranger = \markup { \override #'(font-family . sans) "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
@@ -36,18 +43,23 @@ Global =
 
        \repeat volta 2
        {
-               s1*4 |   % 5-8
+               \mark \markup { \override #'(font-family . sans) { \box { 1 } } }
+               s1^\markup { Band In w/Rhodes Fig. } |   % 5
+               s1*3 |   % 6-8
        }
 
        \repeat volta 2
        {
                % Verse
 
-               s1*16 |   % 9-24
+               \mark \markup { \override #'(font-family . sans) { \box { A } } }
+               s1^\markup { Piano, Ac. Gtr. tacet 1st X } |   % 9
+               s1*15 \bar "||"   % 10-24
 
                % Chorus
 
-               s1 \bar "||"   % 25
+               \mark \markup { \override #'(font-family . sans) { \box { B } } }
+               s1^\markup { Full Band } |   % 25
                s1*10 |   % 26-35
        }
        \alternative
@@ -66,10 +78,13 @@ Global =
 
        s1*4 \bar "||"   % 50-53
 
-       s1*4 \bar ".|:-||"   % 54-57
+       \mark \markup { \override #'(font-family . sans) { \box { C } } }
+       s1^\markup { BIG! } |   % 54
+       s1*3 \bar ".|:-||"   % 55-57
 
        \repeat volta 2
        {
+               \mark \markup { \override #'(font-family . sans) { \box { D } } }
                s1*3 |   % 58-60
        }
        \alternative
@@ -84,123 +99,186 @@ Global =
 
        \repeat volta 2
        {
-               s1*4 |   % 63-66
+               \mark \markup { \override #'(font-family . sans) { \box { E } } }
+               s1^\markup { Open } |   % 63
+               s1*3 |   % 64-66
        }
 
-       s1*7 \bar "|."   % 67-73
+       \mark \markup { \override #'(font-family . sans) { \box { F } } }
+       s1^\markup { On Cue } |   % 67
+       s1*6 \bar "|."   % 68-73
 }
 
 
 %
 % Lead vocal
 %
-LeadVox = \relative c'
+LeadVox = \relative c''
 {
        % Intro
 
-       R1 |   % 1
-       R1 |   % 2
-       R1 |   % 3
-       R1 |   % 4
-
-       R1 |   % 5
-       R1 |   % 6
-       R1 |   % 7
-       R1 |   % 8
+       s1*8 |   % 1-8
 
        % Verse
 
-       c1 |   % 9
-       R1 |   % 10
-       R1 |   % 11
-       R1 |   % 12
-       R1 |   % 13
-       R1 |   % 14
-       R1 |   % 15
+       gs4 gs8 a ~ a gs4 e8 ~ |   % 9
+       e2. r8 cs |   % 10
+       e4 gs8 fs ~ fs e4 b8 ~ |   % 11
+       b2. r4 |   % 12
+       gs'4 gs8 a ~ a gs4 e8 ~ |   % 13
+       e4 r8 gs fs4. e8 |   % 14
+       e1 |   % 15
        R1 |   % 16
 
-       R1 |   % 17
-       R1 |   % 18
-       R1 |   % 19
-       R1 |   % 20
-       R1 |   % 21
-       R1 |   % 22
-       R1 |   % 23
-       R1 |   % 24
+       gs4 gs8 a ~ a gs4 e8 ~ |   % 17
+       e2. r8 cs |   % 18
+       e4 gs8 fs ~ fs e4 b8 ~ |   % 19
+       b2. r4 |   % 20
+       gs'4 gs8 a ~ a gs4 e8 ~ |   % 21
+       e4 r8 gs fs4. e8 |   % 22
+       e1 |   % 23
+       r2 r4 r8 b |   % 24
 
        % Chorus
 
-       R1 |   % 25
-       R1 |   % 26
-       R1 |   % 27
-       R1 |   % 28
-       R1 |   % 29
-       R1 |   % 30
-       R1 |   % 31
-       R1 |   % 32
-       R1 |   % 33
-       R1 |   % 34
-       R1 |   % 35
-
-       R1 |   % 36
-       R1 |   % 37
-       R1 |   % 38
-
-       R1 |   % 39
+       gs'2 a |   % 25
+       b2 e,4. ( fs8 ) |   % 26
+       << { \voiceOne fs1 ~ } \context Voice = vEcho { \voiceTwo <\hn fs \hn ds>2 <\hn gs \hn e> } >>  |   % 27
+       << { \voiceOne fs2 r4 r8 \stemDown b, \stemNeutral } \context Voice = vEcho { \voiceTwo <\hn a' \hn fs>2 <\hn cs \hn a>4. ( \stemUp <\hn b \hn gs>8 ) \stemNeutral } >> |   % 28
+       << { \voiceOne gs2 a } \context Voice = vEcho { \voiceTwo <\hn b \hn gs>1 } >> |   % 29
+       << { \voiceOne b4 e,8 e ~ e fs4 fs8 ~ } \context Voice = vEcho { \voiceTwo s1 } >> |   % 30
+       << { \voiceOne fs1 } \context Voice = vEcho { \voiceTwo <\hn fs \hn ds>2 <\hn gs \hn e> } >> |   % 31
+       << { \voiceOne r2 r4 r8 \stemDown b, \stemNeutral } \context Voice = vEcho { \voiceTwo <\hn a' \hn fs>4 <\hn gs \hn e>8 <\hn a \hn fs> ~ <\hn a \hn fs> <\hn cs \hn a>4 ( \stemUp <\hn b \hn gs>8 ) \stemNeutral } >> |   % 32
+       << { \voiceOne gs2 a } \context Voice = vEcho { \voiceTwo <\hn b \hn gs>1 } >> |   % 33
+       << { \voiceOne b2 e,4. ( fs8 ) } \context Voice = vEcho { \voiceTwo s1 } >> |   % 34
+       << { \voiceOne fs1 } \context Voice = vEcho { <\hn fs \hn ds>2 <\hn gs \hn e>4. ( <\hn fs \hn ds>8 ) } >>  |   % 35
+
+       << { \voiceOne r2 r4 <e \hn a> } \context Voice = vEcho { \voiceTwo \hn fs2. s4 } >> \oneVoice |   % 36
+       <e \hn a>2 <gs \hn cs> |   % 37
+       <fs \hn b>2. <e \hn gs>4 |   % 38
+
+       <e \hn gs>1 |   % 39
        R1 |   % 40
        R1 |   % 41
        R1 |   % 42
 
-       R1 |   % 43
+       r2 r4 e |   % 43
 
-       R1 |   % 44
-       R1 |   % 45
-       R1 |   % 46
-       R1 |   % 47
-       R1 |   % 48
-       R1 |   % 49
+       e2 gs |   % 44
+       fs2. e4 |   % 45
+       e1 ~ |   % 46
+       e2 r4 <e \hn b \hn gs> |   % 47
+       <e \hn cs \hn a>2 <gs \hn e \hn b> |   % 48
+       <fs \hn ds \hn b>2. <e \hn b \hn a>4 |   % 49
 
-       R1 |   % 50
-       R1 |   % 51
+       <e \hn b \hn gs>1 ~ |   % 50
+       <e \hn b \hn gs>1 |   % 51
        R1 |   % 52
        R1 |   % 53
 
        R1 |   % 54
        R1 |   % 55
        R1 |   % 56
-       R1 |   % 57
+       r2 r4 <e \hn b \hn gs> |   % 57
 
-       R1 |   % 58
-       R1 |   % 59
-       R1 |   % 60
+       <e \hn cs \hn a>2 <gs \hn e \hn b> |   % 58
+       <fs \hn ds \hn b>2. <e \hn b \hn a>4 |   % 59
+       <e \hn b \hn gs>1 |   % 60
 
-       R1 |   % 61
+       r2 r4 <e \hn b \hn gs> |   % 61
 
-       R1 |   % 62
+       r2 r4 <e \hn b \hn gs' \hn b \hn e> |   % 62
 
-       R1 |   % 63
-       R1 |   % 64
-       R1 |   % 65
-       R1 |   % 66
+       <e \hn cs \hn a' \hn cs \hn e>2 <gs \hn e \hn b' \hn e \hn gs> |   % 63
+       <fs \hn ds \hn b' \hn ds \hn fs>2. <e \hn b \hn a' \hn b \hn e>4 |   % 64
+       <e \hn b \hn gs' \hn b \hn e>1 |   % 65
+       r2 r4 <e \hn b \hn gs' \hn b \hn e> |   % 66
 
-       R1 |   % 67
-       R1 |   % 68
-       R1 |   % 69
-       R1 |   % 70
-       R1 |   % 71
-       R1 |   % 72
-       r1^\fermata |   % 73
+       <e \hn cs \hn a' \hn cs \hn e>2 <gs \hn e \hn b' \hn e \hn gs> |   % 67
+       <fs \hn ds \hn b' \hn ds \hn fs>2. <e \hn b \hn a' \hn b \hn e>4 |   % 68
+       <e \hn b \hn gs' \hn b \hn e>1 |   % 69
+       r2 r4 <e \hn b \hn gs' \hn b \hn e> |   % 70
+       <e \hn cs \hn a' \hn cs \hn e>2 <gs \hn e \hn b' \hn e \hn gs> |   % 71
+       <fs \hn ds \hn b' \hn ds \hn fs>2. <e \hn b \hn a' \hn b \hn e>4 |   % 72
+       <e \hn b \hn gs' \hn b \hn e>1^\fermata |   % 73
 }
 
 
 LeadVoxText = \lyricmode
 {
-       Lord, you have my heart and I will search for yours,
-       Je -- sus take my life and lead me on.
-       Lord, you have my heart and I will search for yours,
-       Let me be to you a sa -- cri -- fice.
+       Lord, you have _ my heart _ and I will search _ for yours, _
+       Je -- sus take _ my life _ and lead me on.
+       Lord, you have _ my heart _ and I will search _ for yours, _
+       Let me be _ to you _ a sac -- ri -- fice.
+
+       And I will praise you _ Lord, _
+       and I will sing of love _ come down, _
+       And as you show your _ face,
+       we'll see your glo -- ry here.
+
+       We'll see your glo -- ry here. _
+       We'll see your glo -- ry here. _
+       We'll see your glo -- ry here.
+       We'll
+
+       We'll see your glo -- ry here.
+       We'll see your glo -- ry here.
+       We'll see your glo -- ry here.
+}
+
+LeadVoxEcho = \lyricmode
+{
+       I will praise you, _ Lord,
+       I will sing of love _ come _ down,
+       show your _ face
+}
+
+
+Cross = { \override NoteHead #'style = #'cross }
+Norm = { \revert NoteHead #'style }
+
+%
+% Riffs
+%
+Riffs = \relative c'
+{
+       \tiny
+
+       << { \voiceTwo cs1 } \context Voice = vb { \voiceOne \tiny e'8.^\markup { \italic { Rhodes fig.; ride cym. } } gs,16 ~ gs8 b ~ b8 cs4 gs8 } >> |   % 1
+       << { \voiceTwo b,1 } \context Voice = vb { \voiceOne e'8. gs,16 ~ gs8 b ~ b8 cs4 gs8 } >> |   % 2
+       << { \voiceTwo a,1 } \context Voice = vb { \voiceOne e''8. gs,16 ~ gs8 b ~ b8 cs4 gs8 } >> |   % 3
+       << { \voiceTwo b,1 } \context Voice = vb { \voiceOne e'8. gs,16 ~ gs8 b ~ b8 cs4 gs8 } >> |   % 4
+
+       << { \Cross a,4_\markup { \italic { Kick pattern + Snare 2&4 w/Ride } } r r8 a r4 \Norm } \context Voice = vb { \voiceOne r8 b^\markup { \italic { El. Gtr. fig. } } e fs ~ fs2 ~ } >> |   % 5
+       << { \Cross a,4 r r8 a r4 \Norm } \context Voice = vb { \voiceOne fs'1 } >> |   % 6
+       << { \Cross a,4 r r8 a r4 \Norm } \context Voice = vb { \voiceOne r8 b e fs ~ fs2 ~ } >> |   % 7
+       << { \Cross a,4 r r8 a r4 \Norm } \context Voice = vb { \voiceOne fs'1 } >> |   % 8
+
+       s1^\markup { \italic { Snare 2&4 w/Hat } } |   % 9
+
+       s1*13
+
+       s1^\markup { \italic { Ac. Gtr. In } } |   % 23
+
+       s1
+
+       s1^\markup { \italic { Snare 2&4 w/Ride } } |   % 25
+
+       s1*11
+
+       s1^\markup { \italic { Cym. Colors } } |   % 37
+       s1
+       s1^\markup { \italic { w/Rhodes & Gtr figs. } } |   % 39
 
-       And I will praise you Lord
+       s1*10
+
+       s1^\markup { \italic { w/Rhodes & Gtr figs., Cym. Clrs } } |   % 50
+
+       s1*3
+
+       s1^\markup { \italic { Snare 2&4 w/Ride } } |   % 54
+
+       \normalsize
 }
 
 
@@ -211,99 +289,96 @@ Chords = \chordmode
 {
        % Intro
 
-        |   % 1
-        |   % 2
-        |   % 3
-        |   % 4
+       s1*4 |   % 1-4
 
-       |   % 5
-       |   % 6
-       |   % 7
-       |   % 8
+       cs1:m11 |   % 5
+       s1 |   % 6
+       a1:sus2/cs |   % 7
+       s1 |   % 8
 
        % Verse
 
-       |   % 9
-       |   % 10
-       |   % 11
-       |   % 12
-       |   % 13
-       |   % 14
-       |   % 15
-       |   % 16
-
-       |   % 17
-       |   % 18
-       |   % 19
-       |   % 20
-       |   % 21
-       |   % 22
-       |   % 23
-       |   % 24
+       cs1:m7 |   % 9
+       a1:sus2 |   % 10
+       s2 e/gs |   % 11
+       b1:5 |   % 12
+       cs1:m7 |   % 13
+       a2:sus2 b:3.5.11 |   % 14
+       e1 |   % 15
+       b1/ds |   % 16
+
+       cs1:m7 |   % 17
+       a1:sus2 |   % 18
+       s2 e/gs |   % 19
+       b1:5 |   % 20
+       cs1:m7 |   % 21
+       a2:sus2 b:3.5.11 |   % 22
+       e1 |   % 23
+       s1 |   % 24
 
        % Chorus
 
-       |   % 25
-       |   % 26
-       |   % 27
-       |   % 28
-       |   % 29
-       |   % 30
-       |   % 31
-       |   % 32
-       |   % 33
-       |   % 34
-       |   % 35
-
-       |   % 36
-       |   % 37
-       |   % 38
-
-       |   % 39
-       |   % 40
-       |   % 41
-       |   % 42
-
-       |   % 43
-
-       |   % 44
-        |   % 45
-        |   % 46
-        |   % 47
-        |   % 48
-        |   % 49
-
-        |   % 50
-        |   % 51
-        |   % 52
-        |   % 53
-
-        |   % 54
-        |   % 55
-        |   % 56
-        |   % 57
-
-
-        |   % 58
-       |   % 59
-       |   % 60
-
-       |   % 61
-
-       |   % 62
-
-       |   % 63
-       |   % 64
-       |   % 65
-       |   % 66
-
-        |   % 67
-        |   % 68
-        |   % 69
-        |   % 70
-        |   % 71
-        |   % 72
-        |   % 73
+       e1 |   % 25
+       a2:sus2 e/gs |   % 26
+       b2 b:sus4 |   % 27
+       b2 b:sus4 |   % 28
+       e1 |   % 29
+       a2:sus2 e/gs |   % 30
+       b2 b:sus4 |   % 31
+       b2 b:sus4 |   % 32
+       e1 |   % 33
+       a2:sus2 e/gs |   % 34
+       b2 b:sus4 |   % 35
+
+       b1 |   % 36
+       a2:sus2 e/gs |   % 37
+       b1:sus4 |   % 38
+
+       cs1:m11 |   % 39
+       s1 |   % 40
+       a1:sus2/cs |   % 41
+       s1 |   % 42
+
+       b1 |   % 43
+
+       a2:sus2 e/gs |   % 44
+       b2. b4:sus4 |   % 45
+       e1 |   % 46
+       s1 |   % 47
+       a2:sus2 e/gs |   % 48
+       b2. b4:sus4 |   % 49
+
+       cs1:m11 |   % 50
+       s1 |   % 51
+       a1:sus2/cs |   % 52
+       s1 |   % 53
+
+       a2:sus2 e/gs |   % 54
+       b2. b4:sus4 |   % 55
+       e1 |   % 56
+       s1 |   % 57
+
+
+       a2:sus2 e/gs |   % 58
+       b2 b:sus4 |   % 59
+       e1 |   % 60
+
+       s1 |   % 61
+
+       e1 |   % 62
+
+       a2:sus2 e/gs |   % 63
+       b2 b:sus4 |   % 64
+       e1 |   % 65
+       s1 |   % 66
+
+       a2:sus2 e/gs |   % 67
+       b2. b4:sus4 |   % 68
+       cs1:m7 |   % 69
+       cs1:m/b |   % 70
+       a2:sus2 e/gs |   % 71
+       b2. b4:sus4 |   % 72
+       e1 |   % 73
 }
 
 
@@ -318,35 +393,32 @@ StaffC = \relative c
 
        % Intro
 
-       c4 c c c |   % 1
-       c4 c c c |   % 2
-       c4 c c c |   % 3
-       c4 c c c |   % 4
+       s1*4 |   % 1-4
 
-       c4 c c c |   % 5
-       c4 c c c |   % 6
-       c4 c c c |   % 7
-       c4 c c c |   % 8
+       c1 ~ |   % 5
+       c1 |   % 6
+       c1 ~ |   % 7
+       c1 |   % 8
 
        % Verse
 
-       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
-       c4 c 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
-       c4 c c c |   % 22
-       c4 c c c |   % 23
-       c4 c c c |   % 24
+       c1 |   % 9
+       c1 |   % 10
+       c2 c |   % 11
+       c1 |   % 12
+       c1 |   % 13
+       c2 c |   % 14
+       c1 |   % 15
+       c1 |   % 16
+
+       c1 |   % 17
+       c1 |   % 18
+       c2 c |   % 19
+       c1 |   % 20
+       c1 |   % 21
+       c2 c |   % 22
+       c1 |   % 23
+       c8 c c c c c c c |   % 24
 
        % Chorus
 
@@ -363,13 +435,13 @@ StaffC = \relative c
        c4 c c c |   % 35
 
        c4 c c c |   % 36
-       c4 c c c |   % 37
-       c4 c c c |   % 38
+       c2 c |   % 37
+       c1 |   % 38
 
-       c4 c c c |   % 39
-       c4 c c c |   % 40
-       c4 c c c |   % 41
-       c4 c c c |   % 42
+       c1 ~ |   % 39
+       c1 |   % 40
+       c1 ~ |   % 41
+       c1 |   % 42
 
        c4 c c c |   % 43
 
@@ -380,10 +452,10 @@ StaffC = \relative c
        c4 c c c |   % 48
        c4 c c c |   % 49
 
-       c4 c c c |   % 50
-       c4 c c c |   % 51
-       c4 c c c |   % 52
-       c4 c c c |   % 53
+       c1 ~ |   % 50
+       c1 |   % 51
+       c1 ~ |   % 52
+       c1 |   % 53
 
        c4 c c c |   % 54
        c4 c c c |   % 55
@@ -408,12 +480,48 @@ StaffC = \relative c
        c4 c c c |   % 68
        c4 c c c |   % 69
        c4 c c c |   % 70
-       c4 c c c |   % 71
+       c2 c |   % 71
        c4 c c c |   % 72
        c1^\fermata |   % 73
 }
 
 
+Dynamics =
+{
+       s1_\mp |   % 1
+
+       s1*3
+
+       s1_\mf |   % 5
+
+       s1*18
+
+       s1_\< |   % 24
+       s1_\f |   % 25
+
+       s1*10
+
+       s4_\> s2 s4_\! |   % 36
+
+       s1*12
+
+       s4 s_\> s s_\! |   % 49
+
+       s1*4
+
+       s1_\f |   % 54
+
+       s1*7
+
+       s1_\< |   % 62
+       s1_\ff |   % 63
+
+       s1*8
+
+       s1_\markup { \italic { Rit. } } |   % 72
+}
+
+
 \score
 {
        <<
@@ -422,13 +530,15 @@ StaffC = \relative c
                \context Staff
                <<
                        \new Voice = "lead" \LeadVox
+                       \new Voice \Riffs
                        \new Lyrics \lyricsto "lead" \LeadVoxText
+                       \new Lyrics \lyricsto "vEcho" \LeadVoxEcho
                >>
 
                \new ChoirStaff
                <<
                        \new ChordNames \Chords
-                       \new RhythmicStaff \StaffC
+                       \new RhythmicStaff << \StaffC \Dynamics >>
                >>
 
                \set Score.skipBars = ##t