Shamusworld >> Repos - music/blob - wonderful-merciful-savior.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 = #20
   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 "Wonderful, Merciful Savior" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Dawn Rodgers/Eric Wyse" }
  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.0 (ly:music-property arg 'tweaks))) arg)
  28
  29
  30 %
  31 % Song's structure
  32 %
  33 Global =
  34 {
  35         \clef G
  36         \key c \major
  37         \numericTimeSignature
  38         \time 3/4
  39
  40         % Intro
  41
  42         s2.*8 \bar ".|:-||"   % 1-8
  43
  44         \repeat volta 2
  45         {
  46                 % Verse
  47
  48                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  49                 \mark \markup { \override #'(font-family . sans) { \box { A } } \italic \smaller { 1st X piano only, unison } }
  50                 s2.*18 |   % 9-26
  51         }
  52         \alternative
  53         {
  54                 {
  55                         s2.*4 |   % 27-30
  56                 }
  57                 {
  58                         \set Score.repeatCommands = #'((volta "2.–3.") end-repeat) % That's an ndash in there...
  59                         s2. |   % 31
  60                         \set Score.repeatCommands = #'((volta #f))
  61                 }
  62         }
  63
  64         s2. \bar "||"   % 32
  65
  66         % Chorus
  67
  68         \mark \markup { \override #'(font-family . sans) { \box { B } } }
  69         s2.*18 |   % 33-50
  70
  71         \once \override Score.RehearsalMark #'self-alignment-X = #left
  72         \mark \markup { \musicglyph #"scripts.coda" \italic { to Coda } }
  73         s2.*4 \bar ":|."   % 51-54
  74
  75 %\stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
  76 %\break % Meh
  77 \stopStaff s2. \startStaff
  78 \set Score.currentBarNumber = #55
  79
  80         \once \override Score.RehearsalMark #'self-alignment-X = #left
  81         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
  82
  83         % Coda
  84
  85         s2.*2 \bar "||"   % 55-56
  86
  87         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  88         s2.*27 \bar "|."   % 57-83
  89 }
  90
  91
  92 %
  93 % Lead vocal
  94 %
  95 LeadVox = \relative c'
  96 {
  97         % Intro
  98
  99         s2.*8 |   % 1-8
 100
 101         % Verse
 102
 103         <e \hn c>4. <e \hn c>8 <e \hn c>4 |   % 9
 104         <f \hn d>4. <e \hn c>8 <d \hn b>4 |   % 10
 105         <e \hn c>2. |   % 11
 106         <c \hn g>2. |   % 12
 107         <g' \hn e \hn b>4 <g \hn e \hn b> <g \hn e \hn b> |   % 13
 108         <a \hn f \hn c>4 <g \hn e \hn c> <f \hn d \hn a>8 ( <g \hn c,> ) |   % 14
 109         <g \hn d \hn c>2. ~ |   % 15
 110         <g \hn d \hn b>2. |   % 16
 111         <c \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 17
 112         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn b> |   % 18
 113         <a \hn f \hn c>2. |   % 19
 114         <c, \hn a>2 r4 |   % 20
 115         <e \hn c>4 <f \hn d> <g \hn d> |   % 21
 116         <b, \hn g>2 <c \hn a>4 |   % 22
 117         <c \hn a>2. |   % 23
 118         << { \voiceOne a'4 ( b ) c } \context Voice = "v2" { \voiceTwo <\hn f, \hn c>2 <\hn f \hn a,>4 } \oneVoice >> |   % 24
 119         <g \hn e \hn c>4 <f \hn d \hn c> <e \hn c \hn g> |   % 25
 120         <e \hn b \hn g>2 <d \hn b>4 |   % 26
 121
 122         c2. |   % 27
 123         s2. |   % 28
 124         s2. |   % 29
 125         s2. |   % 30
 126
 127         c2. |   % 31
 128
 129         r2. |   % 32
 130
 131         % Chorus
 132
 133         <c' \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 33
 134         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn c> |   % 34
 135         <a \hn f \hn c>2. ( |   % 35
 136         <b \hn g \hn d>2. )|   % 36
 137         <c \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 37
 138         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn c> |   % 38
 139         << { \voiceOne <a \hn f>2 ^( ~ <a \hn f>8 <b \hn g>16 <a \hn f> } \context Voice = "v2" { \voiceTwo <\hn c,>2. ( } \oneVoice >> |   % 39
 140         << { \voiceOne <g' \hn e>2. ^) } \context Voice = "v2" { \voiceTwo <\hn b,>2. ) } \oneVoice >> |   % 40
 141         <c' \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 41
 142         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn c> |   % 42
 143         <a \hn f \hn c>2. |   % 43
 144         <c, \hn a>2. |   % 44
 145         <e \hn c>4 <f \hn d> <g \hn e> |   % 45
 146         <b, \hn g>4 <b \hn g>2 |   % 46
 147         <c \hn a>2. |   % 47
 148         << { \voiceOne a'4 ( b ) c } \context Voice = "v2" { \voiceTwo <\hn f, \hn c>2 <\hn f \hn a,>4 } \oneVoice >> |   % 48
 149         <g \hn e \hn c>4 <f \hn d> <e \hn c> |   % 49
 150         <e \hn b>4 <d \hn b>2 |   % 50
 151
 152         c2. |   % 51
 153         s2. |   % 52
 154         s2. |   % 53
 155         s2. |   % 54
 156
 157 s2.
 158
 159         % Coda
 160
 161         c2. ~ |   % 55
 162         c2. |   % 56
 163
 164         <c' \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 57
 165         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn c> |   % 58
 166         <a \hn f \hn c>2. ( |   % 59
 167         <b \hn g \hn d>2. )|   % 60
 168         <c \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 61
 169         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn c> |   % 62
 170         << { \voiceOne <a \hn f>2 ^( ~ <a \hn f>8 <b \hn g>16 <a \hn f> } \context Voice = "v2" { \voiceTwo <\hn c,>2. ( } \oneVoice >> |   % 63
 171         << { \voiceOne <g' \hn e>2. ^) } \context Voice = "v2" { \voiceTwo <\hn b,>2. ) } \oneVoice >> |   % 64
 172         <c' \hn a \hn e>4 <c \hn a \hn e> <c \hn a \hn e>8 <c \hn a \hn e> ~ |   % 65
 173         <c \hn a \hn e>4 <b \hn g \hn d> <a \hn e \hn c> |   % 66
 174         <a \hn f \hn c>2. |   % 67
 175         <c, \hn a>2. |   % 68
 176         <e \hn c>4 <f \hn d> <g \hn e> |   % 69
 177         <b, \hn g>4 <b \hn g>2 |   % 70
 178         <c \hn a>2. |   % 71
 179         << { \voiceOne a'4 ( b ) c } \context Voice = "v2" { \voiceTwo <\hn f, \hn c>2 <\hn f \hn a,>4 } \oneVoice >> |   % 72
 180         <g \hn e \hn c>4 <f \hn d \hn c> <e \hn c \hn g> |   % 73
 181         <e \hn b \hn g>2 <d \hn b \hn g>4 |   % 74
 182         <c \hn a>2. |   % 75
 183
 184         << { \voiceOne a'4 ( b ) c } \context Voice = "v2" { \voiceTwo <\hn f, \hn c>2 <\hn f \hn a,>4 } \oneVoice >> |   % 76
 185         <g \hn e \hn c>4 <f \hn d> <e \hn c> |   % 77
 186         <e \hn b>2 <d \hn b>4 |   % 78
 187         c2. |   % 79
 188         s2. |   % 80
 189         s2. |   % 81
 190         s2. |   % 82
 191         s2. |   % 83
 192 }
 193
 194
 195 LeadVoxText = \lyricmode
 196 {
 197         Won -- der -- ful, mer -- ci -- ful sav -- ior,
 198         pre -- cious re -- dee -- mer  and _ friend; _
 199         Who would have thought _ that a lamb could
 200         res -- cue the souls of men?
 201         Oh, _ you res -- cue the souls of men.
 202
 203         _
 204
 205         You are the one _ that we praise, _
 206         you are the one _ we a -- dore; __ _ _ _ _
 207         You give the heal -- _ ing and grace our
 208         hearts al -- ways hun -- ger for,
 209         Oh, _ our hearts al -- ways hun -- ger for.
 210
 211         for. _
 212
 213         You are the one _ that we praise, _
 214         you are the one _ we a -- dore; __ _ _ _ _
 215         You give the heal -- _ ing and grace our
 216         hearts al -- ways hun -- ger for,
 217         Oh, _ our hearts al -- ways hun -- ger for.
 218         Oh, _ our hearts al -- ways hun -- ger for. _
 219 }
 220
 221 LeadVoxTextB = \lyricmode
 222 {
 223         Coun -- se -- lor, com -- for -- ter, kee -- per,
 224         spi -- rit we long to em -- _ brace; _
 225         You of -- fer hope _ when our hearts have
 226         hope -- less -- ly lost our way,
 227         Oh, _ we’ve hope -- less -- ly lost our _
 228
 229         way.
 230 }
 231
 232 LeadVoxTextC = \lyricmode
 233 {
 234         Al -- might -- y in -- fi -- nite  Fa -- ther,
 235         faith -- ful -- ly lov -- ing your _ own; _
 236         Here in our weak -- _ ness you find us,
 237         fall -- ing be -- fore your throne,
 238         Oh, _ we’re fall -- ing be -- fore your _
 239
 240         throne.
 241 }
 242
 243
 244 Riffs = \relative c''
 245 {
 246         % Intro
 247
 248         \tiny
 249         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 1
 250         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 2
 251         << { \tiny r8 g c g' c c, } \\ { \tiny c,2. ~ } >> |   % 3
 252         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 4
 253         << { \tiny r8 g c g' c c, } \\ { \tiny c,2. ~ } >> |   % 5
 254         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 6
 255         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 7
 256         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 8
 257
 258         s2.*18
 259
 260         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 27
 261         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 28
 262         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 29
 263         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 30
 264
 265         s2.*20
 266
 267         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 51
 268         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 52
 269         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 53
 270         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 54
 271
 272         s2.*25
 273
 274         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 79
 275         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 80
 276         << { \tiny r8 g' c g' c c, } \\ { \tiny c,2. ~ } >> |   % 81
 277         << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 82
 278 %       << { \tiny r8 g' c g' c c, } \\ { s2. } >> |   % 79
 279 %       << { \tiny f8 g c2 } \\ { s2. } >> |   % 80
 280 %       << { \tiny r8 g, c g' c c, } \\ { \tiny c,2. ~ } >> |   % 81
 281 %       << { \tiny f'8 g c2 } \\ { \tiny c,,2. } >> |   % 82
 282         \arpeggioArrowUp <c g' c e g c>-\arpeggio-\fermata |   % 83
 283         \normalsize
 284 }
 285
 286
 287 %
 288 % Chord names
 289 %
 290 Chords = \chordmode
 291 {
 292         % Intro
 293
 294         s2. |   % 1
 295         s2. |   % 2
 296         s2. |   % 3
 297         s2. |   % 4
 298         c2. |   % 5
 299         d2.:m/c |   % 6
 300         c2. |   % 7
 301         d2.:m/c |   % 8
 302
 303         % Verse
 304
 305         c2. |   % 9
 306         d2.:m/c |   % 10
 307         c2. |   % 11
 308         s2. |   % 12
 309         e2.:m |   % 13
 310         f2. |   % 14
 311         g2.:sus4 |   % 15
 312         g2. |   % 16
 313         a2.:m |   % 17
 314         s2. |   % 18
 315         f2. |   % 19
 316         s2. |   % 20
 317         c2. |   % 21
 318         g2. |   % 22
 319         a2.:m |   % 23
 320         f2. |   % 24
 321         c2./g |   % 25
 322         g2.:6 |   % 26
 323
 324         c2. |   % 27
 325         d2.:m/c |   % 28
 326         c2. |   % 29
 327         d2.:m/c |   % 30
 328
 329         c2. |   % 31
 330
 331         c2./b |   % 32
 332
 333         % Chorus
 334
 335         a2.:m |   % 33
 336         c2./g |   % 34
 337         f2. |   % 35
 338         g2. |   % 36
 339         a2.:m |   % 37
 340         c2./g |   % 38
 341         f2. |   % 39
 342         g2.:6 |   % 40
 343         a2.:m |   % 41
 344         c2./g |   % 42
 345         f2. |   % 43
 346         s2. |   % 44
 347         c2. |   % 45
 348         g2. |   % 46
 349         a2.:m |   % 47
 350         f2. |   % 48
 351         c2./g |   % 49
 352         g2.:6 |   % 50
 353         c2. |   % 51
 354         d2.:m/c |   % 52
 355         c2. |   % 53
 356         d2.:m/c |   % 54
 357
 358 s2.
 359         % Coda
 360
 361         c2. |   % 55
 362         c2./b |   % 56
 363
 364         a4:m s2 |   % 57
 365         s2. |   % 58
 366         f2. |   % 59
 367         g2. |   % 60
 368         a4:m s2 |   % 61
 369         s2. |   % 62
 370         f2. |   % 63
 371         g2.:6 |   % 64
 372         a2.:m |   % 65
 373         c2./g |   % 66
 374         f2. |   % 67
 375         s2. |   % 68
 376         c2. |   % 69
 377         g2. |   % 70
 378         a2.:m |   % 71
 379         f2. |   % 72
 380         c2./g |   % 73
 381         g2.:6 |   % 74
 382         a2.:m |   % 75
 383         f2. |   % 76
 384         c2./g |   % 77
 385         g2.:6 |   % 78
 386         c2. |   % 79
 387         d2.:m/c |   % 80
 388         c2. |   % 81
 389         d2.:m/c |   % 82
 390         c2. |   % 83
 391 }
 392
 393
 394 %
 395 % Chord rhythms
 396 %
 397 StaffC = \relative c
 398 {
 399         \numericTimeSignature
 400         \override NoteHead #'style = #'slash
 401         \teeny
 402
 403         % Intro
 404
 405         r2. |   % 1
 406         r2. |   % 2
 407         r2. |   % 3
 408         r2. |   % 4
 409         c4 c c |   % 5
 410         c4 c c |   % 6
 411         c4 c c |   % 7
 412         c4 c c |   % 8
 413
 414         % Verse
 415
 416         c4 c c |   % 9
 417         c4 c c |   % 10
 418         c4 c c |   % 11
 419         c4 c c |   % 12
 420         c4 c c |   % 13
 421         c4 c c |   % 14
 422         c4 c c |   % 15
 423         c4 c c |   % 16
 424         c4 c c |   % 17
 425         c4 c c |   % 18
 426         c4 c c |   % 19
 427         c4 c c |   % 20
 428         c4 c c |   % 21
 429         c4 c c |   % 22
 430         c4 c c |   % 23
 431         c4 c c |   % 24
 432         c4 c c |   % 25
 433         c4 c c |   % 26
 434
 435         c4 c c |   % 27
 436         c4 c c |   % 28
 437         c4 c c |   % 29
 438         c4 c c |   % 30
 439
 440         c4 c c |   % 31
 441
 442         c4 c c |   % 32
 443
 444         % Chorus
 445
 446         c4 c c |   % 33
 447         c4 c c |   % 34
 448         c4 c c |   % 35
 449         c4 c c |   % 36
 450         c4 c c |   % 37
 451         c4 c c |   % 38
 452         c4 c c |   % 39
 453         c4 c c |   % 40
 454         c4 c c |   % 41
 455         c4 c c |   % 42
 456         c4 c c |   % 43
 457         c4 c c |   % 44
 458         c4 c c |   % 45
 459         c4 c c |   % 46
 460         c4 c c |   % 47
 461         c4 c c |   % 48
 462         c4 c c |   % 49
 463         c4 c c |   % 50
 464         c4 c c |   % 51
 465         c4 c c |   % 52
 466         c4 c c |   % 53
 467         c4 c c |   % 54
 468
 469 %\stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
 470 \stopStaff s2. \startStaff
 471
 472         % Coda
 473
 474         c4 c c |   % 55
 475         c4 c c |   % 56
 476
 477         c4-> r2 |   % 57
 478         r2. |   % 58
 479         c2. |   % 59
 480         c2. |   % 60
 481         c4-> r2 |   % 61
 482         r2. |   % 62
 483         c2. |   % 63
 484         c2. |   % 64
 485         c4 c c |   % 65
 486         c4 c c |   % 66
 487         c4 c c |   % 67
 488         c4 c c |   % 68
 489         c4 c c |   % 69
 490         c4 c c |   % 70
 491         c4 c c |   % 71
 492         c4 c c |   % 72
 493         c4 c c |   % 73
 494         c4 c c |   % 74
 495         c4 c c |   % 75
 496         c4 c c |   % 76
 497         c4 c c |   % 77
 498         c4 c c |   % 78
 499         c4 c c |   % 79
 500         c4 c c |   % 80
 501         c4 c c |   % 81
 502         c4 c c |   % 82
 503         c2.-\fermata |   % 83
 504 }
 505
 506
 507 Dynamics =
 508 {
 509 %{
 510         s4_\markup { \italic { snare pat. } } s2 |   % 1
 511         s4_\markup { \italic { simile } } s2 |   % 2
 512         s2.*19
 513         s4_\markup { \italic { spacy } } s2 |   % 22
 514         s2.*5
 515         s4 s \< s \! |   % 28
 516         s2.*22
 517         s4_\markup { \italic { Last time } } s2 |   % 51
 518 %}
 519 }
 520
 521
 522 \score
 523 {
 524         <<
 525                 \Global         % The "roadmap" that everything else depends on
 526
 527                 \context Staff
 528                 <<
 529                         \new Voice = "lead" \LeadVox
 530                         \new Voice = "riffs" \Riffs
 531                         \new Lyrics \lyricsto "lead" \LeadVoxText
 532                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 533                         \new Lyrics \lyricsto "lead" \LeadVoxTextC
 534                 >>
 535
 536                 \new ChoirStaff
 537                 <<
 538                         \new ChordNames \Chords
 539                         \new RhythmicStaff << \StaffC \Dynamics >>
 540                 >>
 541
 542                 \set Score.skipBars = ##t
 543                 \set Score.melismaBusyProperties = #'()
 544         >>
 545 }
 546
 547
 548 \paper
 549 {
 550         #(define fonts (make-pango-font-tree
 551                 "Times New Roman"
 552                 "LilyJAZZText"
 553                 "Luxi Mono"
 554                 (/ staffSize 20)))
 555
 556 % Spread staves vertically across last page (default: t)
 557 %       ragged-last-bottom = ##f
 558 % Spread staves vertically across the page (default: f)
 559 %       ragged-bottom = ##t
 560 % Allow partial line for last stave (default: f)
 561         ragged-last = ##t
 562
 563 % To find out what's eating the space at the top...
 564 %       annotate-spacing = ##t
 565 }
 566