Shamusworld >> Repos - music/blob - forever.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 = #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 %Let's bump up the title size and switch to the chord font. :-)
  16
  17         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Forever" }
  18         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Chris Tomlin/Jesse Reeves" }
  19 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. " }
  20         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  21 % Let's try a chord dictionary
  22 %       subtitle = \markup { \center-column { "F#m" \fret-diagram-terse #"x;x;4;2;2;2;" } "       " \center-column { "F#m/F" \fret-diagram-terse #"x;x;3;2;2;2;" } "       " \center-column { "F#m/E" \fret-diagram-terse #"x;x;2;2;2;2;" }  "       " \center-column { "F#m/Eb" \fret-diagram-terse #"x;x;1;2;2;2;" }  "       " \center-column { "Em7" \fret-diagram-terse #"o;2;2;o;3;o;" }  "       " \center-column { "A13" \fret-diagram-terse #"x;o;2;o;2;2;" }  }
  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.0 (ly:music-property arg 'tweaks))) arg)
  32
  33
  34 %
  35 % Song's structure
  36 %
  37 Global =
  38 {
  39         \key g \major
  40         \numericTimeSignature
  41         \time 4/4
  42
  43         % Intro
  44
  45         \once \override TextScript #'padding = #2.0
  46         s1*0^\markup { \large \bold { 8th Note Rock } }
  47 % Capo 4 version
  48 %       s1*0^\markup { \hspace #0.0 \raise #2.0 \larger \bold { "Moderate pop (*** CAPO 4 ***)" } }
  49
  50         s1*8 \bar "||:"    % 1-8
  51
  52         % Verse
  53
  54         \repeat volta 2
  55         {
  56                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  57                 s1*11 |   % 9-19
  58         }
  59         \alternative
  60         {
  61                 {
  62                         s1 |   % 20
  63                 }
  64                 {
  65                         s1 |   % 21
  66                 }
  67         }
  68
  69         % Prechorus
  70
  71         s1*4 \bar "||"   % 22-25
  72
  73         % Chorus
  74
  75         \mark \markup { \override #'(font-family . sans) { \box { B } } }
  76         s1*10 \bar "||"   % 26-
  77
  78         % Verse
  79
  80         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  81         s1*8 \bar "||"   % -
  82
  83         % Prechorus
  84
  85         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  86         s1*8 \bar ".|:-||"   % -
  87
  88         % Chorus
  89
  90         \repeat volta 2
  91         {
  92                 \mark \markup { \override #'(font-family . sans) { \box { E } } }
  93                 s1*10 |   % -
  94         }
  95
  96         % Bridge
  97
  98         \mark \markup { \override #'(font-family . sans) { \box { F } } }
  99         s1*7 |   % -
 100 %       s1*0^\markup { \large \bold { "Repeat at [D], end at [F]" } }
 101         \mark \markup { \large \bold { "Repeat at [D], end at [F]" } }
 102         s1*1 \bar "||"   % -
 103 %       \once \override Score.RehearsalMark #'self-alignment-X = #right
 104 }
 105
 106
 107 %
 108 % Lead vocal
 109 %
 110 LeadVox = \relative c'
 111 {
 112         \clef G
 113
 114         % Intro
 115
 116         r1 |   % 1
 117         r1 |   % 2
 118         r1 |   % 3
 119         r1 |   % 4
 120         r1 |   % 5
 121         r1 |   % 6
 122         r1 |   % 7
 123         r2 r4 d |   % 8
 124
 125         % Verse
 126
 127         b8 d d d ~ d d4 e8 ~ |   % 9
 128         e8 d4 d8 ~ d4 r8 d8 |   % 10
 129         b'4 b b a8 a ( |   % 11
 130         g8 ) g ~ g2 g8 g |   % 12
 131         e8 g4 g8 ~ g g g g |   % 13
 132         a8 b4 g8 ~ g4 r8 d8 |   % 14
 133         b'4 b b a8 a ( |   % 15
 134         g8 ) g ~ g2 g4 |   % 16
 135
 136         a1 ~ |   % 17
 137         a2 ~ a8 b4. |   % 18
 138         g1 ~ |   % 19
 139
 140         g2. c,8 c |   % 20
 141
 142         g'2 ~ g8 g4. |   % 21
 143
 144         a1 ~ |   % 22
 145         a2 ~ a8 b4. |   % 23
 146         g1 ~ |   % 24
 147         g2. d'8 d ~ |   % 25
 148
 149         % Chorus
 150
 151         d8 b4 a8 ~ a g4 a8 ~ |   % 26
 152         a8 b2 ~ b8 d8 d ~ |   % 27
 153         d8 b4 a8 ~ a b4 g8 ~ |   % 28
 154         g2. d'8 d ~ |   % 29
 155         d8 b4 a g a8 ~ |   % 30
 156         a8 b ~ b2 a8 a ( |   % 31
 157         g8 ) g ~ g2. |   % 32
 158         r2 r4 a8 a ( |   % 33
 159         g8 ) g ~ g2. |   % 34
 160         r2 r4 d8 d |   % 35
 161
 162         % Verse
 163
 164         b8 d d d ~ d d4 e8 ~ |   % 36
 165         e8 d4 d8 ~ d4 r8 d8 |   % 37
 166         b'4 b b a8 a ( |   % 38
 167         g8 ) g ~ g2 g8 g |   % 39
 168         e8 g4 g8 ~ g g g g |   % 40
 169         a8 b4 g8 ~ g4 r8 d8 |   % 41
 170         b'4 b b a8 a ( |   % 42
 171         g8 ) g ~ g2 g4 |   % 43
 172
 173         % Prechorus
 174
 175         a1 ~ |   % 44
 176         a2 ~ a8 b4. |   % 45
 177         g1 ~ |   % 46
 178         g2 ~ g8 g4. |   % 47
 179         a1 ~ |   % 48
 180         a2 ~ a8 b4. |   % 49
 181         g1 ~ |   % 50
 182         g2. d'8 d ~ |   % 51
 183
 184         % Chorus
 185
 186         d8 b4 a8 ~ a g4 a8 ~ |   % 52
 187         a8 b2 ~ b8 d8 d ~ |   % 53
 188         d8 b4 a8 ~ a b4 g8 ~ |   % 54
 189         g2. d'8 d ~ |   % 55
 190         d8 b4 a g a8 ~ |   % 56
 191         a8 b ~ b2 a8 a ( |   % 57
 192         g8 ) g ~ g2. |   % 58
 193         r2 r4 a8 a ( |   % 59
 194         g8 ) g ~ g2. |   % 60
 195         r2 r4 r8 d |   % 61
 196
 197          % Bridge
 198
 199         b'4 b b a8 a ( |   % 62
 200         g8 ) g ~ g2 r8 d |   % 63
 201         b'4 b b a8 a ( |   % 64
 202         g8 ) g ~ g2 r8 d |   % 65
 203         b'4 b b a8 a ( |   % 66
 204         g8 ) g ~ g2 r8 d |   % 67
 205         b'4 b b a8 a ( |   % 68
 206         g8 ) g ~ g2 g4 |   % 69
 207
 208          |   %
 209 }
 210
 211 LeadVoxText = \lyricmode
 212 {
 213         Give thanks to the Lord, _ our God _ and King, _
 214         His love en -- dures for -- e -- _ ver _
 215         For _ he is good, _ he is a -- bove all things, _
 216         His love en -- dures for -- e -- _ ver _
 217
 218         Sing praise, __ _ _ sing praise __ _
 219
 220         With a
 221         _ _
 222
 223         Sing praise, __ _ _ sing praise __ _
 224
 225         For -- e -- _ ver God _ is faith -- _ ful _
 226         For -- e -- _ ver God _ is strong _
 227         For -- e -- _ ver God is with _ us _
 228         For -- e -- _ ver _
 229         For -- e -- _ ver _
 230
 231         From the ris -- ing _ to _ the set -- _ ting sun, _
 232         His love en -- dures for -- e -- _ ver _
 233         By the grace of God, _ we will car -- _ ry on, _
 234         His love en -- dures for -- e -- _ ver _
 235
 236         Sing praise, __ _ _ sing praise __ _ _
 237         Sing praise, __ _ _ sing praise __ _
 238
 239         For -- e -- _ ver God _ is faith -- _ ful _
 240         For -- e -- _ ver God _ is strong _
 241         For -- e -- _ ver God is with _ us _
 242         For -- e -- _ ver _
 243         For -- e -- _ ver _
 244
 245         His love en -- dures for -- e -- _ ver _
 246         His love en -- dures for -- e -- _ ver _
 247         His love en -- dures for -- e -- _ ver _
 248         His love en -- dures for -- e -- _ ver _
 249
 250         Sing
 251 }
 252
 253 LeadVoxTextB = \lyricmode
 254 {
 255         _ might -- y _ hand _ and out -- _ stretched arm, _
 256         His love en -- dures for -- e -- _ ver _
 257         _ _ For the life _ _ _ that’s been re -- born, _
 258         His love en -- dures for -- e -- _ ver _
 259 }
 260
 261 LeadVoxTextC = \lyricmode
 262 {
 263 }
 264
 265
 266 Riffs = \relative c''
 267 {
 268         \clef G
 269
 270         % Intro
 271
 272 %{
 273         \tiny
 274         \normalsize
 275 %}
 276 }
 277
 278
 279 %
 280 % Chord names
 281 %
 282 Chords = \chordmode
 283 {
 284         % Intro
 285
 286         g1:sus2 |   %
 287         s1 |   %
 288         e1:m7 |   %
 289         s1 |   %
 290         d1 |   %
 291         s1 |   %
 292         c1:sus2 |   %
 293         s1 |   %
 294
 295         % Verse
 296
 297         g1:sus2 |   %
 298         s1 |   %
 299         s1 |   %
 300         s1 |   %
 301         c1 |   %
 302         s1 |   %
 303         s1 |   %
 304         g1:sus2 |   %
 305         d1 |   %
 306         s1 |   %
 307         e1:m7 |   %
 308
 309         c1:sus2 |   %
 310
 311         c1:sus2 |   %
 312
 313         % Prechorus
 314
 315         d1 |   %
 316         s1 |   %
 317         e1:m7 |   %
 318         c1 |   %
 319
 320         % Chorus
 321
 322         g1:sus2 |   %
 323         s1 |   %
 324         e1:m7 |   %
 325         s1 |   %
 326         d1 |   %
 327         s1 |   %
 328         c1:sus2 |   %
 329         s1 |   %
 330         g1:sus2 |   %
 331         s2 c:sus2 |   %
 332
 333         % Verse
 334
 335         g1:sus2 |   %
 336         s1 |   %
 337         s1 |   %
 338         s1 |   %
 339         c1 |   %
 340         s1 |   %
 341         s1 |   %
 342         g1:sus2 |   %
 343
 344         % Prechorus
 345
 346         d1 |   %
 347         s1 |   %
 348         e1:m7 |   %
 349         c1:sus2 |   %
 350         d1 |   %
 351         s1 |   %
 352         e1:m7 |   %
 353         c1 |   %
 354
 355         % Chorus
 356
 357         g1:sus2 |   %
 358         s1 |   %
 359         e1:m7 |   %
 360         s1 |   %
 361         d1 |   %
 362         s1 |   %
 363         c1:sus2 |   %
 364         s1 |   %
 365         g1:sus2 |   %
 366         s1 |   %
 367
 368         % Bridge
 369
 370         g1 |   %
 371          |   %
 372 }
 373
 374
 375 %
 376 % Chord rhythms
 377 %
 378 % Use a RhythmicStaff on the chords instead of this?
 379 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 380 %
 381 Rhythm = \relative c
 382 {
 383         \numericTimeSignature
 384         \override NoteHead #'style = #'slash
 385         \teeny
 386
 387         r4 r8 c c4 |   % 0
 388         c4 c c |   % 1
 389         c4 c c |   % 2
 390         c4 c4. c8 |   % 3
 391         c4 c c |   % 4
 392
 393         c4 c c |   % 5
 394         c4 c c |   % 6
 395         c4 c4. c8 |   % 7
 396         c4 c c |   % 8
 397
 398         c4 c c |   % 9
 399         c4 c c8 c |   % 10
 400         c4 c c |   % 11
 401         c4 c c |   % 12
 402
 403         c4 c c |   % 13
 404         c4 c c |   % 14
 405         c4 c4. c8 |   % 15
 406         c4. r |   % 16
 407 }
 408
 409
 410 Dynamics =
 411 {
 412 %{
 413         s4_\markup { \italic { snare pat. } } s2 |   % 1
 414         s4_\markup { \italic { simile } } s2 |   % 2
 415         s2.*19
 416         s4_\markup { \italic { spacey } } s2 |   % 22
 417         s2.*5
 418         s4 s \< s \! |   % 28
 419         s2.*22
 420         s4_\markup { \italic { Last time } } s2 |   % 51
 421 %}
 422 }
 423
 424
 425 \score
 426 {
 427         <<
 428                 \set Score.skipBars = ##t
 429                 \set Score.melismaBusyProperties = #'()
 430
 431 %               \new Staff
 432                 <<
 433                         \new ChordNames \Chords
 434 %Capo 4 edition
 435 %                       \new ChordNames \transpose b g \Chords
 436 %                       \new RhythmicStaff << \Rhythm \Dynamics >>
 437                 >>
 438
 439                 \new Staff
 440                 <<
 441                         \Global                                         % The "roadmap" that everything else depends on
 442                         \new Voice = "lead" \LeadVox
 443                         \new Voice \Riffs
 444                         \new Lyrics \lyricsto "lead" \LeadVoxText
 445                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 446                 >>
 447         >>
 448 }
 449
 450
 451 \paper
 452 {
 453   #(define fonts (make-pango-font-tree
 454     "Times New Roman"
 455     "JazzText"
 456     "Luxi Mono"
 457     (/ staffSize 20)))
 458
 459 % Spread staves vertically across last page (default: t)
 460         ragged-last-bottom = ##f
 461 % Don't spread staves vertically across the page (default: f)
 462 %       ragged-bottom = ##t
 463 % Allow partial line for last stave (default: f)
 464 %       ragged-last = ##t
 465
 466 % To find out what's eating the space at the top...
 467 %       annotate-spacing = ##t
 468 }