Shamusworld >> Repos - music/blob - creation-song.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 "Creation Song (Glory to the Lamb)" }
  18 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  19         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "Arr. John Wierick/Ed Smart" }
  20         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  21 % Let's try a chord dictionary
  22         subtitle = \markup { \center-column { G2 \fret-diagram-terse #"x;x;x;7;8;10;" } "     " \center-column { F2 \fret-diagram-terse #"x;x;x;5;6;8;" } }
  23 }
  24
  25 % Useful tweak abbreviations (hn = harmony note)
  26
  27 hn = #(define-music-function (parser location arg) (ly:music?)
  28 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  29
  30   (set! (ly:music-property arg 'tweaks)
  31     (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
  32
  33
  34 %
  35 % Song's structure
  36 %
  37 Global =
  38 {
  39         \key g \major
  40         \override Staff.TimeSignature #'style = #'()
  41         \time 6/4
  42
  43         % Intro
  44
  45         \once \override TextScript #'padding = #2.0
  46         s1*0^\markup { \large \bold { Not too fast } }
  47 %Capo 3 version
  48 %       s1*0^\markup { \large \bold { Not too fast "(*** CAPO 3 ***)" } }
  49
  50         \repeat volta 2
  51         {
  52                 s1.*2 |   % 1-2
  53         }
  54
  55         % Verse
  56
  57         \mark \markup { \override #'(font-family . sans) { \box { A } } }
  58         s1.*16 \bar "||"   % 3-18
  59
  60         % Chorus
  61
  62         \once \override Score.RehearsalMark #'self-alignment-X = #left
  63         \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  64         s1.*10 |   % 19-28
  65         \once \override Score.RehearsalMark #'self-alignment-X = #left
  66         \mark \markup { \musicglyph #"scripts.coda" \italic { to Coda } }
  67         s1.*8 \bar "||"   % 29-36
  68
  69         % Verse
  70
  71         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  72         s1.*16 \bar "||"   % 37-52
  73         \once \override Score.RehearsalMark #'self-alignment-X = #right
  74         \mark \markup { \large \bold { D.S. al Coda } }
  75
  76         % Coda
  77
  78         % blank measure between last measure and coda
  79 %       \stopStaff s1. \bar "" \startStaff   % That removed the spurious floating bar line from line break
  80         \stopStaff s1. \startStaff   % That removed the spurious floating bar line from line break
  81 %       \break % Meh
  82         \set Score.currentBarNumber = #53
  83
  84         \once \override Score.RehearsalMark #'self-alignment-X = #left
  85         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
  86
  87         s1.*10 \bar "||"   % 53-62
  88
  89         % Interlude
  90
  91         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  92         s1.*14 |   % 63-76
  93         \key a \major
  94         s1.*2 |   % 77-78
  95
  96         % Chorus
  97
  98         \repeat volta 2
  99         {
 100                 \mark \markup { \override #'(font-family . sans) { \box { E } } }
 101                 s1.*15 \bar "||"   % 79-93
 102         }
 103         \alternative
 104         {
 105                 {
 106                         s1.   % 94
 107                 }
 108                 {
 109                         s1.   % 95
 110                 }
 111         }
 112
 113         s1.*5 \bar "|."  % 96-100
 114 }
 115
 116
 117 %
 118 % Lead vocal
 119 %
 120 LeadVox = \relative c'
 121 {
 122         \clef G
 123         \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 124
 125         % Intro
 126
 127         s1. |   % 1
 128         s1 s4 d |   % 2
 129
 130         % Verse
 131
 132         b'4. b b d |   % 3
 133         d2. c4 b g |   % 4
 134         a2 ( \times 2/3 { b8 a g ) } a2. |   % 5
 135         r2 r8 g c4 b g8 g ~ |   % 6
 136         g4 f2 r4 r r8 f |   % 7
 137         c'4 c c8 c ~ c4 b g8 g ~ |   % 8
 138         g1. |   % 9
 139         r2 r r4 <d \hn b'> |   % 10
 140         <b' \hn d>4 <b \hn d> <a \hn c>8 <b \hn d> ~ <b \hn d>4 <b \hn d> <d \hn g> |   % 11
 141         <d \hn g>4 <d \hn g>4. <d, \hn b'>8 <c' \hn e>4 <b \hn d>8 <g \hn b>4. |   % 12
 142         <a \hn c>2 ( \times 2/3 { <b \hn d>8 <a \hn c> <g \hn b> ) } <a \hn d>2. |   % 13
 143         r2 r8 <g \hn b>8 <c \hn e>4 <b \hn d> << { \voiceTwo g8 g ~ } \context Voice = vb { \voiceOne <\hn b> <\hn c> ~ } >> |   % 14
 144         << { \voiceTwo g8 f ~ f2 } \context Voice = vb { \voiceOne <\hn c'>2. } >> \oneVoice <c \hn e>4 <b \hn d> <g \hn b>8 <g \hn c> ~ |   % 15
 145         <g \hn c>8 <f \hn c'> ~ <f \hn c'>2 <a \hn c>8 <b \hn d>4 <c \hn e>8 ~ <c \hn e>4 |   % 16
 146         <c \hn e>4 <b \hn d> <b \hn d>8 ( <a \hn c> ) <b \hn d>2. |   % 17
 147         r2 r2 g4 b |   % 18
 148
 149         % Chorus
 150
 151         <b \hn d \hn g>1. |   % 19
 152         <b \hn d \hn g>2. r4 r2 |   % 20
 153         <b \hn e \hn g>1. |   % 21
 154         <b \hn e \hn g>2. r4 r2 |   % 22
 155         << { \voiceTwo b2. b } \context Voice = vb { \voiceOne <\hn d \hn g>2. <\hn d>4 ~ <\hn d>8 <\hn e> <\hn g>4 } >> |   % 23
 156         << { \voiceTwo c,2 ( b4 ) b2 ( a4 ) } \context Voice = vb { \voiceOne <\hn e' \hn a>2. <\hn d \hn g> } >> \oneVoice |   % 24
 157         <a \hn d \hn fs>1. |   % 25
 158         r2 r2 <g \hn b \hn d>4 <b \hn d \hn g> |   % 26
 159         <b \hn d \hn g>1 ( ~ <b \hn d \hn g>8 <c \hn a'>16 <b \hn g'> <a \hn d \hn fs>4 ) |   % 27
 160         <a \hn d \hn fs>2. r4 r <g \hn b \hn e> |   % 28
 161         <b \hn e \hn g>1. |   % 29
 162         <b \hn e \hn g>2. r4 r <c \hn e \hn g> |   % 30
 163         << { \voiceTwo d1 ~ d4 c8 b } \context Voice = vb { \voiceOne <\hn fs' \hn a>2. ( <\hn e \hn g> } >> |   % 31
 164         << { \voiceTwo a,1 ~ a8 b16 a g4 } \context Voice = vb { \voiceOne <\hn d' \hn fs>1 ~ <\hn d \hn fs>8 <\hn g>16 <\hn fs> <\hn d>4 ) } >> \oneVoice |   % 32
 165         <g, \hn b \hn d>1. |   % 33
 166         R1. |   % 34
 167         R1. |   % 35
 168         R1. |   % 36
 169
 170         % Verse
 171
 172         b4 b a8 b ~ b4 b d |   % 37
 173         d4 b r8 b c4 b g |   % 38
 174         a2 ( \times 2/3 { b8 a g ) } a2. |   % 39
 175         r2 r8 <g \hn b> <a \hn c>4 <b \hn d> <c \hn e> |   % 40
 176         <c \hn e>4 <b \hn d> <g \hn b> <g \hn c> <f \hn c'>2 |   % 41
 177         r2 r8 <f \hn a> <a \hn c> <b \hn d>4 <c \hn e>8 ~ <c \hn e>4 |   % 42
 178         <c \hn e>4 <b \hn d> <b \hn d>8 <a \hn c> <b \hn d>2. |   % 43
 179         r2 r <g \hn d \hn b' \hn g'>4 <a \hn e \hn c' \hn a'> |   % 44
 180         <b \hn g \hn d' \hn b'>4 <b \hn g \hn d' \hn b'> <a \hn g \hn c \hn a'>8 <b \hn g \hn d' \hn b'>8 ~ <b \hn g \hn d' \hn b'>4 <b \hn g \hn d' \hn b'> <d \hn b \hn g' \hn d'> |   % 45
 181         <d \hn b \hn g' \hn d'>4 r r <c \hn a \hn e' \hn c'> <b \hn g \hn d' \hn b'> <g \hn d \hn b' \hn g'> |   % 46
 182         <a \hn g \hn c \hn a'>4 <b \hn g \hn d' \hn b'> <b \hn g \hn d' \hn b'>8 <g \hn d \hn b' \hn g'> <a \hn g \hn d' \hn a'>2 r4 |   % 47
 183         r2 r8 <a \hn a'> <a \hn a'>4 <b \hn b'> <c \hn c'> |   % 48
 184         <c \hn c'>2. r4 r2 |   % 49
 185         <a \hn c \hn e \hn a>4. <a \hn c \hn e \hn a> <b \hn d \hn g \hn b> <c \hn e \hn a \hn c> |   % 50
 186         <c \hn e \hn a \hn c>4 <b \hn d \hn g \hn b> <a \hn c \hn e \hn a> <b \hn d \hn g \hn b>2. |   % 51
 187         r2 r <g \hn g'>4 <b \hn b'> |   % 52
 188
 189         s1. % for Coda spacing
 190
 191         % Coda
 192
 193         <b \hn e \hn g>1. |   % 53
 194         <b \hn e \hn g>2. r4 r <c \hn e> |   % 54
 195         <d \hn bf \hn f'>1. |   % 55
 196         << { \voiceTwo <d \hn bf>1. ~ } \context Voice = vc { \voiceOne <\hn f>1 ~ <\hn f>4 <\hn f> } >> |   % 56
 197         << { \voiceTwo <d \hn bf>1. } \context Voice = vc { \voiceOne <\hn bf'>2. <\hn a>2 <\hn g> 4 } >> |   % 57
 198         << { \voiceTwo r2 r bf,4 ( c ) } \context Voice = vc { \voiceOne <\hn bf'>2. <\hn a>2 <\hn g>4 } >> \oneVoice |   % 58
 199         <c, \hn a \hn f' \hn a>1. |   % 59
 200         <c \hn a \hn f' \hn a>1. ~ |   % 60
 201         <c \hn a \hn f' \hn a>1. |   % 61
 202         R1. |   % 62
 203
 204         % Interlude
 205
 206         s1. |   % 63
 207         s1. |   % 64
 208         s1. |   % 65
 209         s1. |   % 66
 210         s1. |   % 67
 211         s1. |   % 68
 212         s1. |   % 69
 213         s1. |   % 70
 214         s1. |   % 71
 215         s1. |   % 72
 216         s1. |   % 73
 217         s1. |   % 74
 218         s1. |   % 75
 219         R1. |   % 76
 220         R1. |   % 77
 221         r2 r <a \hn e \hn cs' \hn a'>4 <cs \hn a \hn e' \hn cs'> |   % 78
 222
 223         % Chorus
 224
 225         <cs \hn a \hn e' \hn cs'>1. |   % 79
 226         <cs \hn a \hn e' \hn cs'>2. r4 <a \hn e \hn cs' \hn a'> <cs \hn a \hn e' \hn cs'> |   % 80
 227         <cs \hn a \hn fs' \hn cs'>1. |   % 81
 228         <cs \hn a \hn fs' \hn cs'>1 r2 |   % 82
 229         <cs \hn a \hn e' \hn cs'>2. <cs \hn a \hn e' \hn cs'> |   % 83
 230         << { \voiceTwo d2 ( cs4 ) cs2 ( b4 ) } \context Voice = vb { \voiceOne <\hn b \hn fs' \hn d'>2. <\hn a \hn e' \hn cs'> } >> \oneVoice |   % 84
 231         <b \hn gs \hn e' \hn b'>1. |   % 85
 232         r2 r <a \hn e \hn cs' \hn a'>4 ( <cs \hn a  \hn e' \hn cs'> ) |   % 86
 233         <cs \hn a \hn e' \hn cs'>1 ~ ( <cs \hn a \hn e' \hn cs'>8 <d \hn d'>16 <cs \hn cs'> <b \hn b'>4 ) |   % 87
 234         <b \hn gs \hn e' \hn b'>2. r4 r <a \hn fs \hn cs' \hn a'>4 |   % 88
 235         <cs \hn a \hn fs' \hn cs'>1. |   % 89
 236         <cs \hn a \hn fs' \hn cs'>2. r4 r <d \hn d'> |   % 90
 237         <e \hn e'>1 ( <d \hn d'>8 <cs \hn cs'> <b \hn b'>4 ) |   % 91
 238         <b \hn b'>1 ~ <b \hn b'>4 <a \hn a'> |   % 92
 239         <d \hn fs \hn d'>2. ( <cs \hn e \hn cs'>4 ~ <cs \hn e \hn cs'>8 <d \hn d'>16 <cs \hn cs'> <b \hn b'>4 ) |   % 93
 240
 241         <b \hn e \hn b'>2. r4 <a \hn e \hn cs' \hn a'> <cs \hn a \hn e' \hn cs'> |   % 94
 242
 243         <b \hn e \hn b'>2. <b \hn e \hn b'>4 ~ ( <b \hn e \hn b'>8 <cs \hn fs \hn cs'>16 <b \hn e \hn b'> <a \hn d \hn a'>4 ) |   % 95
 244
 245         % Outro
 246
 247         <a \hn e' \hn a>1. |   % 96
 248         s1. |   % 97
 249         s1. |   % 98
 250         s1. |   % 99
 251         s1. |   % 100
 252 }
 253
 254 LeadVoxText = \lyricmode
 255 {
 256         He wraps him -- self in light
 257         as with a gar -- _ _ _ ment,
 258         He spreads out the hea -- _ vens,
 259         and walks on the wings _ of the wind. _
 260         He sends forth the springs _ from the val -- leys,
 261         they flow be -- tween moun -- _ _ _ tains,
 262         The birds of the air, __ _ _ _ dwell by the wa -- _ ters, _
 263         lift -- ing their _ voi -- ces in _ song,
 264
 265         Sing -- ing glo -- ry, glo -- ry,
 266         glo -- ry to _ the _ lamb,
 267         All _ prai -- _ _ _ _ ses, and ho -- nor, for -- e -- _ _ _ _ _ _ _ _ ver.
 268
 269         He made the moon _ for its sea -- sons,
 270         the sun knows its set -- _ _ _ tings,
 271         He looks at the Earth and it trem -- bles,
 272         He touch -- es the _ moun -- tains and they smoke,
 273         I will sing to the Lord _ all my life,
 274         I will sing prai -- ses to my God,
 275         As long as I live,
 276         prai -- ses to the Lord, O my soul,
 277
 278         Sing -- ing
 279
 280         ho -- nor, for -- e -- ver, _ and _ e -- ver. _
 281
 282         Sing -- ing glo -- ry, hal -- le -- lu -- jah,
 283         glo -- ry to _ our _ God,
 284         All _ prais -- _ _ _ _ es, and ho -- nor, for -- e -- _ _ _ ver _
 285         and e -- _ _ _ _ _ ver
 286
 287         Sing -- ing
 288
 289         ver, A -- _ _ _ _ men.
 290 }
 291
 292 DescantText = \lyricmode
 293 {
 294         _ _ and e -- ver and e -- ver _
 295 }
 296
 297 %
 298 % Riffs
 299 %
 300 Riffs = \relative c''
 301 {
 302         \tiny
 303
 304         s1.*63 |   % 1-62 (plus blank for Coda)
 305
 306         b1 a4 g |   % 63
 307         e1 fs4 g |   % 64
 308         e1 d4 c |   % 65
 309         b1 g'4 a |   % 66
 310         b1 a4 g |   % 67
 311         e1 a4 g |   % 68
 312         d1 fs4 g |   % 69
 313         a1 g4 a |   % 70
 314         b1 a4 g |   % 71
 315         e1 fs4 g |   % 72
 316         e1 d4 c |   % 73
 317         b1 d4 e |   % 74
 318         d1. |   % 75
 319
 320         s1.*20 |   % 76-95
 321
 322         s1. |   % 96
 323         <a' e'>2. <d d'>4 <cs cs'> <a a'> |   % 97
 324         <a e'>1. ~ |   % 98
 325         <a e'>2. <d d'>4 <cs cs'> <a a'> |   % 99
 326         <a a'>1.-\fermata |   % 100
 327 }
 328
 329
 330 %
 331 % Chord names
 332 %
 333 Chords = \chordmode
 334 {
 335 %Bah, can't we set this globally?
 336 %       \popChords
 337
 338         % Intro
 339
 340         g1.:sus2 |   % 1
 341         s1. |   % 2
 342
 343         % Verse
 344
 345         g1.:sus2 |   % 3
 346         s1. |   % 4
 347         s1. |   % 5
 348         s1. |   % 6
 349         f1.:sus2 |   % 7
 350         s1. |   % 8
 351         g1.:sus2 |   % 9
 352         s1. |   % 10
 353         s1. |   % 11
 354         s1. |   % 12
 355         s1. |   % 13
 356         s1. |   % 14
 357         f1.:sus2 |   % 15
 358         s1. |   % 16
 359         g1.:sus2 |   % 17
 360         s1. |   % 18
 361
 362         % Chorus
 363
 364         g1. |   % 19
 365         s1. |   % 20
 366         c1.:maj7 |   % 21
 367         s1. |   % 22
 368         g1. |   % 23
 369         a2.:m7 g |   % 24
 370         d1. |   % 25
 371         s1. |   % 26
 372         g1. |   % 27
 373         d1./fs |   % 28
 374         e1.:m |   % 29
 375         c1.:maj7 |   % 30
 376         d2. c/d |   % 31
 377         d1. |   % 32
 378         g1.:sus2 |   % 33
 379         s1. |   % 34
 380         s1. |   % 35
 381         s1. |   % 36
 382
 383         % Verse
 384
 385         g1.:sus2 |   % 37
 386         s1. |   % 38
 387         s1. |   % 39
 388         s1. |   % 40
 389         f1.:sus2 |   % 41
 390         s1. |   % 42
 391         g1.:sus2 |   % 43
 392         s1. |   % 44
 393         s1. |   % 45
 394         s1. |   % 46
 395         s1. |   % 47
 396         s1. |   % 48
 397         f1.:sus2 |   % 49
 398         s1. |   % 50
 399         g1.:sus2 |   % 51
 400         s1. |   % 52
 401
 402         s1. % for Coda spacing
 403
 404         % Coda
 405
 406         e1.:m |   % 53
 407         c1.:maj7 |   % 54
 408         bf1. |   % 55
 409         s1. |   % 56
 410         g1.:m7 |   % 57
 411         s1. |   % 58
 412         f1. |   % 59
 413         s1. |   % 60
 414         s1. |   % 61
 415         s1. |   % 62
 416
 417         % Interlude
 418
 419         e1.:m |   % 63
 420         d1.:sus2/fs |   % 64
 421         c1./g |   % 65
 422         g1. |   % 66
 423         e1.:m |   % 67
 424         c1.:maj7 |   % 68
 425         g1. |   % 69
 426         d1. |   % 70
 427         e1.:m |   % 71
 428         d1.:sus2/fs |   % 72
 429         c1./g |   % 73
 430         g1. |   % 74
 431         d1.:sus4 |   % 75
 432         d1. |   % 76
 433         e1.:sus4 |   % 77
 434         e1. |   % 78
 435
 436         % Chorus
 437
 438         a1. |   % 79
 439         s1. |   % 80
 440         d1.:maj7 |   % 81
 441         s1. |   % 82
 442         a1. |   % 83
 443         b2.:m7 a |   % 84
 444         e1. |   % 85
 445         s1. |   % 86
 446         a1. |   % 87
 447         e1./gs |   % 88
 448         fs1.:m |   % 89
 449         d1.:maj7 |   % 90
 450         e2. e:sus4 |   % 91
 451         e1. |   % 92
 452         e2.:7 a/e |   % 93
 453
 454         e1. |   % 94
 455
 456         e1. |   % 95
 457
 458         % Outro
 459
 460         a1. |   % 96
 461         s1. |   % 97
 462         s1. |   % 98
 463         s1. |   % 99
 464         s1. |   % 100
 465 }
 466
 467
 468 %
 469 % Chord rhythms
 470 %
 471
 472 % Use a RhythmicStaff on the chords instead of this?
 473 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 474
 475 Rhythm =
 476 {
 477         \override Staff.TimeSignature #'style = #'()
 478         \override NoteHead #'style = #'slash
 479
 480         % Intro
 481
 482         c4. c8 c c c4. c8 c c |   % 1
 483         c4. c8 c c c4. c8 c c |   % 2
 484
 485         % Verse
 486
 487         c4 c c c c c |   % 3
 488         c4 c c c c c |   % 4
 489         c4 c c c c c |   % 5
 490         c4 c c c c c |   % 6
 491         c4 c c c c c |   % 7
 492         c4 c c c c c |   % 8
 493         c4 c c c c c |   % 9
 494         c4 c c c c c |   % 10
 495         c4 c c c c c |   % 11
 496         c4 c c c c c |   % 12
 497         c4 c c c c c |   % 13
 498         c4 c c c c c |   % 14
 499         c4 c c c c c |   % 15
 500         c4 c c c c c |   % 16
 501         c4 c c c c c |   % 17
 502         c4 c c c c c |   % 18
 503
 504         % Chorus
 505
 506         c4 c c c c c |   % 19
 507         c4 c c c c c |   % 20
 508         c4 c c c c c |   % 21
 509         c4 c c c c c |   % 22
 510         c4 c c c c c |   % 23
 511         c4 c c c c c |   % 24
 512         c4 c c c c c |   % 25
 513         c4 c c c c c |   % 26
 514         c4 c c c c c |   % 27
 515         c4 c c c c c |   % 28
 516         c4 c c c c c |   % 29
 517         c4 c c c c c |   % 30
 518         c4 c c c c c |   % 31
 519         c4 c c c c c |   % 32
 520         c4. c8 c c c4. c8 c c |   % 33
 521         c4. c8 c c c4. c8 c c |   % 34
 522         c4. c8 c c c4. c8 c c |   % 35
 523         c4. c8 c c c4. c8 c c |   % 36
 524
 525         % Verse
 526
 527         c4 c c c c c |   % 37
 528         c4 c c c c c |   % 38
 529         c4 c c c c c |   % 39
 530         c4 c c c c c |   % 40
 531         c4 c c c c c |   % 41
 532         c4 c c c c c |   % 42
 533         c4 c c c c c |   % 43
 534         c4 c c c c c |   % 44
 535         c4 c c c c c |   % 45
 536         c4 c c c c c |   % 46
 537         c4 c c c c c |   % 47
 538         c4 c c c c c |   % 48
 539         c4 c c c c c |   % 49
 540         c4 c c c c c |   % 50
 541         c4 c c c c c |   % 51
 542         c4 c c c c c |   % 52
 543
 544         s1. % for Coda spacing
 545
 546         % Coda
 547
 548         c4 c c c c c |   % 53
 549         c4 c c c c c |   % 54
 550         c4 c c c c c |   % 55
 551         c4 c c c c c |   % 56
 552         c4 c c c c c |   % 57
 553         c4 c c c c c |   % 58
 554         c4 c c c c c |   % 59
 555         c4 c c c c c |   % 60
 556         c4 c c c c c |   % 61
 557         c1. |   % 62
 558
 559         % Interlude
 560
 561         c4 c c c c c |   % 63
 562         c4 c c c c c |   % 64
 563         c4 c c c c c |   % 65
 564         c4 c c c c c |   % 66
 565         c4 c c c c c |   % 67
 566         c4 c c c c c |   % 68
 567         c4 c c c c c |   % 69
 568         c4 c c c c c |   % 70
 569         c4 c c c c c |   % 71
 570         c4 c c c c c |   % 72
 571         c4 c c c c c |   % 73
 572         c4 c c c c c |   % 74
 573         c4 c c c c c |   % 75
 574         c4 c c c c c |   % 76
 575         c4 c c c c c |   % 77
 576         c4 c c c c c |   % 78
 577
 578         % Chorus
 579
 580         c4 c c c c c |   % 79
 581         c4 c c c c c |   % 80
 582         c4 c c c c c |   % 81
 583         c4 c c c c c |   % 82
 584         c4 c c c c c |   % 83
 585         c4 c c c c c |   % 84
 586         c4 c c c c c |   % 85
 587         c4 c c c c c |   % 86
 588         c4 c c c c c |   % 87
 589         c4 c c c c c |   % 88
 590         c4 c c c c c |   % 89
 591         c4 c c c c c |   % 90
 592         c4 c c c c c |   % 91
 593         c4 c c c c c |   % 92
 594         c4 c c c c c |   % 93
 595
 596         c4 c c c c c |   % 94
 597
 598         c4 c c c c c |   % 95
 599
 600         % Outro
 601
 602         c4 c c c c c |   % 96
 603         c4 c c c c c |   % 97
 604         c4 c c c c c |   % 98
 605         c4 c c c c c |   % 99
 606         c1.-\fermata |   % 100
 607 }
 608
 609
 610 Dynamics =
 611 {
 612 %{
 613         % Intro
 614
 615         s4_\f s2. |   % 1
 616         s1*5 |   % 2-6
 617         s4_\fp s s \< s |   % 7
 618         s1 |   % 8
 619
 620         % Verse
 621
 622         s4_\mf s2. |   % 9
 623         s1*8 |   % 10-17
 624         s2. s8 s_\fp |   % 18
 625         s4 \< s2. |   % 19
 626
 627         % Chorus
 628
 629         s4_\f s2. |   % 20
 630         s1*5 |   % 21-25
 631         s4_\fp s2. |   % 26
 632         s8 \< s2.. |   % 27
 633         s4_\f s2. |   % 28
 634         s1*21 |   % 29-49
 635
 636         s4_\fp s2. |   % 50
 637         s8 \< s2. s8 \! |   % 51
 638         s1*9 |   % 52-60
 639         s4_\markup { \italic { rit. } } s2. |   % 61
 640         s1*3 |   % 62-64
 641         s2 s4_\markup { \italic { rit. } } s |   % 65
 642 %}
 643 }
 644
 645
 646 \score
 647 {
 648         <<
 649                 \Global                                         % The "roadmap" that everything else depends on
 650
 651                 \context Staff
 652                 <<
 653                         \new Voice = "lead" \LeadVox
 654                         \new Voice \Riffs
 655                         \new Lyrics \lyricsto "lead" \LeadVoxText
 656                         \new Lyrics \lyricsto "vc" \DescantText
 657                 >>
 658
 659                 \new ChoirStaff
 660                 <<
 661                         \new ChordNames \Chords
 662 %Capo 3 edition
 663 %                       \new ChordNames \transpose f d \Chords
 664                         \new RhythmicStaff << \Rhythm \Dynamics >>
 665                 >>
 666
 667                 \set Score.skipBars = ##t
 668                 \set Score.melismaBusyProperties = #'()
 669         >>
 670 }
 671
 672
 673 \paper
 674 {
 675         #(define fonts (make-pango-font-tree
 676                 "Times New Roman"
 677                 "DomCasual BT"
 678                 "Luxi Mono"
 679                 (/ staffSize 20)))
 680
 681 % Don't spread staves vertically across last page (default: t)
 682 %       ragged-last-bottom = ##f
 683 % Don't spread staves vertically across the page (default: f)
 684 %       ragged-bottom = ##t
 685 % Allow partial line for last stave (default: f)
 686         ragged-last = ##t
 687
 688 % To find out what's eating the space at the top...
 689 %       annotate-spacing = ##t
 690 %let's try this: [It works! Huzzah!]
 691         obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 692 }