Shamusworld >> Repos - music/blob - bless-the-lord-o-my-soul.ly

   1 \version "2.19.48"
   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 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
  12
  13 \header
  14 {
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Bless The Lord, O My Soul" }
  16         subtitle = \markup { \override #'(font-family . sans) \fontsize #1.3 "(10,000 Reasons)" }
  17         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Matt Redman" }
  18         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" }
  19         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  20 }
  21
  22 % Useful tweak abbreviations (hn = harmony note)
  23
  24 hn = #(define-music-function (parser location arg) (ly:music?)
  25 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  26
  27   (set! (ly:music-property arg 'tweaks)
  28     (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
  29
  30
  31 %
  32 % Song's structure
  33 %
  34 Global =
  35 {
  36         % Original is in G
  37         \key c \major
  38         \numericTimeSignature
  39         \time 4/4
  40
  41         % Intro
  42
  43         s1*4 \bar ".|:-||"   % 1-4
  44
  45         \repeat volta 2
  46         {
  47                 % Chorus
  48
  49                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  50
  51                 s1*9 \bar "||"   % 5-13
  52 %bleh
  53 %\break
  54                 % Verse
  55
  56 %               \mark \markup { \override #'(font-family . sans) { \box { B } } }
  57                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  58                 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  59
  60                 s1*6 |   % 14-19
  61                 s1*2 |   % 20-22
  62
  63                 s2...
  64                 \once \override Score.RehearsalMark #'self-alignment-X = #right
  65                 \mark \markup { \italic { to Coda } \musicglyph #"scripts.coda" }
  66                 s16
  67         }
  68         \alternative
  69         {
  70                 {
  71                         s1 |   % 23
  72                 }
  73                 {
  74                         s1 \bar "||"   % 24
  75                 }
  76         }
  77
  78         % Chorus
  79
  80         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  81
  82         s1*8 \bar "||"   % 25-32
  83
  84         % Instrumental
  85
  86         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  87
  88 %{      s1^\markup { \italic { Repeat figure thru to D.S. } } |   % 42
  89         s1*8 |   % 34-41 %}
  90         s1*8 \bar "||"   % 33-40
  91
  92         \once \override Score.RehearsalMark #'self-alignment-X = #right
  93         \mark \markup { \hspace #0.0 \raise #1.0 \italic { D.S. al Coda } }
  94
  95         % Coda
  96
  97         % blank measure between last measure and coda
  98 %       \stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
  99         \stopStaff s1 \startStaff
 100 %       \break % Meh
 101         \set Score.currentBarNumber = #41
 102
 103         \once \override Score.RehearsalMark #'self-alignment-X = #left
 104         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
 105
 106         s1 \bar "||"   % 41
 107
 108         % Chorus
 109
 110         \mark \markup { \override #'(font-family . sans) { \box { E } } }
 111
 112         s1*8 \bar "||"   % 42-49
 113
 114         % Outro
 115
 116         \mark \markup { \override #'(font-family . sans) { \box { F } } }
 117         s1 |   % 50
 118
 119         \repeat volta 2
 120         {
 121                 \set Staff.ottavation = #"Vox tacet on repeat"
 122                 \set Voice.middleCPosition = #7
 123                 s1 |   % 51
 124                 s1 |   % 52
 125                 s2 \unset Staff.ottavation \unset Voice.middleCPosition s |   % 53
 126                 s1*6 |   % 54-59
 127         }
 128         \alternative
 129         {
 130                 {
 131                         s1*2 |   % 60-61
 132                 }
 133                 {
 134                         s1 |   % 62
 135                 }
 136         }
 137
 138         s1 \bar "|."   % 63
 139 }
 140
 141
 142 %
 143 % Lead vocal
 144 %
 145 LeadVox = \relative c'
 146 {
 147         \clef G
 148
 149         % Intro
 150
 151         s1 |   % 1
 152         s1 |   % 2
 153         s1 |   % 3
 154         r2 r4 e8 g |   % 4
 155
 156         % Chorus
 157
 158         a4 a8 g e4 r |   % 5
 159         d8 ( e d ) c a4 r |   % 6
 160         a8 c g' e ~ e4 c8 d ~ |   % 7
 161         d2 r4 e8 g |   % 8
 162
 163         a4 a8 g e4 r |   % 9
 164         a4 b e, r8 r16 d |   % 10
 165         c8 d e d ~ d4 c8 c ~ |   % 11
 166         c2 r |   % 12
 167         r2 r4 r8 g |   % 13
 168
 169         % Verse
 170
 171         c4 c c a8 g |   % 14
 172         b4 c c a |   % 15
 173         r8 c c c c r c d ~ |   % 16
 174         d4 e8 e r4 r8 c |   % 17
 175         << { \voiceTwo f8 f f ( e ) } \new Voice = "v2" { \voiceOne \tiny f4 f } >> << { \voiceOne \tiny e8 [ d ] \normalsize } \new Voice = "v2" { \voiceTwo e r } >> \oneVoice c c |   % 18
 176         << { \voiceTwo d8 c d e d ( c ) a4 } \new Voice = "v2" { \voiceOne \tiny d4 e e d } >> \oneVoice |   % 19
 177         r2 r8 c c c |   % 20
 178         c8 c c d e4 d |   % 21
 179         c2 r |   % 22
 180
 181         r2 r4 e8 g |   % 23
 182
 183         r2 r4 e8 g |   % 24
 184
 185         % Chorus
 186
 187         a4 a8 g e4 r |   % 25
 188         d8 ( e d ) c a4 r |   % 26
 189         a8 c g' e ~ e4 c8 d ~ |   % 27
 190         d2 r4 e8 g |   % 28
 191
 192         a4 a8 g e4 r |   % 29
 193         a4 b e, r8 r16 d |   % 30
 194         c8 d e d ~ d4 c8 c ~ |   % 31
 195         c2 r |   % 32
 196
 197         % Chorus
 198
 199         R1*7 |   % 33-39
 200         r2 r4 r8 g |   % 40
 201
 202         % Coda
 203
 204         s1 | % blank measure for coda
 205
 206         r2 r4 e'8 g |   % 41
 207
 208         % Chorus
 209
 210         a4 a8 g e4 r |   % 42
 211         d8 ( e d ) c a4 r |   % 43
 212         a8 c g' e ~ e4 c8 d ~ |   % 44
 213         d2 r4 e8 g |   % 45
 214
 215         a4 a8 g e4 r |   % 46
 216         a4 b e, r8 r16 d |   % 47
 217         c8 d e d ~ d4 c8 c ~ |   % 48
 218         c2 r4 e8 g |   % 49
 219
 220         % Outro
 221
 222         a4 a8 g e4 r |   % 50
 223         d8 ( e d ) c a4 r |   % 51
 224         a8 c g' e ~ e4 c8 d ~ |   % 52
 225         d2 r4 e8 g |   % 53
 226
 227         a4 a8 g e4 r |   % 54
 228         a4 b e, r8 r16 d |   % 55
 229         c8 d e d ~ d4 c8 c ~ |   % 56
 230         c2 r4 r8 r16 d |   % 57
 231
 232         c8 d e d ~ d4 e8 e ~ |   % 58
 233         e2 r4 r8 r16 d |   % 59
 234
 235         c8 d e d ~ d4 c8 c ~ |   % 60
 236         c2 r |   % 61
 237
 238         c8 d e d ~ d4 c8 c ~ |   % 62
 239
 240         c1-\fermata |   % 63
 241 }
 242
 243 LeadVoxText = \lyricmode
 244 {
 245         Bless the Lord, o my soul, o __ _ _ my soul,
 246         wor -- ship his ho -- _ ly name, _
 247         Sing like ne -- ver be -- fore, o my soul,
 248         I'll wor -- ship your ho -- _ ly name. _
 249
 250         <<
 251         { The sun comes up it's a new day daw -- ning,
 252         it's time to sing your song _ a -- gain,
 253         What -- e -- ver may _ pass _ and what -- e -- ver lies be -- fore _ me,
 254         let me be sing -- ing when the eve -- ning comes. }
 255
 256         \new Lyrics = "verse2" \with { alignBelowContext = #"verse1" }
 257         { \set associatedVoice = "Lead"
 258         You're rich in love and you're slow to an -- ger,
 259         your name is great and your heart is kind,
 260         for all _ your  _ good -- ness I will keep _ on _ sing -- _ ing,
 261         ten thou -- sand rea -- sons for my heart to find.
 262         }
 263
 264         \new Lyrics = "verse3"  \with { alignBelowContext = #"verse2" }
 265         { \set associatedVoice = "Lead"
 266         _ on that day when my strength is fail -- ing,
 267         the end draws near and my time has come,
 268         _ still _ my _ soul will sing your praise _ un -- _ end -- _ ing,
 269         ten thou -- sand years and then for -- e -- ver -- more.
 270         }
 271         >>
 272
 273         Bless the
 274
 275         Bless the Lord, o my soul, o __ _ _ my soul,
 276         wor -- ship his ho -- _ ly name, _
 277         Sing like ne -- ver be -- fore, o my soul,
 278         I'll wor -- ship your ho -- _ ly name. _
 279
 280         And
 281
 282         Bless the Lord, o my soul, o __ _ _ my soul,
 283         wor -- ship his ho -- _ ly name, _
 284         Sing like ne -- ver be -- fore, o my soul,
 285         I'll wor -- ship your ho -- _ ly name. _
 286
 287         Bless the Lord, o my soul, o __ _ _ my soul,
 288         wor -- ship his ho -- _ ly name, _
 289         Sing like ne -- ver be -- fore, o my soul,
 290         I'll wor -- ship your ho -- _ ly name. _
 291         I'll wor -- ship your ho -- _ ly name. _
 292
 293         I'll wor -- ship your ho -- _ ly name. _
 294
 295         wor -- ship your ho -- _ ly name. _
 296 }
 297
 298 LeadVoxEcho = \lyricmode
 299 {
 300         Bet -- ter is one day _
 301         Bet -- ter is one day
 302 }
 303
 304
 305 %
 306 % Riffs
 307 %
 308 Riffs = \relative c'
 309 {
 310         % Intro
 311
 312         \teeny
 313 %{      c4 d b2 |   % 1
 314         a8 b a g e2 |   % 2
 315         g4 d' b g |   % 3
 316         a1 |   % 4
 317 %}
 318         f4 g e2 |   % 1
 319         d8 e d c a2 |   % 2
 320         c4 g' e c |   % 3
 321         d1 |   % 4
 322
 323         s1*36 |   % 5-40
 324         s1 % Blank bar for Coda
 325         s1*20 |   % 41-60
 326
 327         a'4 a8 g e2 |   % 61
 328 }
 329
 330
 331 %
 332 % Chord names
 333 %
 334 Chords = \chordmode
 335 {
 336         % Intro
 337
 338 %{      c2 g |   % 1
 339         d2/fs e:m |   % 2
 340         c2 g |   % 3
 341         d2:sus4 d |   % 4
 342 %}
 343         f2 c |   % 1
 344         g2/b a:m |   % 2
 345         f2 c |   % 3
 346         g2:sus4 g |   % 4
 347
 348         % Chorus
 349
 350         f2 c |   % 5
 351         g2/b a:m |   % 6
 352         f2 c |   % 7
 353         g2:sus4 g |   % 8
 354
 355         f2 a:m |   % 9
 356         f4 g a2:m |   % 10
 357         f2 g |   % 11
 358         f2 c |   % 12
 359         f2 c |   % 13
 360
 361         % Verse
 362
 363         f2 c |   % 14
 364         g2 a:m |   % 15
 365         f2 c |   % 16
 366         g2 a:m |   % 17
 367         f2 c |   % 18
 368         g2 a4:m r |   % 19 (rest here shows as N.C.!!!)
 369         s2 f |   % 20
 370         c2 g4:sus4 g |   % 21
 371         c1 |   % 22
 372
 373         s1 |   % 23
 374
 375         c1 |   % 24
 376
 377         % Chorus
 378
 379         f2 c |   % 25
 380         g2/b a:m |   % 26
 381         f2 c |   % 27
 382         g2:sus4 g |   % 28
 383
 384         f2 a:m |   % 29
 385         f4 g a2:m |   % 30
 386         f2 g |   % 31
 387         c1 |   % 32
 388
 389         % Instrumental
 390
 391         f2 c |   % 33
 392         g2/b a:m |   % 34
 393         f2 c |   % 35
 394         g2:sus4 g |   % 36
 395
 396         f2 a:m |   % 37
 397         f4 g a2:m |   % 38
 398         f2 g |   % 39
 399         c1 |   % 40
 400
 401         % Coda
 402
 403         s1 % blank measure for coda
 404
 405         c1 |   % 41
 406
 407         f2 c |   % 42
 408         g2/b a:m |   % 43
 409         f2 c |   % 44
 410         g2:sus4 g |   % 45
 411
 412         f2 a:m |   % 46
 413         f4 g a2:m |   % 47
 414         f2 g |   % 48
 415         c1 |   % 49
 416
 417         % Outro
 418
 419         f2 c |   % 50
 420         g2/b a:m |   % 51
 421         f2 c |   % 52
 422         g2:sus4 g |   % 53
 423
 424         f2 a:m |   % 54
 425         f4 g a2:m |   % 55
 426         f2 g |   % 56
 427         a1:m |   % 57
 428
 429         f2 g |   % 58
 430         a1:m |   % 59
 431
 432         f2 g |   % 60
 433         f2 c |   % 61
 434
 435         f2 g |   % 62
 436
 437         c1 |   % 63
 438 }
 439
 440
 441 %
 442 % Chord rhythms
 443 %
 444
 445 Slash = { \override NoteHead #'style = #'slash }
 446 Cross = { \override NoteHead #'style = #'cross }
 447
 448 Rhythm =
 449 {
 450         \numericTimeSignature
 451         \override NoteHead #'style = #'slash
 452         \teeny
 453
 454         % Intro
 455
 456         c2 c |   % 1
 457         c2 c |   % 2
 458         c2 c |   % 3
 459         c2 c |   % 4
 460
 461         % Chorus
 462
 463         c4 c c c |   % 5
 464         c4 c c c |   % 6
 465         c4 c c c |   % 7
 466         c4 c c c |   % 8
 467
 468         c4 c c c |   % 9
 469         c4 c c c |   % 10
 470         c4 c c c |   % 11
 471         c4 c c c |   % 12
 472         c4 c c c |   % 13
 473
 474         % Verse
 475
 476         c4 c c c |   % 14
 477         c4 c c c |   % 15
 478         c4 c c c |   % 16
 479         c4 c c c |   % 17
 480         c4 c c c |   % 18
 481         c4 c c \Cross c-> |   % 19
 482         c4-> c-> \Slash c c |   % 20
 483         c4 c c c |   % 21
 484         c4 c c c |   % 22
 485
 486         c4 c c c |   % 23
 487
 488         c4 c c c |   % 24
 489
 490         % Chorus
 491
 492         c4 c c c |   % 25
 493         c4 c c c |   % 26
 494         c4 c c c |   % 27
 495         c4 c c c |   % 28
 496
 497         c4 c c c |   % 29
 498         c4 c c c |   % 30
 499         c4 c c c |   % 31
 500         c4 c c c |   % 32
 501
 502         % Instrumental
 503
 504         c4 c c c |   % 33
 505         c4 c c c |   % 34
 506         c4 c c c |   % 35
 507         c4 c c c |   % 36
 508
 509         c4 c c c |   % 37
 510         c4 c c c |   % 38
 511         c2 c |   % 39
 512         c4 c c c |   % 40
 513
 514         % Coda
 515
 516         % blank measure between last measure and coda
 517 %hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!!
 518         \stopStaff s1 \startStaff
 519
 520         c4 c c c |   % 41
 521
 522         c4 c c c |   % 42
 523         c4 c c c |   % 43
 524         c4 c c c |   % 44
 525         c4 c c c |   % 45
 526
 527         c4 c c c |   % 46
 528         c4 c c c |   % 47
 529         c4 c c c |   % 48
 530         c4 c c c |   % 49
 531
 532         % Outro
 533
 534         c4 c c c |   % 50
 535         c4 c c c |   % 51
 536         c4 c c c |   % 52
 537         c4 c c c |   % 53
 538
 539         c4 c c c |   % 54
 540         c4 c c c |   % 55
 541         c4 c c c |   % 56
 542         c4 c c c |   % 57
 543
 544         c4 c c c |   % 58
 545         c4 c c c |   % 59
 546
 547         c4 c c c |   % 60
 548         c4 c c c |   % 61
 549
 550         c4 c c c |   % 62
 551
 552         c1-\fermata |   % 63
 553 }
 554
 555
 556 Dynamics =
 557 {
 558 %Hmm, this is throwin off the layout...
 559 %{
 560         s4_\mf s2. |   % 1
 561         s1*18 |   % 2-19
 562         s4 s \< s2 |   % 20
 563         s4_\f s2. |   % 21
 564         s1*9 |   % 22-30
 565         s2 s4 \< s \! |   % 31
 566         s1*9 |   % 32-40
 567         s2 s4 \> s |   % 41
 568         s4_\mp s2. |   % 42
 569         s1*3 |   % 43-45
 570         s4_\mf s2. |   % 46
 571         s1*6 |   % 47-52
 572         s2 s4 \< s \! |   % 53
 573 %}
 574         s1*18
 575 %       s2. s4_\markup { \italic { No chord } }
 576 }
 577
 578
 579 \score
 580 {
 581         <<
 582                 \Global                 % The "roadmap" that everything else depends on
 583
 584                 \context Staff
 585                 <<
 586                         \new Voice = "lead" \LeadVox
 587                         \new Voice \Riffs
 588                         \new Lyrics = "verse1" \lyricsto "lead" \LeadVoxText
 589 %                       \new Lyrics \lyricsto "v2" \LeadVoxEcho
 590                 >>
 591
 592                 \new ChoirStaff
 593                 <<
 594                         \new ChordNames \Chords
 595 %Capo 3 edition
 596 %                       \new ChordNames \transpose f d \Chords
 597                         \new RhythmicStaff << \Rhythm \Dynamics >>
 598                 >>
 599
 600                 \set Score.skipBars = ##t
 601                 \set Score.melismaBusyProperties = #'()
 602         >>
 603 }
 604
 605
 606 \paper
 607 {
 608         #(define fonts (make-pango-font-tree
 609                 "Times New Roman"
 610                 "LilyJazz Text"
 611                 "Luxi Mono"
 612                 (/ staffSize 20)))
 613
 614 % Don't spread staves vertically across last page (default: t)
 615 %       ragged-last-bottom = ##f
 616 % Don't spread staves vertically across the page (default: f)
 617 %       ragged-bottom = ##t
 618 % Allow partial line for last stave (default: f)
 619         ragged-last = ##t
 620
 621 % To find out what's eating the space at the top...
 622 %       annotate-spacing = ##t
 623 }
 624