Shamusworld >> Repos - music/blob - he-leadeth-me.ly

   1 \version "2.16.0"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20
   6 staffSize = #18
   7 #(set-default-paper-size "letter")
   8 #(set-global-staff-size staffSize)
   9 #(ly:set-option (quote no-point-and-click))
  10
  11 \header
  12 {
  13         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "He Leadeth Me" }
  14 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  15         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  16         tagline  = "Engraved by JLH and Lilypond 2.8.2"
  17 }
  18
  19 % Useful tweak abbreviations (hn = harmony note)
  20
  21 hn = #(define-music-function (parser location arg) (ly:music?)
  22 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  23
  24   (set! (ly:music-property arg 'tweaks)
  25     (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
  26
  27
  28 %
  29 % Lead vocal
  30 %
  31 Global =
  32 {
  33         \clef G
  34         \key c \major
  35         \numericTimeSignature
  36         \time 4/4
  37
  38         % Intro
  39
  40         s1*8 \bar ".|:-||"   % 1-8
  41
  42         \repeat volta 2
  43         {
  44                 % Verse
  45
  46                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  47
  48                 s1*8 \bar "||"   % 16
  49
  50                 % Chorus
  51
  52                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  53
  54                 s1*7 |   % 17-23
  55                 \time 2/4 s2 \time 4/4 |   % 24
  56                 s1*2 |   % 25-26
  57         }
  58         \alternative
  59         {
  60                 {
  61                         s1*2 |   % 27-28
  62                 }
  63                 {
  64                         s1 |   % 29
  65                 }
  66         }
  67
  68         s1*4 \bar "||"   % 30-33
  69
  70         \key d \major
  71
  72         % Verse
  73
  74         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  75
  76         s1*8 \bar "||"   % 34-41
  77
  78         % Chorus
  79
  80         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  81
  82         s1*8 \bar "||"   % 42-49
  83
  84         % Outro
  85
  86         \mark \markup { \override #'(font-family . sans) { \box { E } } }
  87
  88         s1*9 \bar "|."   % 50-58
  89 }
  90
  91
  92 %
  93 % Lead vocal
  94 %
  95 LeadVox = \relative c''
  96 {
  97         \clef G
  98
  99         % Intro
 100
 101         s1*7 |   % 1-7
 102         \voiceTwo r2 r4 g \oneVoice |   % 8
 103
 104
 105         % Verse
 106
 107         e4. d8 c4 g' |   % 9
 108         a4 f f a |   % 10
 109         g4. e8 e4 d8 ( c ) |   % 11
 110         e4 e d g |   % 12
 111         e4. d8 c4 g' |   % 13
 112         a4 f c' b8 ( a ) |   % 14
 113         g4 e e8 ( d ) c ( d ) |   % 15
 114         e4. d8 c4 <g' \hn f \hn b,> |   % 16
 115
 116         % Chorus
 117
 118         <g \hn e \hn c>4 <c \hn g \hn e> <b \hn g \hn d> <d \hn b \hn g> |   % 17
 119         <c \hn a \hn f>4 <b \hn g \hn e>8 ( <a \hn f \hn d> ) <g \hn e \hn c>4 <a \hn f \hn c> |   % 18
 120         <g \hn e \hn c>4 <e \hn c \hn g> <e \hn c \hn a>8 ( <d \hn b> ) <c \hn a> ( <d \hn b \hn g> ) |   % 19
 121         <e \hn c \hn fs,>4 <e \hn c \hn fs,> <d \hn c \hn g> <g \hn f! \hn d> |   % 20
 122         <g \hn e \hn c>4 <c \hn g \hn e> <b \hn g \hn d> <d \hn g, \hn b,> |   % 21
 123         <c \hn a \hn f>4 <b \hn g \hn e>8 ( <a \hn f \hn d> ) <g \hn e \hn c>4 <a \hn f \hn c> |   % 22
 124         <g \hn e \hn c>4 <e \hn c \hn g> << { \voiceOne <e \hn c>8 ( <d \hn b> ) c ( d ) } \context Voice = "v2" { \voiceTwo \tiny a4 a8 b \normalsize } \oneVoice >> |   % 23
 125         <e \hn c>4 <d \hn b> |   % 24
 126         \voiceTwo c1 \oneVoice |   % 25
 127         s1 |   % 26
 128
 129         s1 |   % 27
 130         \voiceTwo r2 r4 g' \oneVoice |   % 28
 131
 132         s1 |   % 29
 133
 134         s1 |   % 30
 135         s1 |   % 31
 136         s1 |   % 32
 137         \voiceTwo r2 r4 <a \hn d,> \oneVoice |   % 33
 138
 139         % Verse
 140
 141         <fs \hn a,>4. <e \hn g,>8 <d \hn fs,>4 <a' \hn d,> |   % 34
 142         <b \hn d,>4 <g \hn b,> <g \hn b,> <b \hn d,> |   % 35
 143         <a \hn d,>4. <fs \hn a,>8 <fs \hn a,>4 <e \hn g,>8 ( <d \hn fs,> ) |   % 36
 144         <fs \hn a,>4 <fs \hn a,> <e \hn a,> <a \hn e \hn cs> |   % 37
 145         <fs \hn d \hn a>4. <e \hn d \hn g,>8 <d \hn a \hn fs>4 <a' \hn fs \hn d> |   % 38
 146         <b \hn g \hn d>4 <g \hn d \hn b> <d' \hn f, \hn b,> <cs \hn f, \hn cs>8 ( <b \hn d,> ) |   % 39
 147         <a \hn fs \hn d>4 <fs \hn d \hn a> << { \voiceOne <fs \hn d>8 ( <e \hn cs> ) d ( e ) } \context Voice = "v2" { \voiceTwo \tiny b4 b8 cs \normalsize } \oneVoice >> |   % 40
 148         <fs \hn d \hn a>4. <e \hn cs \hn g>8 <d \hn fs,>4 <a' \hn g \hn cs,> |   % 41
 149
 150         % Chorus
 151
 152         <a \hn fs \hn d>4 <d \hn a \hn fs> <cs \hn a \hn e> <e \hn cs \hn a> |   % 42
 153         <d \hn b \hn g>4 <cs \hn a \hn fs>8 ( <b \hn g \hn e> ) <a \hn fs \hn d>4 <b \hn g \hn d> |   % 43
 154         <a \hn fs \hn d>4 <fs \hn d \hn a> <fs \hn d \hn b>8 ( <e \hn cs> ) <d \hn b> ( <e \hn cs \hn a> ) |   % 44
 155         <fs \hn d \hn gs,>4 <fs \hn d \hn gs,> <e \hn d \hn a> <a \hn g! \hn cs,> |   % 45
 156         <a \hn fs \hn d>4 <d \hn a \hn fs> <cs \hn a \hn e> <e \hn a, \hn cs,> |   % 46
 157         <d \hn g, \hn b,>4 <cs \hn fs, \hn a,>8 ( <b \hn e, \hn g,> ) <a \hn d, \hn fs,>4 <b \hn g \hn d> |   % 47
 158         <a \hn fs \hn d>4 <fs \hn d \hn a> << { \voiceOne <fs \hn d>8 ( <e \hn cs> ) d ( <e \hn cs> ) } \context Voice = "v2" { \voiceTwo \tiny b4 b8 a \normalsize } \oneVoice >> |   % 48
 159         <fs' \hn d \hn a>2 <e \hn cs \hn a> |   % 49
 160
 161         % Outro
 162
 163         \voiceTwo d1 \oneVoice |   % 50
 164         s1*8 |   % 51-58
 165 }
 166
 167
 168 LeadVoxText = \lyricmode
 169 {
 170         He lead- eth me, O bless- ed thought,
 171         O words with heav'n- ly _ com- fort fraught;
 172         What- e'er I do, where- e'er I be,
 173         still _ 'tis God's hand _ that _ lead- eth me.
 174
 175         He lead- eth me, he lead- eth _ me,
 176         by his own hand _ he _ lead- eth me,
 177         His faith- ful fol- l'wer I would _ be,
 178         for by his hand _ he _ lead- eth me.
 179
 180         Lord,
 181
 182         And when my task on earth is done,
 183         when by thy grace the _ vic- try's won;
 184         E'en death's cold wave I will not flee,
 185         still _ God through Jor- _ dan _ lead- eth me.
 186
 187         He lead- eth me, he lead- eth _ me,
 188         by his own hand _ he _ lead- eth me,
 189         His faith- ful fol- l'wer I would _ be,
 190         for by his hand _ he _ lead- eth me.
 191 }
 192
 193 LeadVoxTextB = \lyricmode
 194 {
 195         _
 196
 197         I would clasp thy hand in mine,
 198         nor e- ver mur- mur _ nor re- pine;
 199         Con- tent what- e- ver lot I see,
 200         since _ 'tis my God _ that _ lead- eth me.
 201 }
 202
 203
 204 Riffs = \relative c''
 205 {
 206         \clef G
 207
 208         % Intro
 209
 210 \tiny
 211         r8 g16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~  |   % 1
 212         c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ |   % 2
 213         d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ |   % 3
 214         c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ |   % 4
 215         d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ |   % 5
 216         c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ |   % 6
 217         d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. |   % 7
 218         \voiceOne <g' d c g>1 \oneVoice |   % 8
 219
 220         % Verse
 221
 222         s1*8 |   % 9-16
 223
 224         % Chorus
 225
 226         s1*7 |   % 17-23
 227         s2 |   % 24
 228         \voiceOne r8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. ~ \oneVoice |   % 25
 229         c8 g16 d' ~ d c8 b16 ~ b8. c16 ~ c16 d8. ~ |   % 26
 230
 231         d8 g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. |   % 27
 232         \voiceOne <g' d c g>1 \oneVoice |   % 28
 233
 234         d8 \repeatTie g,16 d' ~ d c8 g16 ~ g8 g16 d' ~ d c8. |   % 29
 235
 236         c8 bf16 f ~ f2. |   % 30
 237         c'8 bf16 f ~ f4 ~ f8. af16 ~ af bf8. |   % 31
 238         c1 |   % 32
 239         \voiceOne d2 e \oneVoice |   % 33
 240
 241         % Verse
 242
 243         s1*8 |   % 34-41
 244
 245         % Chorus
 246
 247         s1*8 |   % 42-49
 248
 249         % Outro
 250
 251         \voiceOne r8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ \oneVoice |   % 50
 252         d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 e8. ~ |   % 51
 253         e8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ |   % 52
 254         d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 e8. ~ |   % 53
 255         e8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ |   % 54
 256         d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 e8. ~ |   % 55
 257         e8 a,16 e' ~ e d8 a16 ~ a8 a16 e' ~ e d8. ~ |   % 56
 258         d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 cs8. |   % 57
 259         <d a fs d>1^\fermata |   % 59
 260 \normalsize
 261 }
 262
 263
 264 %
 265 % Chord names
 266 %
 267 Chords = \chordmode
 268 {
 269         % Intro
 270
 271         c2:sus2/a c:sus2/f |   % 1
 272         g1:sus4 |   % 2
 273         c2:sus2/a c:sus2/f |   % 3
 274         g1:sus4 |   % 4
 275         c2:sus2/a c:sus2/f |   % 5
 276         g1:sus4 |   % 6
 277         c2:sus2/e c:sus2/f |   % 7
 278         g1:sus4 |   % 8
 279
 280         % Verse
 281
 282         c2 c/e |   % 9
 283         f2 d:m7 |   % 10
 284         c2/g a:m7 |   % 11
 285         c2/f g4:sus4 g |   % 12
 286         c2 c/e |   % 13
 287         f2 fs:dim |   % 14
 288         c2/g a:m7 |   % 15
 289         c4/g g c g:sus4.7 |   % 16
 290
 291         % Chorus
 292
 293         c2 g |   % 17
 294         f4 e8:m7 d:m7 c4 f |   % 18
 295         c2/g a:m7 |   % 19
 296         d2:9 g4:sus4.7 g:7 |   % 20
 297         c2 g |   % 21
 298         f4 e8:m7 d:m7 c4 f |   % 22
 299         c2/e a:m7 |   % 23
 300         c4/f g |   % 24
 301         c2:sus2/a c:sus2/f |   % 25
 302         g1:sus4 |   % 26
 303
 304         c2:sus2/e c:sus2/f |   % 27
 305         g1:sus4 |   % 28
 306
 307         c2:sus2/e c:sus2/ef |   % 29
 308
 309         bf1:sus2/d |   % 30
 310         df1:maj7 |   % 31
 311         f1/g |   % 32
 312         g2/a a4 a:sus4.7 |   % 33
 313
 314         % Verse
 315
 316         d2 d/fs |   % 34
 317         g2 e:m7 |   % 35
 318         d2/a b:m7 |   % 36
 319         d2/a a |   % 37
 320         d4. e8:m7 d2/fs |   % 38
 321         g2 gs:dim |   % 39
 322         d2/a b:m7 |   % 40
 323         d4/a a d d:sus4.7 |   % 41
 324
 325         % Chorus
 326
 327         d2 a |   % 42
 328         g4 fs8:m7 e:m7 d4 g |   % 43
 329         d2/a b:m7 |   % 44
 330         e2:9 a4:sus4.7 a:7 |   % 45
 331         d2 a |   % 46
 332         g4 fs8:m7 e:m7 d4 g |   % 47
 333         d2/fs b:m7 |   % 48
 334         d2/g a |   % 49
 335
 336         % Outro
 337
 338         d2:sus2 g:6.9 |   % 50
 339         a1:sus4 |   % 51
 340         d2:sus2/b g:6.9 |   % 52
 341         a1:sus4 |   % 53
 342         d2:sus2 g:6.9 |   % 54
 343         a1:sus4 |   % 55
 344         d2:sus2/fs g:6.9 |   % 56
 345         a1:sus4 |   % 57
 346         d1 |   % 58
 347 }
 348
 349
 350 %
 351 % Chord rhythms
 352 %
 353 StaffC = \relative c
 354 {
 355         \numericTimeSignature
 356         \override NoteHead #'style = #'slash
 357         \teeny
 358
 359         % Intro
 360
 361         c4 c c c |   % 1
 362         c4 c c c |   % 2
 363         c4 c c c |   % 3
 364         c4 c c c |   % 4
 365         c4 c c c |   % 5
 366         c4 c c c |   % 6
 367         c4 c c c |   % 7
 368         c1 |   % 8
 369
 370
 371         % Verse
 372
 373         c4 c c c |   % 9
 374         c4 c c c |   % 10
 375         c4 c c c |   % 11
 376         c4 c c c |   % 12
 377         c4 c c c |   % 13
 378         c4 c c c |   % 14
 379         c4 c c c |   % 15
 380         c4 c c c-> |   % 16
 381
 382         % Chorus
 383
 384         c4 c c c |   % 17
 385         c4 c8 c c4 c |   % 18
 386         c4 c c c |   % 19
 387         c4 c c c |   % 20
 388         c4 c c c |   % 21
 389         c4 c8 c c4 c |   % 22
 390         c4 c c c |   % 23
 391         c4 c |   % 24
 392         c4 c c c |   % 25
 393         c4 c c c |   % 26
 394
 395         c4 c c c |   % 27
 396         c4 c c c |   % 28
 397
 398         c4 c c c |   % 29
 399
 400         c4 c c c |   % 30
 401         c4 c c c |   % 31
 402         c4 c c c |   % 32
 403         c4 c c c |   % 33
 404
 405         % Verse
 406
 407         c4 c c c |   % 34
 408         c4 c c c |   % 35
 409         c4 c c c |   % 36
 410         c4 c c c |   % 37
 411         c4. c8 c4 c |   % 38
 412         c4 c c c |   % 39
 413         c4 c c c |   % 40
 414         c4 c c c-> |   % 41
 415
 416         % Chorus
 417
 418         c4 c c c |   % 42
 419         c4 c8 c c4 c |   % 43
 420         c4 c c c |   % 44
 421         c4 c c c |   % 45
 422         c4 c c c |   % 46
 423         c4 c8 c c4 c |   % 47
 424         c4 c c c |   % 48
 425         c2 c |   % 49
 426
 427         % Outro
 428
 429         c4 c c c |   % 50
 430         c4 c c c |   % 51
 431         c4 c c c |   % 52
 432         c4 c c c |   % 53
 433         c4 c c c |   % 54
 434         c4 c c c |   % 55
 435         c4 c c c |   % 56
 436         c4 c c c |   % 57
 437         c1^\fermata |   % 58
 438 }
 439
 440
 441 Dynamics =
 442 {
 443         s4_\mf s2. |   % 1
 444         s1*22 |   % 2-23
 445         s4 s \> |   % 24
 446         s4 \! s2. |   % 25
 447         s1*2 |   % 26-27
 448         s4 \< s s \! s |   % 28
 449         s1*4 |   % 29-32
 450         s4 \< s s \! s |   % 33
 451         s1*23 |   % 34-56
 452         s2 s2_\markup { \italic { rit. } }  |   % 57
 453 }
 454
 455
 456 \score
 457 {
 458         <<
 459                 \Global         % The "roadmap" that everything else depends on
 460
 461                 \context Staff
 462                 <<
 463                         \new Voice = "lead" \LeadVox
 464                         \new Voice \Riffs
 465                         \new Lyrics \lyricsto "lead" \LeadVoxText
 466                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 467                 >>
 468
 469                 \new ChoirStaff
 470                 <<
 471                         \new ChordNames \Chords
 472                         \new RhythmicStaff << \StaffC \Dynamics >>
 473                 >>
 474
 475                 \set Score.skipBars = ##t
 476                 \set Score.melismaBusyProperties = #'()
 477         >>
 478 }
 479
 480
 481 \paper
 482 {
 483         #(define fonts (make-pango-font-tree
 484                 "Times New Roman"
 485                 "JazzText"
 486                 "Luxi Mono"
 487                 (/ staffSize 20)))
 488
 489 % Don't spread staves vertically across last page (default: t)
 490 %       ragged-last-bottom = ##f
 491 % Don't spread staves vertically across the page (default: f)
 492 %       ragged-bottom = ##t
 493 % Allow partial line for last stave (default: f)
 494 %       ragged-last = ##t
 495
 496 % To find out what's eating the space at the top...
 497 %       annotate-spacing = ##t
 498 }
 499