Shamusworld >> Repos - music/blob - god-of-wonders.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 = #16
   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 %Let's bump up the title size and switch to the chord font. :-)
  16
  17         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "God of Wonders" }
  18 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  19         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "Arr. Ed Smart" }
  20         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  21 }
  22
  23 % Useful tweak abbreviations (hn = harmony note)
  24
  25 hn = #(define-music-function (parser location arg) (ly:music?)
  26 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  27
  28   (set! (ly:music-property arg 'tweaks)
  29     (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
  30
  31
  32 %
  33 % Song's structure
  34 %
  35 Global =
  36 {
  37         \key a \major
  38         \numericTimeSignature
  39         \time 4/4
  40
  41         % Intro
  42
  43         \once \override TextScript #'padding = #2.0
  44         s1*0^\markup { \large \bold { Moderate pop } }
  45 %Capo 3 version
  46 %       s1*0^\markup { \large \bold { Moderate pop "(*** CAPO 3 ***)" } }
  47
  48         \repeat volta 2
  49         {
  50                 % Intro/midtro
  51
  52                 s1*4 \bar "||"   % 1-4
  53
  54                 % Verse
  55
  56 %               \once \override Score.RehearsalMark #'self-alignment-X = #left
  57                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  58
  59                 s1*8 \bar "||"   % 5-12
  60
  61                 % Chorus
  62
  63                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  64
  65                 s1*8 \bar "||"   % 13-20
  66
  67                 \mark \markup { \override #'(font-family . sans) { \box { C } } }
  68
  69                 s1*4 |   % 21-24
  70         }
  71
  72         % Interlude
  73
  74         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  75
  76         s1*6 \bar "||"   % 25-30
  77
  78         % Solo
  79
  80         \once \override TextScript #'padding = #2.0
  81         s1*0^\markup { \large \bold { Guitar Solo } }
  82         \mark \markup { \override #'(font-family . sans) { \box { E } } }
  83
  84         s1*8 |   % 31-38
  85
  86         \repeat volta 2
  87         {
  88                 % Chorus
  89
  90                 \mark \markup { \override #'(font-family . sans) { \box { F } } }
  91
  92                 s1*8 |   % 39-46
  93         }
  94
  95         \mark \markup { \override #'(font-family . sans) { \box { G } } }
  96
  97         s1*6 \bar "|."   % 47-52
  98 }
  99
 100
 101 %
 102 % Lead vocal
 103 %
 104 LeadVox = \relative c''
 105 {
 106         \clef G
 107         \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 108
 109         % Intro/midtro
 110
 111         s1*4 |   % 1-4
 112
 113         % Verse
 114
 115         r2 a8 fs16 a ~ a8 b16 a ~ |   % 5
 116         a8 fs ~ fs4 r2 |   % 6
 117         r4 r8 fs8 a16 fs8 a16 ~ a8 b ~ |   % 7
 118         b8 fs ~ fs4 r2 |   % 8
 119         r8. fs16 cs'8 b a fs a b16 a ~ |   % 9
 120         a8 fs ~ fs4 r2 |   % 10
 121         r4 cs'8 b a fs16 cs' ~ cs8 b ( |   % 11
 122         a8 ) a ~ a2 r4 |   % 12
 123
 124         % Chorus
 125
 126         <cs \hn e,>8 <b \hn d,>16 <cs \hn e,> <cs \hn e,> <cs \hn e,>8 <b \hn d,>16 <cs \hn e,>8 <b \hn d,> <a \hn cs,> <e \hn cs> |   % 13
 127         <b' \hn e,>2 r4 <cs \hn a \hn e>16 <cs \hn a \hn e>8. |   % 14
 128         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r |   % 15
 129         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r8. <a \hn cs,>16 |   % 16
 130         <cs \hn e,>8 <b \hn d,>16 <cs \hn e,> ~ <cs \hn e,>8 <b \hn d,>16 <cs \hn e,>16 ~ <cs \hn e,>8 <b \hn d,> <a \hn e \hn cs> <e \hn cs \hn a'> |   % 17
 131         <b' \hn gs \hn e>2 r4 <cs \hn a \hn e>16 <cs \hn a \hn e>8. |   % 14
 132         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r |   % 15
 133         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r |   % 16
 134
 135         a4 b a16 e8 fs16 ~ fs8 fs ~ |   % 21
 136         << { \voiceTwo fs2 r } \context Voice = vb { \voiceOne a4 b a16 e8 fs16 ~ fs8 fs ~ } >> |   % 22
 137         << { \voiceOne a4 b a16 e8 fs16 ~ fs8 fs ~ } \context Voice = vb { \voiceTwo fs2 r } >> |   % 23
 138         << { \voiceTwo fs2 r } \context Voice = vb { \voiceOne a4 b a16 e8 fs16 ~ fs8 fs ~ } >> |   % 24
 139
 140         % Interlude
 141
 142         \context Voice = vb { fs8 } r \stemUp <a \hn e \hn cs>16 <b \hn fs \hn d>8 <b \hn fs \hn d>16 ~ <b \hn fs \hn d>8 \stemNeutral << { \voiceOne a r a16 a } \context Voice = vb { \voiceTwo <\hn a \hn e \hn cs>8 ~ <\hn a \hn e \hn cs>4 ~ } >> |   % 25
 143         << { \voiceOne e'4 cs b16 a8 b16 ~ b8 fs ~ } \context Voice = vb { \voiceTwo <\hn a \hn e \hn cs>1 } >> |   % 26
 144         fs8 r \stemUp <a \hn e \hn cs>16 <b \hn fs \hn d>8 <b \hn fs \hn d>16 ~ <b \hn fs \hn d>8 \stemNeutral << { \voiceOne a r a16 a } \context Voice = vb { \voiceTwo <\hn a \hn e \hn cs>8 ~ <\hn a \hn e \hn cs>4 ~ } >> |   % 27
 145         << { \voiceOne e'4 cs b16 a8 b16 ~ b8 fs ~ } \context Voice = vb { \voiceTwo <\hn a \hn e \hn cs>1 } >> \oneVoice |   % 28
 146         fs8 r <a \hn e \hn cs>16 <b \hn fs \hn d>8 <b \hn fs \hn d>16 ~ <b \hn fs \hn d>8 <a \hn e \hn cs> ~ <a \hn e \hn cs> <a \hn e \hn cs>16 <a \hn e \hn cs> |   % 29
 147         <e' \hn a, \hn d,>4 <cs \hn a \hn e> <b \hn fs \hn d>16 <a \hn fs \hn d>8 <e' \hn b \hn fs \hn d>16 ~ <e \hn b \hn fs \hn d>8 <cs \hn a \hn e \hn cs> ~ |   % 30
 148
 149         % Solo
 150
 151         <cs \hn a \hn e \hn cs>1 |   % 31
 152         R1*7 |   % 32-38
 153
 154         % Chorus
 155
 156         <cs \hn e,>8 <b \hn d,>16 <cs \hn e,> <cs \hn e,> <cs \hn e,>8 <b \hn d,>16 <cs \hn e,>8 <b \hn d,> <a \hn cs,> <e \hn cs> |   % 39
 157         <b' \hn e,>2 r4 <cs \hn a \hn e>16 <cs \hn a \hn e>8. |   % 40
 158         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r |   % 41
 159         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r8. <a \hn cs,>16 |   % 42
 160         <cs \hn e,>8 <b \hn d,>16 <cs \hn e,> ~ <cs \hn e,>8 <b \hn d,>16 <cs \hn e,>16 ~ <cs \hn e,>8 <b \hn d,> <a \hn e \hn cs> <e \hn cs \hn a'> |   % 43
 161         <b' \hn gs \hn e>2 r4 <cs \hn a \hn e>16 <cs \hn a \hn e>8. |   % 44
 162         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r |   % 45
 163         <cs \hn a \hn e>4. ( <a \hn fs \hn cs>16 ) <a \hn fs \hn cs> ~ <a \hn fs \hn cs>4 r |   % 46
 164
 165         % Outro
 166
 167         a4 b a16 e8 fs16 ~ fs8 fs ~ |   % 47
 168         << { \voiceTwo fs2 r } \context Voice = vc { \voiceOne a4 b a16 e8 fs16 ~ fs8 fs ~ } >> |   % 48
 169         << { \voiceOne a4 b a16 e8 fs16 ~ fs8 fs ~ } \context Voice = vc { \voiceTwo fs2 r } >> |   % 49
 170         << { \voiceTwo fs2 r } \context Voice = vc { \voiceOne a4 b a16 e8 fs16 ~ fs8 fs ~ } >> |   % 50
 171         << { \voiceOne a4 b } \context Voice = vc { \voiceTwo fs2 } >> \oneVoice a16 e8 fs16 ~ fs8 <a \hn fs> ~ |   % 51
 172         <a \hn fs>1-\fermata |   % 52
 173 }
 174
 175 LeadVoxText = \lyricmode
 176 {
 177         Lord of all _ cre -- a -- _ tion, _
 178         of wa -- ter, earth, _ and _ sky, _
 179         The hea -- vens are your ta -- ber -- na -- _ cle, _
 180         glo -- ry to the Lord _ on _ high. _
 181
 182         God of won -- _ ders, be -- yond our gal -- ax -- y,
 183         you are ho -- _ ly, _ ho -- _ ly, _
 184         The un -- i -- verse _ de -- clares - your ma -- jes -- ty,
 185         you are ho -- _ ly, _ ho -- _ ly, _
 186
 187         Lord of hea -- ven and _ earth, _
 188         Lord of hea -- ven and _ earth, _
 189
 190         Hal -- le -- lu -- jah, _
 191         to the Lord of hea -- ven and _ earth, _
 192         Hal -- le -- lu -- jah, _
 193         to the Lord of hea -- ven and _ earth, _
 194         Hal -- le -- lu -- _ jah, _
 195         to the Lord of hea -- ven and _ earth! _
 196
 197         God of won -- _ ders, be -- yond our gal -- ax -- y,
 198         you are ho -- _ ly, _ ho -- _ ly, _
 199         The un -- i -- verse _ de -- clares - your ma -- jes -- ty,
 200         you are ho -- _ ly, _ ho -- _ ly, _
 201
 202         Lord of hea -- ven and _ earth, _
 203         Lord of hea -- ven and _ earth, _
 204         Lord of hea -- ven and _ earth, _
 205 }
 206
 207 LeadVoxTextB = \lyricmode
 208 {
 209         Ear -- ly in _ the morn -- _ ing, _
 210         I will cel -- e -- brate _ the light, _
 211         When I stum -- ble in _ the dark -- _ ness, _
 212         I will call your name _ by _ night. _
 213 }
 214
 215 EchoText = \lyricmode
 216 {
 217         Lord of hea -- ven and _ earth, _
 218         Lord of hea -- ven and _ earth, _
 219 }
 220
 221 % This is this way because \oneVoice kills the lyric stream...
 222 EchoTextB = \lyricmode
 223 {
 224         Lord of hea -- ven and _ earth, _
 225         Lord of hea -- ven and _ earth, _
 226 }
 227
 228 %
 229 % Riffs
 230 %
 231 Riffs = \relative c'
 232 {
 233         \tiny
 234
 235         % Intro/midtro
 236
 237 \repeat "percent" 2 {
 238         <e e' a>4 <e e' a>8 <e e' a>16 <e e' a> ~ <e e' a> <fs e' a> <fs e' a>8 <fs e' a> <d e' a>16 <d e' a> |   %
 239         <d e' a>4 <d e' a>8 <d e' a>16 <d e' a> ~ <d e' a> <d e' a> <d e' a>8 <d e' a>16 <d e' a> <d e' a> <d e' a> |   %
 240 }
 241 %{
 242         % Intro
 243
 244         \override NoteHead #'style = #'slash
 245         r4 bf16 bf bf bf bf r bf8 r bf |   % 1
 246         r4 r8 bf r4 bf |   % 2
 247         r4 bf16 bf bf bf bf r bf8 r bf |   % 3
 248         r4 r8 bf r4 bf |   % 4
 249         r4 bf16 bf bf bf bf r bf8 r bf |   % 5
 250         r4 r8 bf r4 bf |   % 6
 251         \override NoteHead #'style = #'default
 252
 253         s1*55 |   % 7-61
 254
 255         r4 e f g |   % 62
 256         r4 b, c d |   % 63
 257         c'4. b8 ~ b g e a ~ |   % 64
 258         a2 c8 b a4 |   % 65
 259         g1-\fermata |   % 66
 260 %}
 261 }
 262
 263
 264 %
 265 % Chord names
 266 %
 267 Chords = \chordmode
 268 {
 269         % Intro/midtro
 270
 271         e2:3.5.11 s16 fs4:m7 s16 d8:sus2 |   % 1
 272         s1 |   % 2
 273         e2:3.5.11 s16 fs4:m7 s16 d8:sus2 |   % 3
 274         s1 |   % 4
 275
 276         % Verse
 277
 278         e2:3.5.11 s16 fs4:m7 s16 d8:sus2 |   % 5
 279         s1 |   % 6
 280         e2:3.5.11 s16 fs4:m7 s16 d8:sus2 |   % 7
 281         s1 |   % 8
 282         e2:3.5.11 s16 fs4:m7 s16 d8:sus2 |   % 9
 283         s1 |   % 10
 284         e2:3.5.11 s16 fs4:m7 s16 d8:sus2 |   % 11
 285         s1 |   % 12
 286
 287         % Chorus
 288
 289         a1 |   % 13
 290         e1 |   % 14
 291         b1:m9 |   % 15
 292         d1:maj7 |   % 16
 293         a1 |   % 17
 294         e1 |   % 18
 295         b1:m9 |   % 19
 296         d1:maj7 |   % 20
 297
 298         d2:sus2 e:3.5.11 |   % 21
 299         d2:sus2 e:3.5.11 |   % 22
 300         d2:sus2 e:3.5.11 |   % 23
 301         d1:sus2 |   % 24
 302
 303         % Interlude
 304
 305         b1:m7 |   % 25
 306         d1:sus2 |   % 26
 307         b1:m7 |   % 27
 308         d1:sus2 |   % 28
 309         b1:m7 |   % 29
 310         d1:sus2 |   % 30
 311
 312         % Solo
 313
 314         a1 |   % 31
 315         e1 |   % 32
 316         b1:m9 |   % 33
 317         d1:sus2 |   % 34
 318         a1 |   % 35
 319         e1 |   % 36
 320         b1:m9 |   % 37
 321         d2:sus2 e:sus4 |   % 38
 322
 323         % Chorus
 324
 325         a1 |   % 39
 326         e1 |   % 40
 327         b1:m9 |   % 41
 328         d1:sus2 |   % 42
 329         a1 |   % 43
 330         e1 |   % 44
 331         b1:m9 |   % 45
 332         d1:sus2 |   % 46
 333
 334         % Outro
 335
 336         d2:sus2 e:3.5.11 |   % 47
 337         d2:sus2 e:3.5.11 |   % 48
 338         d2:sus2 e:3.5.11 |   % 49
 339         d2:sus2 e:3.5.11 |   % 50
 340         d2:sus2 e:3.5.11 |   % 51
 341         d1:sus2 |   % 52
 342 }
 343
 344
 345 %
 346 % Chord rhythms
 347 %
 348 Rhythm =
 349 {
 350         \numericTimeSignature
 351         \override NoteHead #'style = #'slash
 352         \teeny
 353
 354         % Intro/midtro
 355
 356         c4 c ~ c16 c8. c8 c ~ |   % 1
 357         c4 c c c |   % 2
 358         c4 c ~ c16 c8. c8 c ~ |   % 3
 359         c4 c c c |   % 4
 360
 361         % Verse
 362
 363         c4 c ~ c16 c8. c8 c ~ |   % 5
 364         c4 c c c |   % 6
 365         c4 c ~ c16 c8. c8 c ~ |   % 7
 366         c4 c c c |   % 8
 367         c4 c ~ c16 c8. c8 c ~ |   % 9
 368         c4 c c c |   % 10
 369         c4 c ~ c16 c8. c8 c ~ |   % 11
 370         c4 c c c |   % 12
 371
 372         % Chorus
 373
 374         c4 c c c |   % 13
 375         c4 c c c |   % 14
 376         c4 c c c |   % 15
 377         c4 c c c |   % 16
 378         c4 c c c |   % 17
 379         c4 c c c |   % 18
 380         c4 c c c |   % 19
 381         c4 c c c |   % 20
 382
 383         c4 c c c |   % 21
 384         c4 c c c |   % 22
 385         c4 c c c |   % 23
 386         c4 c c c |   % 24
 387
 388         % Interlude
 389
 390         c4 c c c |   % 25
 391         c4 c c c |   % 26
 392         c4 c c c |   % 27
 393         c4 c c c |   % 28
 394         c4 c c c |   % 29
 395         c4 c c c |   % 30
 396
 397         % Solo
 398
 399         c4 c c c |   % 31
 400         c4 c c c |   % 32
 401         c4 c c c |   % 33
 402         c4 c c c |   % 34
 403         c4 c c c |   % 35
 404         c4 c c c |   % 36
 405         c4 c c c |   % 37
 406         c4 c c c |   % 38
 407
 408         % Chorus
 409
 410         c4 c c c |   % 39
 411         c4 c c c |   % 40
 412         c4 c c c |   % 41
 413         c4 c c c |   % 42
 414         c4 c c c |   % 43
 415         c4 c c c |   % 44
 416         c4 c c c |   % 45
 417         c4 c c c |   % 46
 418
 419         % Outro
 420
 421         c4 c c c |   % 47
 422         c4 c c c |   % 48
 423         c4 c c c |   % 49
 424         c4 c c c |   % 50
 425         c4 c c c |   % 51
 426         c1-\fermata |   % 52
 427 }
 428
 429
 430 Dynamics =
 431 {
 432 %{
 433         % Intro
 434
 435         s4_\f s2. |   % 1
 436         s1*5 |   % 2-6
 437         s4_\fp s s \< s |   % 7
 438         s1 |   % 8
 439
 440         % Verse
 441
 442         s4_\mf s2. |   % 9
 443         s1*8 |   % 10-17
 444         s2. s8 s_\fp |   % 18
 445         s4 \< s2. |   % 19
 446
 447         % Chorus
 448
 449         s4_\f s2. |   % 20
 450         s1*5 |   % 21-25
 451         s4_\fp s2. |   % 26
 452         s8 \< s2.. |   % 27
 453         s4_\f s2. |   % 28
 454         s1*21 |   % 29-49
 455
 456         s4_\fp s2. |   % 50
 457         s8 \< s2. s8 \! |   % 51
 458         s1*9 |   % 52-60
 459         s4_\markup { \italic { rit. } } s2. |   % 61
 460         s1*3 |   % 62-64
 461         s2 s4_\markup { \italic { rit. } } s |   % 65
 462 %}
 463 }
 464
 465
 466 \score
 467 {
 468         <<
 469                 \Global         % The "roadmap" that everything else depends on
 470
 471                 \context Staff
 472                 <<
 473                         \new Voice = "lead" \LeadVox
 474                         \new Voice \Riffs
 475                         \new Lyrics \lyricsto "lead" \LeadVoxText
 476                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 477                         \new Lyrics \lyricsto "vb" \EchoText
 478                         \new Lyrics \lyricsto "vc" \EchoTextB
 479                 >>
 480
 481                 \new ChoirStaff
 482                 <<
 483                         \new ChordNames \Chords
 484 %Capo 3 edition
 485 %                       \new ChordNames \transpose f d \Chords
 486                         \new RhythmicStaff << \Rhythm \Dynamics >>
 487                 >>
 488
 489                 \set Score.skipBars = ##t
 490                 \set Score.melismaBusyProperties = #'()
 491         >>
 492 }
 493
 494
 495 \paper
 496 {
 497         #(define fonts (make-pango-font-tree
 498                 "Times New Roman"
 499                 "JazzText"
 500                 "Luxi Mono"
 501                 (/ staffSize 20)))
 502
 503 % Don't spread staves vertically across last page (default: t)
 504 %       ragged-last-bottom = ##f
 505 % Don't spread staves vertically across the page (default: f)
 506 %       ragged-bottom = ##t
 507 % Allow partial line for last stave (default: f)
 508         ragged-last = ##t
 509
 510 % To find out what's eating the space at the top...
 511 %       annotate-spacing = ##t
 512 }
 513