Shamusworld >> Repos - music/blob - o-for-a-thousand-tongues.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 \header
  12 {
  13         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "O For A Thousand Tongues" }
  14 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  15         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  16         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  17 }
  18
  19
  20 %
  21 % Song's structure
  22 %
  23 Global =
  24 {
  25         \clef G
  26         \key f \major
  27         \numericTimeSignature
  28         \time 3/4
  29
  30         % Intro
  31
  32         s2.*8 \bar ".|:-||"   % 1-8
  33
  34         \repeat volta 2
  35         {
  36                 % Verse
  37
  38                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  39                 s2.*9 |   % 9-17
  40         }
  41         \alternative
  42         {
  43                 {
  44                         s2.*2 |   % 18-19
  45                 }
  46                 {
  47                         s2. |   % 20
  48                 }
  49         }
  50
  51         s2. \bar "||"   % 21
  52
  53         % Verse
  54
  55         \mark \markup { \override #'(font-family . sans) { \box { B } } }
  56         s2.*7 \bar "||"   % 22-28
  57
  58         s2.*2 |   % 29-30
  59
  60         \key g \major
  61
  62         s2.*2 \bar "||"   % 31-32
  63
  64         % Verse
  65
  66         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  67         s2.*7 \bar "||"   % 22-28
  68
  69         % Ending
  70
  71         s2.^\markup { \hspace #0.0 \raise #3.0 \italic { Play figure throughout D } } |   % 40
  72         s2.*3 |   % 41-43
  73
  74         \repeat volta 2
  75         {
  76                 \mark \markup { \override #'(font-family . sans) { \box { D } } }
  77                 s2.*8 |   % 44-51
  78         }
  79 }
  80
  81
  82 %
  83 % Lead vocal
  84 %
  85 LeadVox = \relative c'
  86 {
  87         % Intro
  88
  89         s2.*7 |   % 1-7
  90         r2 c4 |   % 8
  91
  92         % Verse
  93
  94         f8 f g4 g |   % 9
  95         a8 g f4 g |   % 10
  96         a8 a bf4 a |   % 11
  97         g4. r8 c4 |   % 12
  98         c8 a a4 f |   % 13
  99         f8 d d4 f8 ( d ) |   % 14
 100         c8 f f4 g |   % 15
 101
 102         \voiceTwo f2. |   % 16
 103         s2. |   % 17
 104
 105         s2. |   % 18
 106         r2 c4 |   % 19
 107
 108         s2. |   % 20
 109
 110         r2 c4 \oneVoice |   % 21
 111
 112         % Verse
 113
 114         f8 f g4 g |   % 22
 115         a8 g f4 g |   % 23
 116         a8 a bf4 a |   % 24
 117         g4. r8 c4 |   % 25
 118         c8 a a4 f |   % 26
 119         f8 d d4 f8 ( d ) |   % 27
 120         c8 f f4 g |   % 28
 121
 122         \voiceTwo f2. |   % 29
 123         s2. |   % 30
 124
 125         s2. |   % 31
 126         r2 d4 \oneVoice |   % 32
 127
 128         % Verse
 129
 130         g8 g a4 a |   % 22
 131         b8 a g4 a |   % 23
 132         b8 b c4 b |   % 24
 133         a4. r8 d4 |   % 25
 134         d8 b b4 g |   % 26
 135         g8 e e4 g8 ( e ) |   % 27
 136         d8 g g4 a |   % 28
 137
 138         % Ending
 139
 140         \voiceTwo g2. |   % 40
 141         s2. |   % 41
 142         s2. |   % 42
 143         r2 d4 \oneVoice |   % 43
 144
 145         g8 g16 a ( ~ a4. g8 ) |   % 44
 146         g2 r4 |   % 45
 147         r4 a4. g8 |   % 46
 148         g2 d4 |   % 47
 149         g8 g16 a ( ~ a4. g8 ) |   % 48
 150         g2 r4 |   % 49
 151         r4 a4. b8 |   % 50
 152         g2^\fermata d4 |   % 51
 153 }
 154
 155
 156 LeadVoxText = \lyricmode
 157 {
 158         O for a thou- sand tongues to sing
 159         my great re- dee- mer's praise;
 160         The glo- ries of my God and king,
 161         the __ _ tri- umphs of his grace.
 162
 163         My
 164
 165         Je- sus the name that charms our fears
 166         that bids our sor- rows cease;
 167         'Tis mu- sic in the sin- ner's ears,
 168         'Tis __ _ life and health and peace.
 169
 170         He breaks the power of can- celled sin
 171         he sets the pris'- ner free;
 172         His blood can make the foul- est clean,
 173         his __ _ blood a- vailed for me.
 174
 175         O for a thou- __ _ _ sand tongues to sing
 176         O for a thou- __ _ _ sand tongues to sing
 177         O
 178 }
 179
 180 LeadVoxTextB = \lyricmode
 181 {
 182         _ gra- cious mas- ter and my God
 183         a- ssist me to pro- claim;
 184         To spread through all the earth a- broad
 185         the __ _ ho- nors of thy name.
 186 }
 187
 188
 189 Riffs = \relative c''
 190 {
 191         % Intro
 192
 193         \tiny
 194         \repeat "percent" 3   % 1 - 6
 195         {
 196                 << { \tiny f16 c f, <f' f,> ~ <f f,> f, c' f f8 e } \\ { \tiny f,,2 c'4 } >> |   % 1
 197                 << { \tiny f'16 c f, <f' f,> ~ <f f,> f, c' f f8 e } \\ { \tiny bf,2 c4 } >> |   % 2
 198         }
 199         << s2. \\ { \tiny d2 c4 } >> |   % 7
 200         << s2. \\ { \tiny bf2. } >> |   % 8
 201
 202         s2.*7
 203
 204         \voiceOne
 205         \repeat "percent" 6 { f''16 c f, <f' f,> ~ <f f,> f, c' f f8 e | }   % 16-21
 206         \oneVoice
 207
 208         s2.*7
 209
 210         \voiceOne
 211         \repeat "percent" 2 { f16 c f, f' ~ f f, c' f f8 e | }   % 29-30
 212         \oneVoice
 213
 214         \key g \major
 215
 216         \voiceOne
 217         \repeat "percent" 2 { g16 d g, g' ~ g g, d' g g8 fs | }   % 31-32
 218         \oneVoice
 219
 220         s2.*7
 221
 222         \voiceOne
 223         \repeat "percent" 4 { g16 d g, g' ~ g g, d' g g8 fs | }   % 40-43
 224         \oneVoice
 225         \normalsize
 226 }
 227
 228
 229 %
 230 % Chord names
 231 %
 232 Chords = \chordmode
 233 {
 234         % Intro
 235
 236         f2. |   % 1
 237         bf2. |   % 2
 238         f2. |   % 3
 239         bf2. |   % 4
 240         f2. |   % 5
 241         bf2. |   % 6
 242         d2.:m9 |   % 7
 243         bf2. |   % 8
 244
 245         % Verse
 246
 247         f4 c2/e |   % 9
 248         d8:m c bf2 |   % 10
 249         f4/c bf/c f/c |   % 11
 250         c2 c4/e |   % 12
 251         f2 f4/a |   % 13
 252         bf2 g4:m7 |   % 14
 253         f4/c bf/c c |   % 15
 254
 255         f2. |   % 16
 256         bf2. |   % 17
 257
 258         f2. |   % 18
 259         bf2. |   % 19
 260
 261         d2.:m9 |   % 20
 262
 263         bf2. |   % 21
 264
 265         % Verse
 266
 267         d4:m9 c2/e |   % 22
 268         ef4 bf2 |   % 23
 269         d2.:m9 |   % 24
 270         ef2:maj9 bf4/c |   % 25
 271         f4 g:m7 f/a |   % 26
 272         bf2 bf4:m/df |   % 27
 273         f4/c bf/c c |   % 28
 274
 275         f2. |   % 29
 276         bf2. |   % 30
 277
 278         g2. |   % 31
 279         c2. |   % 32
 280
 281         % Verse
 282
 283         g:^3 |   % 33
 284         e8:m d c2 |   % 34
 285         g4/d c/d g/d |   % 35
 286         d2 d4/fs |   % 36
 287         g2 g4/b |   % 37
 288         c2 a4:m7 |   % 38
 289         g4/d c/d d |   % 39
 290
 291         % Ending
 292
 293         g2. |   % 40
 294         c2. |   % 41
 295         e2.:m9 |   % 42
 296         c2. |   % 43
 297
 298         g2. |   % 44
 299         c2. |   % 45
 300         g2. |   % 46
 301         c2. |   % 47
 302         g2. |   % 48
 303         c2. |   % 49
 304         e2.:m9 |   % 50
 305         c2. |   % 51
 306 }
 307
 308
 309 %
 310 % Alternate chord changes (2nd verse)
 311 %
 312 ChordsSup = \chordmode
 313 {
 314         % Intro
 315
 316         s2.*8 |   % 1-8
 317
 318         % Verse
 319
 320         bf4/d c2/e |   % 9
 321         f8 f/a bf2 |   % 10
 322         f4/g bf/g f/g |   % 11
 323         c2:sus4 c4 |   % 12
 324 }
 325
 326
 327 %
 328 % Chord rhythms
 329 %
 330 StaffC = \relative c
 331 {
 332         \numericTimeSignature
 333         \override NoteHead #'style = #'slash
 334         \teeny
 335
 336         % Intro
 337
 338         r8. c16 r4 c |   % 1
 339         c4 c c |   % 2
 340         c4 c c |   % 3
 341         c4 c c |   % 4
 342         c4 c c |   % 5
 343         c4 c c |   % 6
 344         c4 c c |   % 7
 345         c4 c c |   % 8
 346
 347         % Verse
 348
 349         c4 c2 |   % 9
 350         c8 c c4 c |   % 10
 351         c4 c c |   % 11
 352         c4 c c-> |   % 12
 353         c4 c c |   % 13
 354         c4 c c |   % 14
 355         c4 c c |   % 15
 356
 357         c4 c c |   % 16
 358         c4 c c |   % 17
 359
 360         c4 c c |   % 18
 361         c4 c c |   % 19
 362
 363         c4 c c |   % 20
 364
 365         c4 c c |   % 21
 366
 367         % Verse
 368
 369         c4 c2 |   % 22
 370         c4 c2 |   % 23
 371         c2. |   % 24
 372         c2 c4-> |   % 25
 373         c4-> c-> c |   % 26
 374         c4 c c |   % 27
 375         c4 c c |   % 28
 376
 377         c4 c c |   % 29
 378         c4 c c |   % 30
 379
 380         c4 c c |   % 31
 381         c4 c c |   % 32
 382
 383         % Verse
 384
 385         c2.-> |   % 33
 386         c8-> c-> c4-> c |   % 34
 387         c4 c c |   % 35
 388         c4 c c |   % 36
 389         c4 c c |   % 37
 390         c4 c c |   % 38
 391         c4 c c |   % 39
 392
 393         % Ending
 394
 395         c4 c c |   % 40
 396         c4 c c |   % 41
 397         c4 c c |   % 42
 398         c4 c c |   % 43
 399
 400         c4 c c |   % 44
 401         c4 c c |   % 45
 402         c4 c c |   % 46
 403         c4 c c |   % 47
 404         c4 c c |   % 48
 405         c4 c c |   % 49
 406         c4 c c |   % 50
 407         c4^\fermata c c |   % 51
 408 }
 409
 410
 411 Dynamics =
 412 {
 413         s4_\markup { \italic { snare pat. } } s2 |   % 1
 414         s4_\markup { \italic { simile } } s2 |   % 2
 415         s2.*19
 416         s4_\markup { \italic { spacy } } 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 \score
 425 {
 426         <<
 427                 \Global         % The "roadmap" that everything else depends on
 428
 429                 \context Staff
 430                 <<
 431                         \new Voice = "lead" \LeadVox
 432                         \new Voice = "riffs" \Riffs
 433                         \new Lyrics \lyricsto "lead" \LeadVoxText
 434                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 435                 >>
 436
 437                 \new ChoirStaff
 438                 <<
 439                         \new ChordNames \Chords
 440                         \new ChordNames \ChordsSup
 441                         \new RhythmicStaff << \StaffC \Dynamics >>
 442                 >>
 443
 444                 \set Score.skipBars = ##t
 445                 \set Score.melismaBusyProperties = #'()
 446         >>
 447 }
 448
 449
 450 \paper
 451 {
 452         #(define fonts (make-pango-font-tree
 453                 "Times New Roman"
 454                 "LilyJAZZText"
 455                 "Luxi Mono"
 456                 (/ staffSize 20)))
 457
 458 % Don't spread staves vertically across last page (default: t)
 459 %       ragged-last-bottom = ##f
 460 % Don't spread staves vertically across the page (default: f)
 461 %       ragged-bottom = ##t
 462 % Allow partial line for last stave (default: f)
 463         ragged-last = ##t
 464
 465 % To find out what's eating the space at the top...
 466 %       annotate-spacing = ##t
 467 }
 468