Shamusworld >> Repos - music/blob - from-the-inside-out.ly

   1 \version "2.19.48"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20
   6 staffSize = #18
   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 "From The Inside Out" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Hillsong United" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" }
  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 % Song's structure (original is in C)
  31 %
  32
  33 Global =
  34 {
  35         \key c \major
  36         \numericTimeSignature
  37         \time 4/4
  38
  39         % Intro
  40
  41         s1*4 |   % 1-4
  42
  43         \repeat volta 2
  44         {
  45 %       \once \override TextScript #'padding = #2.0
  46 %       s1*0^\markup { \large \italic { Piano only } }
  47                 s1*4 \bar "||"   % 5-8
  48
  49                 % Verse
  50
  51                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  52                 s1*8 |   % 9-16
  53
  54                 % Prechorus
  55
  56 %               \mark \markup { \override #'(font-family . sans) { \box { B } } }
  57 \once \override Score.RehearsalMark #'self-alignment-X = #left
  58 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  59                 s1*7 |   % 17-23
  60 \once \override Score.RehearsalMark #'self-alignment-X = #right
  61 \once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
  62 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
  63         }
  64         \alternative
  65         {
  66                 {
  67                         s1*2 |   % 24-5
  68                 }
  69                 {
  70                         s1 |   % 26
  71                 }
  72         }
  73
  74         % Chorus
  75
  76         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  77         s1*8 \bar "||"  % 27-34
  78
  79         % Solo
  80
  81         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  82         s1*9 \bar "||"  % 35-43
  83
  84         \once \override Score.RehearsalMark #'self-alignment-X = #right
  85         \mark \markup { \italic { D.S. al Coda } }
  86
  87         % blank measure between last measure and coda
  88         \stopStaff s1 \startStaff
  89         \set Score.currentBarNumber = #44
  90
  91         % Coda
  92
  93         \once \override Score.RehearsalMark #'self-alignment-X = #left
  94         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
  95         s1 |   % 44
  96
  97         \repeat volta 2
  98         {
  99                 \mark \markup { \override #'(font-family . sans) { \box { E } } }
 100                 s1*7 |   % 45-51
 101         }
 102         \alternative
 103         {
 104                 {
 105                         s1 |   % 52
 106                 }
 107                 {
 108                         s1 |   % 53
 109                 }
 110         }
 111
 112         s1*5 \bar "|." |   % 54-58
 113 }
 114
 115
 116 %
 117 % Lead vocal
 118 %
 119
 120 LeadVox = \relative c'
 121 {
 122         \clef "treble_8"
 123         \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 124
 125         % Intro
 126
 127         s1*7 |   % 1-7
 128         s2 s8 s16 g16 \stemUp c8 b \stemNeutral |   % 8
 129
 130         % Verse
 131
 132         a8 a4 a8 ~ a r e g |   % 9
 133         g8 f e d r8. g16 c8 b |   % 10
 134         a8 g a c,4 r8 r16 e16 g8 |   % 11
 135         g8 f a4 g c,16 d e8 ~ |   % 12
 136
 137         e8 c r e e d c d |   % 13
 138         e4 d d c16 d e8 ~ |   % 14
 139         e8 c r e e d c d |   % 15
 140         e4 d d r |   % 16
 141
 142         % Prechorus
 143
 144         r4 r8 c' c b a g |   % 17
 145         r4 r8 c c b a g |   % 18
 146         r4 r8 c c b a g |   % 19
 147         g4 a a a |   % 20
 148
 149         r4 r8 c c b a g |   % 21
 150         r4 r8 c c << { \voiceTwo b a g } \context Voice = vb { \voiceOne \tiny d' e d } >> |   % 22
 151         r4 r8 << { \voiceTwo c c b a g } \context Voice = vb { \voiceOne \tiny g' g f f e } >> \oneVoice |   % 23
 152
 153         g,4 a a2 |   % 24
 154         R1 |   % 25
 155
 156         << { \voiceTwo g4 a a } \context Voice = vb { \voiceOne \tiny e' f e16 ( d8. ) } >> \oneVoice c16 d e8 ~ |   % 26
 157
 158         % Chorus
 159
 160         e8 c r e e d c d |   % 27
 161         e4 d d8 r c16 d e8 ~ |   % 28
 162         e8 c r e e d c d |   % 29
 163         e4 d d8 r c16 d e8 ~ |   % 30
 164
 165         e8 f e c8 ~ c d8 d d ~ |   % 31
 166         d8 r e4 e8 r d16 c c8 ~ |   % 32
 167         c8 r e4 d8 c b c ~ |   % 33
 168         c4 e d2 |   % 34
 169
 170         % Solo
 171
 172         R1 |   % 35
 173         r4 r8 c8 g'4 c,8 c ~ |   % 36
 174         c2 r4 d8 d ~ |   % 37
 175         d4. c8 g'4 g8 ( e ) |   % 38
 176         f16 ( e c4 ) r8 r4 e8 e ~ |   % 39
 177         e2 r8 f8 ( e ) d ~ |   % 40
 178         d2 r4 a |   % 41
 179         a2 r |   % 42
 180         R1 |   % 43
 181
 182         % Coda
 183
 184         % blank measure between last measure and coda
 185         s1
 186
 187         << { \voiceTwo g4 a a } \context Voice = vb { \voiceOne \tiny e' f e16 ( d8. ) } >> \oneVoice c16 d e8 ~ |   % 44
 188
 189         e8 c r e e d c d |   % 45
 190         e4 d d8 r c16 d e8 ~ |   % 46
 191         e8 c r e e d c d |   % 47
 192         e4 d d8 r c16 d e8 ~ |   % 48
 193         e8 f e c8 ~ c d8 d d ~ |   % 49
 194         d8 r e4 e8 r d16 c c8 ~ |   % 50
 195         c8 r e4 d8 c b c ~ |   % 51
 196
 197         c4 e d c16 d e8-\laissezVibrer |   % 52
 198
 199         c4-\repeatTie e d d8 c |   % 53
 200
 201         c8 r e4 d8 c b c ~ |   % 54
 202         c4 e d d8 c |   % 55
 203         c8 r e4 d8 c b c ~ |   % 56
 204         c4 e d2 ~ |   % 57
 205         d1-\fermata |   % 58
 206 }
 207
 208
 209 LeadVoxTextA = \lyricmode
 210 {
 211         A thou -- sand times I've failed, _
 212         still your mer -- cy re -- mains
 213         And should I stum -- ble a -- gain,
 214         still I'm caught in your grace
 215
 216         E -- ver -- last -- _ ing,
 217         your light will shine when all else fades
 218         Nev -- er -- end -- _ ing,
 219         your glo -- ry goes be -- yond all fame
 220
 221         My heart and my soul, I give you con -- trol,
 222         con -- sume me from the in -- side out Lord
 223         Let jus -- tice and praise, be -- come my em -- brace,
 224         to love you from the in -- side out
 225
 226         in -- side out
 227
 228         E -- ver -- last -- _ ing,
 229         your light will shine when all else fades
 230         Nev -- er -- end -- _ ing,
 231         your glo -- ry goes be -- yond all fame
 232
 233         And the cry _ of my heart _ is to bring _ you praise
 234         from the in -- _ side out, Lord my soul _ cries out
 235
 236         My soul cries out _ to you _
 237         My soul cries _ out _ _ to you _
 238         to _ you _
 239         to you
 240
 241         in -- side out
 242
 243         E -- ver -- last -- _ ing,
 244         your light will shine when all else fades
 245         Nev -- er -- end -- _ ing,
 246         your glo -- ry goes be -- yond all fame
 247
 248         And the cry _ of my heart _ is to bring _ you praise
 249         from the in -- _ side out, Lord my soul _ cries out
 250
 251         E -- ver -- last
 252
 253         _ cries out
 254         from the in -- side out, Lord my soul _ cries out
 255         from the in -- side out, Lord my soul _ cries out
 256 }
 257
 258 LeadVoxTextB = \lyricmode
 259 {
 260         Your will a -- bove all else, _
 261         _ my pur -- pose re -- mains
 262         The art of los -- ing my -- self,
 263         _ in bring -- ing you praise
 264 }
 265
 266
 267 Riffs = \relative c
 268 {
 269         \tiny
 270         f8 g e'8. e16 ~ e2 |   % 1
 271         e,8 g e'8. e16 d8 b g4 |   % 2
 272         f8 g e'8. e16 ~ e2 |   % 3
 273         e,8 g e'8. e16 d8 b g4 |   % 4
 274         f8 g e'8. e16 ~ e2 |   % 5
 275         e,8 g e'8. e16 d8 b g4 |   % 6
 276         f8 g e'8. e16 ~ e2 |   % 7
 277         e,8 g e'8. e16 d8 b \stemDown g4 \stemNeutral |   % 8
 278         \normalsize
 279 %{
 280         \tiny
 281         a8 gs gs fs |   % 0
 282         gs4 gs a8 gs fs e |   % 1
 283         fs4 fs a8 gs gs fs |   % 2
 284         gs4 gs gs8 b4 e,8 ~ |   % 3
 285         e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ |   % 4
 286         e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, |   % 5
 287
 288         s1*16 |   % 6-21
 289
 290         r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ |   % 22
 291         e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, |   % 23
 292
 293         s1*7 |   % 24-30
 294
 295         s1 % blank bar for Coda
 296
 297         s1*13 |   % 31-43
 298
 299         r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ |   % 44
 300         e a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ |   % 45
 301         e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, |   % 46
 302         <a b e>1-\fermata |   % 47
 303         \normalsize
 304 %}
 305 }
 306
 307
 308 %
 309 % Chord names
 310 %
 311
 312 Chords = \chordmode
 313 {
 314         % Intro
 315
 316         f1 |   % 1
 317         c2 g |   % 2
 318         f1 |   % 3
 319         c2 g |   % 4
 320         f1 |   % 5
 321         c2 g |   % 6
 322         f1 |   % 7
 323         c2 g |   % 8
 324
 325         % Verse
 326
 327         f1 |   % 9
 328         c2 g |   % 10
 329         f1 |   % 11
 330         c2 g |   % 12
 331         a2:m f |   % 13
 332         c2 g |   % 14
 333         a2:m f |   % 15
 334         c2 g |   % 16
 335
 336         % Prechorus
 337
 338         f1 |   % 17
 339         c1 |   % 18
 340         a1:m |   % 19
 341         g1 |   % 20
 342         f1 |   % 21
 343         a1:m |   % 22
 344         g1 |   % 23
 345
 346         d1:m |   % 24
 347         s1 |   % 25
 348
 349         d1:m |   % 26
 350
 351         % Chorus
 352
 353         a2:m f |   % 27
 354         c2 g |   % 28
 355         a2:m f |   % 29
 356         c2 g |   % 30
 357
 358         c2 f |   % 31
 359         g2 a:m |   % 32
 360         f2 g |   % 33
 361         f2 g |   % 34
 362
 363         % Solo
 364
 365         f1 |   % 35
 366         c1 |   % 36
 367         a1:m |   % 37
 368         g1 |   % 38
 369         f1 |   % 39
 370         a1:m |   % 40
 371         g1 |   % 41
 372         d1:m |   % 42
 373         s1 |   % 43
 374
 375         % Coda
 376
 377         % blank measure between last measure and coda
 378         s1
 379
 380         d1:m |   % 44
 381
 382         a2:m f |   % 45
 383         c2 g |   % 46
 384         a2:m f |   % 47
 385         c2 g |   % 48
 386         c2 f |   % 49
 387         g2 a:m |   % 50
 388         f2 g |   % 51
 389
 390         f2 g |   % 52
 391
 392         f2 g |   % 53
 393
 394         f2 g |   % 54
 395         f2 g |   % 55
 396         f2 g |   % 56
 397         f2 g |   % 57
 398         s1 |   % 58
 399 }
 400
 401
 402 %
 403 % Chord rhythms
 404 %
 405
 406 % Use a RhythmicStaff on the chords instead of this?
 407 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 408
 409 Rhythm = \relative c
 410 {
 411         \numericTimeSignature
 412         \override NoteHead #'style = #'slash
 413         \teeny
 414
 415         % Intro
 416
 417         c4 c c c |   % 1
 418         c4 c c c |   % 2
 419         c4 c c c |   % 3
 420         c4 c c c |   % 4
 421         c4 c c c |   % 5
 422         c4 c c c |   % 6
 423         c4 c c c |   % 7
 424         c4 c c c |   % 8
 425
 426         % Verse
 427
 428         c4 c c c |   % 9
 429         c4 c c c |   % 10
 430         c4 c c c |   % 11
 431         c4 c c c |   % 12
 432         c4 c c c |   % 13
 433         c4 c c c |   % 14
 434         c4 c c c |   % 15
 435         c4 c c c |   % 16
 436
 437         % Prechorus
 438
 439         c4 c c c |   % 17
 440         c4 c c c |   % 18
 441         c4 c c c |   % 19
 442         c4 c c c |   % 10
 443         c4 c c c |   % 21
 444         c4 c c c |   % 22
 445         c4 c c c |   % 23
 446
 447         c4 c c c |   % 24
 448         c1 |   % 25
 449
 450         c4 c c c |   % 26
 451
 452         % Chorus
 453
 454         c4 c c c |   % 27
 455         c4 c c c |   % 28
 456         c4 c c c |   % 29
 457         c4 c c c |   % 30
 458         c4 c c c |   % 31
 459         c4 c c c |   % 32
 460         c4 c c c |   % 33
 461         c4 c c c |   % 34
 462
 463         % Solo
 464
 465         c4 c c c |   % 35
 466         c4 c c c |   % 36
 467         c4 c c c |   % 37
 468         c4 c c c |   % 38
 469         c4 c c c |   % 39
 470         c4 c c c |   % 40
 471         c4 c c c |   % 41
 472         c4 c c c |   % 42
 473         c4 c c c |   % 43
 474
 475         % Coda
 476
 477         % blank measure between last measure and coda
 478 %hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!!
 479         \stopStaff s1 \startStaff
 480         c4 c c c |   % 44
 481
 482         c4 c c c |   % 45
 483         c4 c c c |   % 46
 484         c4 c c c |   % 47
 485         c4 c c c |   % 48
 486         c4 c c c |   % 49
 487         c4 c c c |   % 50
 488         c4 c c c |   % 51
 489
 490         c4 c c c |   % 52
 491
 492         c4 c c c |   % 53
 493
 494         c4 c c c |   % 54
 495         c4 c c c |   % 55
 496         c4 c c c |   % 56
 497         c4 c c c |   % 57
 498         c1-\fermata |   % 58
 499 }
 500
 501
 502 Dynamics =
 503 {
 504 %{
 505         s2_\mf |   % 0
 506         s1*3 |   % 1-3
 507         s4_\markup { \italic { add cymbal colors } } s2. |   % 5
 508         s2 s16 s \> s4 s16 s \! |   % 5
 509
 510         % Verse
 511
 512         s4_\markup { \italic { Unison 1st X } } s2. |   % 6
 513         s1*8 |   % 7-14
 514
 515         % Chorus
 516
 517         s4_\markup { \italic { snare on D.S. } } s2. |   % 15
 518         s1*9 |   % 16-24
 519
 520         % Bridge
 521
 522         s4_\markup { \italic { Unison 1st X } } s2. |   % 25
 523         s1*4 |   % 26-29
 524         s4.. s16_\markup { \italic { big fill } } \< s4. s8-\f |   % 30
 525
 526         s1 % blank bar for coda
 527
 528         % Coda
 529
 530         s2 s8 \< s4 s8 \! |   % 31
 531         s4_\ff s2. |   % 32
 532         s1*6 |   % 33-38
 533         s2 s8 \> s4 s8-\mp |   % 39
 534
 535         s4_\markup { \italic { floating } } s2. |   % 40
 536 %}
 537 }
 538
 539
 540 \score
 541 {
 542         <<
 543                 \set Score.skipBars = ##t
 544                 \set Score.melismaBusyProperties = #'()
 545                 \Global         % The "roadmap" that everything else depends on
 546
 547                 \context Staff
 548                 <<
 549                         \new Voice = "lead" \LeadVox
 550                         \new Voice \Riffs
 551                         \new Lyrics \lyricsto "lead" \LeadVoxTextA
 552                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 553                 >>
 554
 555                 \new ChoirStaff
 556                 <<
 557                         \new ChordNames \Chords
 558                         \new RhythmicStaff << \Rhythm \Dynamics >>
 559                 >>
 560         >>
 561 }
 562
 563
 564 \paper
 565 {
 566   #(define fonts (make-pango-font-tree
 567     "Times New Roman"
 568     "JazzText"
 569     "Luxi Mono"
 570     (/ staffSize 20)))
 571
 572 % Spread staves vertically across last page (default: t)
 573 %       ragged-last-bottom = ##f
 574 % Don't spread staves vertically across the page (default: f)
 575 %       ragged-bottom = ##t
 576 % Allow partial line for last stave (default: f)
 577         ragged-last = ##t
 578
 579 % To find out what's eating the space at the top...
 580 %       annotate-spacing = ##t
 581 %let's try this: [It works! Huzzah!][nope... :-/]
 582 %       obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 583 }
 584