Shamusworld >> Repos - music/blob - shout-to-the-lord.ly

   1 \version "2.19.0"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
   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 "Shout To The Lord" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Darlene Zschech" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "Arr. Ed Smart" }
  18         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  19 }
  20
  21 % Useful tweak abbreviations (hn = harmony note)
  22
  23 hn = #(define-music-function (parser location arg) (ly:music?)
  24 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  25
  26   (set! (ly:music-property arg 'tweaks)
  27     (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
  28
  29
  30 %
  31 % Song's structure
  32 %
  33 Global =
  34 {
  35 %       \key bf \major
  36         \key g \major % New key!
  37         \numericTimeSignature
  38         \time 4/4
  39
  40         % Intro
  41
  42         \once \override TextScript #'padding = #2.0
  43         s1*0^\markup { \large \bold { Moderately fast pop/Motown feel } }
  44 %Capo 3 version
  45 %       s1*0^\markup { \large \bold { Moderately fast pop "(*** CAPO 3 ***)" } }
  46         s1*8 |   % 1-8
  47
  48         \repeat volta 2
  49         {
  50                 % Verse
  51
  52                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  53                 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  54
  55                 s1*5 |   % 9-13
  56         }
  57         \alternative
  58         {
  59                 {
  60                         s1*3 |   % 14-16
  61                 }
  62                 {
  63                         s1*2 |   % 17-18
  64                 }
  65         }
  66
  67         s1 |   % 19
  68
  69         \repeat volta 2
  70         {
  71                 % Chorus
  72
  73                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  74
  75                 s1*8 \bar "||"   % 20-27
  76                 s1*6 |   % 28-33
  77         }
  78         \alternative
  79         {
  80                 {
  81                         s1*2 \bar "||"   % 34-35
  82                         \once \override Score.RehearsalMark #'self-alignment-X = #right
  83                         \mark \markup { \italic { D.S. (w/repeats) } }
  84                 }
  85                 {
  86                         s1 |   % 36
  87                 }
  88         }
  89
  90         s1*3 \bar "||"   % 37-39
  91 %       \key c \major
  92         \key a \major % New key!
  93         s1*4 \bar "||"   % 40-43
  94
  95         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  96
  97         s1*12 |   % 44-55
  98
  99         \repeat volta 2
 100         {
 101                 s1*4 |   % 56-59
 102         }
 103
 104         s1*2 \bar "||"   % 60-61
 105
 106         \once \override TextScript #'padding = #2.0
 107         s1^\markup { \large \bold { Slower } } |   % 62
 108
 109         s1*4 \bar "|."   % 63-66
 110 }
 111
 112
 113 %
 114 % Lead vocal
 115 %
 116 LeadVox = \relative c'
 117 {
 118         \clef G
 119         \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 120
 121         % Intro
 122
 123         s1 |   % 1
 124         s1 |   % 2
 125         s1 |   % 3
 126         s1 |   % 4
 127         s1 |   % 5
 128         s1 |   % 6
 129         R1 |   % 7
 130         R1 |   % 8
 131
 132         % Verse
 133
 134         r4 d ef f |   % 9
 135         r4 a, bf c |   % 10
 136         bf'8 bf bf a ~ a f ( d ) g ~ |   % 11
 137         g2 bf8 a g f ~ |   % 12
 138         f2 bf8 a g f ~ |   % 13
 139
 140         f4. ~ f16 f f8 ef d bf |   % 14
 141         c2 c |   % 15
 142         c2 r |   % 16
 143
 144         f2-\repeatTie bf8 bf g bf |   % 17
 145         c2 c |   % 18
 146
 147         c r |   % 19
 148
 149         % Chorus
 150
 151         bf8 bf a bf ~ bf bf a bf ~ |   % 20
 152         bf8 bf a g ~ g2 |   % 21
 153         bf8 bf a bf ~ bf bf c d ~ |   % 22
 154         d8 c bf c ~ c2 |   % 23
 155         bf8 bf a bf ~ bf bf a bf ~ |   % 24
 156         bf4 a8 g ~ g4 g8 g |   % 25
 157         a16 ( g f8 ) ~ f4 g g |   % 26
 158         a2 ( c ) |   % 27
 159
 160         bf8 bf a bf ~ bf bf a bf ~ |   % 28
 161         bf8 bf a g ~ g4. a8 |   % 29
 162         bf8 bf a bf ~ bf bf c d ~ |   % 30
 163         d8 c bf c ~ c2 |   % 31
 164         bf8 bf a bf ~ bf bf a bf ~ |   % 32
 165         bf8 bf a g ~ g4 a |   % 33
 166
 167         bf1 |   % 34
 168         R1 |   % 35
 169
 170         bf1 |   % 36
 171
 172         R1 |   % 37
 173         bf8 bf a bf ~ bf4 r |   % 38
 174         R1 |   % 39
 175
 176         c8 c b c ~ c4 r |   % 40
 177         R1 |   % 41
 178         c8 c b c ~ c4 r |   % 42
 179         R1 |   % 43
 180
 181         c8 c b c ~ c c b c ~ |   % 44
 182         c8 c b a ~ a2 |   % 45
 183         c8 c b c ~ c c d e ~ |   % 46
 184         e8 d c d ~ d2 |   % 47
 185         c8 c b c ~ c c b c ~ |   % 48
 186         c4 b8 a ~ a4 a8 a |   % 49
 187         b16 ( a g8 ) ~ g4 a a |   % 50
 188         b2 ( d ) |   % 51
 189         c8 c b c ~ c c b c ~ |   % 52
 190         c8 c b a ~ a4. b8 |   % 53
 191         c8 c b c ~ c c d e ~ |   % 54
 192         e8 d c d ~ d2 |   % 55
 193
 194         c8 c b c ~ c c b c ~ |   % 56
 195         c8 c b a ~ a4 r |   % 57
 196         c8 c b c ~ c c b c ~ |   % 58
 197         c8 c b a ~ a4 r |   % 59
 198
 199         c8 c b c ~ c c b c ~ |   % 60
 200         c8 c b a ~ a4 b |   % 61
 201
 202         c1 |   % 62
 203         s1 |   % 63
 204         s1 |   % 64
 205         s1 |   % 65
 206         s1 |   % 66
 207 }
 208
 209 LeadVoxText = \lyricmode
 210 {
 211         My Je -- sus, my sa -- vior,
 212         Lord there is none _ like _ you; _
 213         All of my days _ I want to praise _ _
 214         the won -- ders of your migh -- ty love.
 215
 216         _ ne -- ver cease to wor -- ship you.
 217
 218         Shout to the Lord, _ all the earth, _ let us sing; _
 219         Po -- wer and ma -- _ je -- sty, praise _ to the King. _
 220         Moun -- tains bow down _ and the seas _ will roar _
 221         at the sound __ _ _ _ of your name. __ _
 222         I sing for joy _ at the work _ of your hands, _
 223         for -- e -- ver I’ll love _ you, for -- e -- _ ver I’ll stand. _
 224         No -- thing com -- pares _ to the pro -- _ mise I have _ in you.
 225
 226         you.
 227
 228         Shout to the Lord, _
 229         Shout to the Lord, _
 230         Shout to the Lord, _
 231
 232         Shout to the Lord, _ all the earth, _ let us sing; _
 233         Po -- wer and ma -- _ je -- sty, praise _ to the King. _
 234         Moun -- tains bow down _ and the seas _ will roar _
 235         at the sound __ _ _ _ of your name. __ _
 236         I sing for joy _ at the work _ of your hands, _
 237         for -- e -- ver I’ll love _ you, for -- e -- _ ver I’ll stand. _
 238         No -- thing com -- pares _ to the pro -- _ mise I have _
 239         No -- thing com -- pares _ to the pro -- _ mise I have _
 240         No -- thing com -- pares _ to the pro -- _ mise I have _ in you.
 241 }
 242
 243 LeadVoxTextB = \lyricmode
 244 {
 245         My com -- fort, my shel -- ter,
 246         To -- wer of ref -- _ uge and strength; _
 247         Let ev -- r’y breath, _ all that I am,
 248 }
 249
 250
 251 %
 252 % Riffs
 253 %
 254 Riffs = \relative c''
 255 {
 256         \tiny
 257
 258         % Intro
 259
 260 %For new key...
 261 \transpose g b {
 262         \override NoteHead #'style = #'slash
 263 %bf' because of transposition...
 264         r4 bf'16 bf' bf' bf' bf' r bf'8 r bf' |   % 1
 265         r4 r8 bf' r4 bf' |   % 2
 266         r4 bf'16 bf' bf' bf' bf' r bf'8 r bf' |   % 3
 267         r4 r8 bf' r4 bf' |   % 4
 268         r4 bf'16 bf' bf' bf' bf' r bf'8 r bf' |   % 5
 269         r4 r8 bf' r4 bf' |   % 6
 270         \override NoteHead #'style = #'default
 271 }
 272
 273         s1*55 |   % 7-61
 274
 275         r4 e f g |   % 62
 276         r4 b, c d |   % 63
 277         c'4. b8 ~ b g e a ~ |   % 64
 278         a2 c8 b a4 |   % 65
 279         g1-\fermata |   % 66
 280 }
 281
 282
 283 %
 284 % Chord names
 285 %
 286 Chords = \chordmode
 287 {
 288 %Bah, can't we set this globally?
 289 %       \popChords
 290
 291         % Intro
 292
 293         bf2 s8 bf4/d ef8 |   % 1
 294         s4. f4.:sus4 f4 |   % 2
 295         bf2 s8 bf4/d ef8 |   % 3
 296         s4. f4.:sus4 f4 |   % 4
 297         bf2 s8 bf4/d ef8 |   % 5
 298         s4. f4.:sus4 f4 |   % 6
 299         f2 ef/f |   % 7
 300         f1 |   % 8
 301
 302         % Verse
 303
 304         bf1 |   % 9
 305         f1 |   % 10
 306         g4.:m f2 ef8 |   % 11
 307         s1 |   % 12
 308         bf2/d ef |   % 13
 309
 310         bf2/f g:m7 |   % 14
 311         af2 ef4./g f8:sus4 |   % 15
 312         s4. f2 s8 |   % 16
 313
 314         bf2/f g:m7 |   % 17
 315         af2 ef4./g f8:sus4 |   % 18
 316
 317         s2 f |   % 19
 318
 319         % Chorus
 320
 321         bf2 s8 bf4/d ef8 |   % 20
 322         s4. f4.:sus4 f4 |   % 21
 323         bf2 s8 bf4/d ef8 |   % 22
 324         s4. f4.:sus4 f4 |   % 23
 325         g4.:m f2 ef8 |   % 24
 326         s1 |   % 25
 327         f2 ef/f |   % 26
 328         f1 |   % 27
 329
 330         bf2 s8 bf4/d ef8 |   % 28
 331         s4. f4.:sus4 f4 |   % 29
 332         bf2 s8 bf4/d ef8 |   % 30
 333         s4. f4.:sus4 f4 |   % 31
 334         g4.:m g2:m/f ef8 |   % 32
 335         s2 f4:sus4 f |   % 33
 336
 337         bf2. s8 f:sus4 |   % 34
 338         s1 |   % 35
 339
 340         bf2 s8 bf4/d ef8 |   % 36
 341
 342         s4. f4.:sus4 f4 |   % 37
 343         bf2 s8 bf4/d ef8 |   % 38
 344         s4. f4.:sus4 f4 |   % 39
 345
 346         c2 s8 c4/e f8 |   % 40
 347         s4. g4.:sus4 g4 |   % 41
 348         c2 s8 c4/e f8 |   % 42
 349         s4. g4.:sus4 g4 |   % 43
 350
 351         c2 s8 c4/e f8 |   % 44
 352         s4. g4.:sus4 g4 |   % 45
 353         c2 s8 c4/e f8 |   % 46
 354         s4. g4.:sus4 g4 |   % 47
 355         a4.:m g2 f8 |   % 48
 356         s1 |   % 49
 357         g2 f/g |   % 50
 358         g1 |   % 51
 359         c2 s8 c4/e f8 |   % 52
 360         s4. g4.:sus4 g4 |   % 53
 361         c2 s8 c4/e f8 |   % 54
 362         s4. g4.:sus4 g4 |   % 55
 363
 364         a4.:m a2:m/g f8 |   % 56
 365         s2 g4:sus4 g |   % 57
 366         a4.:m a2:m/g f8 |   % 58
 367         s2 g4:sus4 g |   % 59
 368
 369         a4.:m a2:m/g f8 |   % 60
 370         s2 g4:sus4 g |   % 61
 371
 372         c1 |   % 62
 373         g1 |   % 63
 374         a4.:m g2 f8 |   % 64
 375         s1 |   % 65
 376         c1 |   % 66
 377 }
 378
 379
 380 %
 381 % Chord rhythms
 382 %
 383 Rhythm =
 384 {
 385         \numericTimeSignature
 386         \override NoteHead #'style = #'slash
 387         \teeny
 388
 389         % Intro
 390
 391         c4-> r r8 c4-> c8-> |   % 1
 392         r4 r8 c-> ~ c4 c |   % 2
 393         c4-> r r8 c4-> c8-> |   % 3
 394         r4 r8 c-> ~ c4 c |   % 4
 395         c4-> r r8 c4-> c8-> |   % 5
 396         r4 r8 c-> ~ c4 c |   % 6
 397         c8 c c c c c c c |   % 7
 398         c8 c c c c c c c |   % 8
 399
 400         % Verse
 401
 402         c4 c c-> c |   % 9
 403         c4 c c-> c |   % 10
 404         c4. c8 ~ c4. c8 ~ |   % 11
 405         c4 c c c |   % 12
 406         c4 c c c |   % 13
 407
 408         c4 c c c |   % 14
 409         c4 c c c8 c ~ |   % 15
 410         c4 c c c |   % 16
 411
 412         c4 c c c |   % 17
 413         c4 c c c8 c ~ |   % 18
 414
 415         c8 c c c c c c c |   % 19
 416
 417         % Chorus
 418
 419         c4-> r r8 c4-> c8-> |   % 20
 420         r4 r8 c-> ~ c4 c |   % 21
 421         c4-> r r8 c4-> c8-> |   % 22
 422         r4 r8 c-> ~ c4 c |   % 23
 423         c4. c8 ~ c4. c8 ~ |   % 24
 424         c4 c c c |   % 25
 425         c8 c c c c c c c |   % 26
 426         c8 c c c c c c c |   % 27
 427
 428         c4-> r r8 c4-> c8-> |   % 28
 429         r4 r8 c-> ~ c4 c |   % 29
 430         c4-> r r8 c4-> c8-> |   % 30
 431         r4 r8 c-> ~ c4 c |   % 31
 432         c4. c8 ~ c4. c8 ~ |   % 32
 433         c4 c c c |   % 33
 434
 435         c4 c c c8 c ~ |   % 34
 436         c4 c c c |   % 35
 437
 438         c4-> r r8 c4-> c8-> |   % 36
 439
 440         r4 r8 c-> ~ c4 c |   % 37
 441         c4-> r r8 c4-> c8-> |   % 38
 442         r4 r8 c-> ~ c4 c |   % 39
 443
 444         c4-> r r8 c4-> c8-> |   % 40
 445         r4 r8 c-> ~ c4 c |   % 41
 446         c4-> r r8 c4-> c8-> |   % 42
 447         r4 r8 c-> ~ c4 c |   % 43
 448
 449         c4-> r r8 c4-> c8-> |   % 44
 450         r4 r8 c-> ~ c4 c |   % 45
 451         c4-> r r8 c4-> c8-> |   % 46
 452         r4 r8 c-> ~ c4 c |   % 47
 453         c4. c8 ~ c4. c8 ~ |   % 48
 454         c4 c c c |   % 49
 455         c8 c c c c c c c |   % 50
 456         c8 c c c c c c c |   % 51
 457         c4-> r r8 c4-> c8-> |   % 52
 458         r4 r8 c-> ~ c4 c |   % 53
 459         c4-> r r8 c4-> c8-> |   % 54
 460         r4 r8 c-> ~ c4 c |   % 55
 461
 462         c4.-> c8-> ~ c4. c8-> ~ |   % 56
 463         c4 c c c |   % 57
 464         c4.-> c8-> ~ c4. c8-> ~ |   % 58
 465         c4 c c c |   % 59
 466
 467         c4. c8 ~ c4. c8 ~ |   % 60
 468         c4 c c c |   % 61
 469
 470         c4 c c c |   % 62
 471         c4 c c c |   % 63
 472         c4. c8 ~ c4. c8 ~ |   % 64
 473         c1 |   % 65
 474         c1-\fermata |   % 66
 475 }
 476
 477
 478 Dynamics =
 479 {
 480         % Intro
 481
 482         s4_\f s2. |   % 1
 483         s1*5 |   % 2-6
 484         s4_\fp s s \< s |   % 7
 485         s1 |   % 8
 486
 487         % Verse
 488
 489         s4_\mf s2. |   % 9
 490         s1*8 |   % 10-17
 491         s2. s8 s_\fp |   % 18
 492         s4 \< s2. |   % 19
 493
 494         % Chorus
 495
 496         s4_\f s2. |   % 20
 497         s1*5 |   % 21-25
 498         s4_\fp s2. |   % 26
 499         s8 \< s2.. |   % 27
 500         s4_\f s2. |   % 28
 501         s1*21 |   % 29-49
 502
 503         s4_\fp s2. |   % 50
 504         s8 \< s2. s8 \! |   % 51
 505         s1*9 |   % 52-60
 506         s4_\markup { \italic { rit. } } s2. |   % 61
 507         s1*3 |   % 62-64
 508         s2 s4_\markup { \italic { rit. } } s |   % 65
 509 }
 510
 511
 512 \score
 513 {
 514         <<
 515                 \Global         % The "roadmap" that everything else depends on
 516 %nowok          \transpose bf g
 517
 518                 \context Staff
 519                 <<
 520                         \new Voice = "lead" \transpose bf g \LeadVox
 521                         \new Voice \transpose bf a \Riffs
 522                         \new Lyrics \lyricsto "lead" \LeadVoxText
 523                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 524                 >>
 525
 526                 \new ChoirStaff
 527                 <<
 528                         \new ChordNames \transpose bf a \Chords
 529 %Capo 3 edition
 530 %                       \new ChordNames \transpose f d \Chords
 531                         \new RhythmicStaff << \Rhythm \Dynamics >>
 532                 >>
 533
 534                 \set Score.skipBars = ##t
 535                 \set Score.melismaBusyProperties = #'()
 536         >>
 537 }
 538
 539
 540 \paper
 541 {
 542         #(define fonts (make-pango-font-tree
 543                 "Times New Roman"
 544                 "LilyJAZZText"
 545                 "Luxi Mono"
 546                 (/ staffSize 20)))
 547
 548 % Don't spread staves vertically across last page (default: t)
 549 %       ragged-last-bottom = ##f
 550 % Don't spread staves vertically across the page (default: f)
 551 %       ragged-bottom = ##t
 552 % Allow partial line for last stave (default: f)
 553         ragged-last = ##t
 554
 555 % To find out what's eating the space at the top...
 556 %       annotate-spacing = ##t
 557 }
 558