Shamusworld >> Repos - music/blob - who-am-i.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 = #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         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Who Am I" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Mark Hall" }
  17 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. " }
  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 %
  31 % Song's structure
  32 %
  33 Global =
  34 {
  35         \key b \major
  36         \numericTimeSignature
  37         \time 2/2
  38
  39         % Intro
  40
  41         \once \override TextScript #'padding = #2.0
  42         s1*0^\markup { \large \bold { Moderate pop } }
  43 % Capo 4 version
  44 %       s1*0^\markup { \hspace #0.0 \raise #2.0 \larger \bold { "Moderate pop (*** CAPO 4 ***)" } }
  45
  46         % Intro
  47
  48         s1*9 |   % 1-9
  49
  50         \repeat volta 2
  51         {
  52                 % Verse
  53
  54                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  55                 s1*16 \bar "||"   % 10-25
  56
  57                 % Prechorus
  58
  59                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  60                 \mark \markup { \override #'(font-family . sans) { \box { A17 } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  61                 s1*8 \bar "||"   % 26-33
  62
  63                 % Chorus
  64
  65                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  66                 s1*15 |   % 34-48
  67                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  68                 \mark \markup { \musicglyph #"scripts.coda" \italic { to Coda } }
  69         }
  70         \alternative
  71         {
  72                 {
  73                         s1*9 |   % 49-57
  74                 }
  75                 {
  76                         s1 |   % 58
  77                 }
  78         }
  79
  80 %s1 \bar "||"   % 59
  81
  82         % Bridge (tricky timing!)
  83
  84         \time 5/4
  85         s1 s4 \bar "||"   % 59
  86         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  87         \time 3/4
  88         s2.*2 |   % 60-61
  89         \time 5/4
  90         s1 s4 |   % 62
  91         \time 3/4
  92         s2.*2 |   % 63-64
  93         \time 2/4
  94         s2 |   % 65
  95         \time 5/4
  96         s1 s4 |   % 66
  97         \time 2/2
  98         s1*4 \bar "||" % 67-70
  99         \once \override Score.RehearsalMark #'self-alignment-X = #right
 100         \mark \markup { \large \bold { D.S. al Coda } }
 101
 102         % Coda
 103
 104         % blank measure between last measure and coda
 105 %       \stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
 106         \stopStaff s1 \startStaff   % That removed the spurious floating bar line from line break
 107 %       \break % Meh
 108         \set Score.currentBarNumber = #71
 109
 110         \once \override Score.RehearsalMark #'self-alignment-X = #left
 111         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
 112
 113         s1*6 \bar "||"   % 71-76
 114         \mark \markup { \override #'(font-family . sans) { \box { D } } }
 115         s1*16 |   % 77-92
 116
 117         \repeat volta 6
 118         {
 119                 \mark \markup { \override #'(font-family . sans) { \box { E } } }
 120                 s1*3 |   % 93-95
 121         }
 122         \alternative
 123         {
 124                 {
 125                         s1 |   % 96
 126                 }
 127                 {
 128                         s1 |   % 97
 129                 }
 130         }
 131
 132         s1 \bar "|."   % 98
 133 }
 134
 135
 136 %
 137 % Lead vocal
 138 %
 139 LeadVox = \relative c''
 140 {
 141         % Intro
 142
 143         s1*8 |   % 1-8
 144         r2 r8 b as b ~ | % 9
 145
 146         % Verse
 147
 148         b4 r r fs8 b |   % 10
 149         cs4 b8 as8 ~ as4 fs8 b ~ |   % 11
 150         b4 r4 r4. fs8 |   % 12
 151         cs'4 b8 as8 ~ as b4 b8 ( ~ |   % 13
 152         b8 as gs4 ) r4. cs,8 |   % 14
 153         as'4 as8 as ~ as b4 gs8 ~ |   % 15
 154         gs4 r2. |   % 16
 155         r2 r8 b as b ~ |   % 17
 156
 157         b4 r r fs8 b |   % 18
 158         cs4 b8 as8 ~ as4 fs8 b ~ |   % 19
 159         b4 r4 r4. fs8 |   % 20
 160         cs'4 b8 as8 ~ as b4 b8 ( ~ |   % 21
 161         b8 as gs4 ) r4 cs,8 b' |   % 22
 162         as4 as8 as ~ as b4 gs8 ( ~ |   % 23
 163         gs2 fs ) |   % 24
 164         r2. gs8 as \bar "||"   % 25
 165
 166         % Prechorus
 167
 168         b4 as8 b ~ b b4 b8 ( ~ |   % 26
 169         b8 gs fs4 ) ~ fs gs8 as |   % 27
 170         b4 as8 b ~ b cs4 as8 ~ |   % 28
 171         as2 r4 gs8 as |   % 29
 172         b4 as8 b ~ b b4 b8 ~ |   % 30
 173         b2 r4 gs8 as |   % 31
 174         b4 cs8 ds ~ ds4 e8 cs ~ |   % 32
 175         cs1 \bar "||"   % 33
 176
 177         % Chorus
 178
 179         r4 ds cs r8 b |   % 34
 180         cs4 cs8 cs ~ cs b4 ds8 ~ |   % 35
 181         ds8 b4. r4 b8 b |   % 36
 182         cs4 ds8 e ~ e4 ds8 ds ~ |   % 37
 183         ds8 b4. r4 r8 fs |   % 38
 184         cs'4. cs8 ~ cs b b b ~ | % 39
 185         b8 gs4. r4 r8 fs |   % 40
 186         b4 b8 b ~ b ds4 ds8 ~ |   % 41
 187
 188         ds8 r ds4 cs r |   % 42
 189         cs4 cs8 cs ~ cs b4 ds8 ~ |   % 43
 190         ds8 b4. r4 b8 b |   % 44
 191         cs4 ds8 e ~ e4 ds8 ds ~ |   % 45
 192         ds8 b4. r4 gs8 b |   % 46
 193         cs4 b8 cs ~ cs ds4 b8 ~ |   % 47
 194         b1 |   % 48
 195
 196         r2 r8 b as8 b ~ |   % 49
 197         b4 s2. |   % 50
 198         s1*6 |   % 51-56
 199         r2 r8 b as8 b |   % 57
 200
 201         r2 r8 b as8 b ~ ( |   % 58
 202
 203         % Bridge (tricky timing!)
 204
 205         \time 5/4
 206         b2 cs2. ) |   % 59
 207         \time 3/4
 208         r2. |   % 60
 209         r2. |   % 61
 210         \time 5/4
 211         r2 r2. |   % 62
 212         \time 3/4
 213         r2. |   % 63
 214         r2. |   % 64
 215         \time 2/4
 216         r2 |   % 65
 217         \time 5/4
 218         r2 r2. |   % 66
 219         \time 2/2
 220         r1 |   % 67
 221         r1 |   % 68
 222         r1 |   % 69
 223         r2 r4 gs8 as |   % 70
 224
 225         % Coda
 226
 227 s1 % Extra bar for coda
 228
 229         r2 r8 b as b ~ |   % 71
 230         b1 ~ |   % 72
 231         b1 ~ |   % 73
 232         b1 |   % 74
 233         r1 |   % 75
 234         r2 r8 b as b ~ |   % 76
 235
 236         b1 |   % 77
 237         r2 r8 b as b ( |   % 78
 238         cs16 ds cs4. ~ cs8 b4. ~ |   % 79
 239         b4 as gs8 fs4. ) |   % 80
 240         r1 |   % 81
 241         r1 |   % 82
 242         r1 |   % 83
 243         r1 |   % 84
 244         r8 ds'4 cs8 ~ cs b4 b8 ~ |   % 85
 245         b8 ds4 cs8 ~ cs b4 b8 ~ |   % 86
 246         b4 r r2 |   % 87
 247         r4 fs8 b ~ b b4 b8 ( |   % 88
 248         cs16 ds cs8 ~ cs2 b4 ~ |   % 89
 249         b2 ) r8 b gs cs ~ ( |   % 90
 250         cs8 b ~ b2 ) r4 |   % 91
 251         r1 |   % 92
 252
 253         r1 |   % 93
 254         r1 |   % 94
 255         r1 |   % 95
 256
 257         r1 |   % 96
 258
 259         r1 |   % 97
 260
 261         r1-\fermata |   % 98
 262 }
 263
 264
 265 LeadVoxText = \lyricmode
 266 {
 267         Who am I, _ that the lord of all _ the earth _
 268         Would care to know _ my name, __ _ _ _
 269         would care to feel _ my hurt. _
 270         Who am I, _ that the bright and mor -- _ ning star _
 271         Would choose to light _ the way, __ _ _ _
 272         for my e -- ver wander -- _ ing heart. _ _
 273
 274         Not be -- cause of who _ I am, __ _ _ _ _
 275         but be -- cause of what _ you’ve done; _
 276         Not be -- cause of what _ I’ve done, _
 277         but be -- cause of who _ you are. _
 278
 279         I am a flo -- wer quick -- _ ly fad -- _ ing,
 280         here to -- day and gone _ to -- mor -- _ row,
 281         A wave tossed _ in the o -- _ cean,
 282         a va -- por in _ the wind. _
 283         Still you hear me when _ I’m cal -- _ ling,
 284         Lord, you catch me when _ I’m fal -- _ ling
 285         and you’ve told me who _ I am, _
 286         I am yours. _
 287
 288         Who am I,
 289         I am yours. _ _
 290
 291         Not be-
 292
 293         I am yours. __ _ _ _
 294         I am yours. _
 295         I am yours. __ _ _ _ _ _ _ _ _ _
 296         Whom shall _ I fear; _
 297         Whom shall _ I fear? _
 298         ’Cause I _ am yours. __ _ _ _ _ _ _
 299         I am yours. __ _ _ _
 300 }
 301
 302 LeadVoxTextB = \lyricmode
 303 {
 304         _ _ _ _ that the eyes that see _ my sin _
 305         Would look on me _ with love __ _ _ _
 306         and watch me rise _ a -- gain. _
 307         Who am I, _ that the voice that cal -- med the sea _
 308         Would call out through _ the rain __ _ _ _
 309         and _ calm the storm _ in me. _ _
 310 }
 311
 312
 313 Riffs = \relative c''
 314 {
 315         % Intro
 316
 317         \tiny
 318         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 1
 319         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 2
 320         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 3
 321         <b fs>4 <as fs>8 <gs fs>4 <as fs>4 <b fs>8 ~ |   % 4
 322         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 5
 323         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 6
 324         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 7
 325         <b fs>2 <as fs>2 |   % 8
 326
 327         s1*41 |   % 9-49
 328
 329         s4 r8 <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 1
 330         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 2
 331         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 3
 332         <b fs>4 <as fs>8 <gs fs>4 <as fs>4 <b fs>8 ~ |   % 4
 333         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 5
 334         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 6
 335         <b fs>4. <b fs>8 ~ <b fs>8 <as fs>4 <b fs>8 ~ |   % 7
 336         <b fs>2 <as fs>2 |   % 8
 337         \normalsize
 338 }
 339
 340
 341 %
 342 % Chord names
 343 %
 344 Chords = \chordmode
 345 {
 346         % Intro
 347
 348         b2.. e8:sus2 |   % 1
 349         s2.. gs8:m7 |   % 2
 350         s2.. fs8 |   % 3
 351         s1 |   % 4
 352         b2.. e8:sus2 |   % 5
 353         s2.. gs8:m |   % 6
 354         s2.. fs8 |   % 7
 355         s1 |   % 8
 356         s1 |   % 9
 357
 358         % Verse
 359
 360         b1 |   % 10
 361         fs1/as |   % 11
 362         gs1:m7 |   % 12
 363         fs4.:sus4 fs2 s8 |   % 13
 364         e1:sus2 |   % 14
 365         fs1/e |   % 15
 366         e1 |   % 16
 367         s1 |   % 17
 368
 369         b1 |   % 18
 370         fs1/as |   % 19
 371         gs1:m7 |   % 20
 372         fs4.:sus4 fs2 s8 |   % 21
 373         e1:sus2 |   % 22
 374         fs1/e |   % 23
 375         e1 |   % 24
 376         s1 |   % 25
 377
 378         % Prechorus
 379
 380         e1 |   % 26
 381         fs1/as |   % 27
 382         gs1:m7 |   % 28
 383         fs1/as |   % 29
 384         gs1:m7 |   % 30
 385         fs1/as |   % 31
 386         e1 |   % 32
 387         fs2 fs:sus4.7 |   % 33
 388
 389         % Chorus
 390
 391         b1 |   % 34
 392         fs1/as |   % 35
 393         gs1:m7 |   % 36
 394         fs2:sus4 fs |   % 37
 395         e1 |   % 38
 396         fs1 |   % 39
 397         e1 |   % 40
 398         s2 fs4:sus4 fs |   % 41
 399
 400         b1 |   % 42
 401         fs1/as |   % 43
 402         gs1:m7 |   % 44
 403         fs2:sus4 fs |   % 45
 404         e1 |   % 46
 405         fs1 |   % 47
 406         e1 |   % 48
 407
 408         s1 |   % 49
 409         b2.. e8:sus2 |   % 50
 410         s2.. gs8:m7 |   % 51
 411         s2.. fs8 |   % 52
 412         s1 |   % 53
 413         b2.. e8:sus2 |   % 54
 414         s2.. gs8:m7 |   % 55
 415         s2.. fs8 |   % 56
 416         s1 |   % 57
 417
 418         e2 fs:sus4 |   % 58
 419
 420         % Bridge (tricky timing!)
 421
 422         \time 5/4
 423         gs2:m fs2./as |   % 59
 424         \time 3/4
 425         e4. b/ds |   % 60
 426         cs4.:sus4.7 b |   % 61
 427         \time 5/4
 428         gs2:m fs2./as |   % 62
 429         \time 3/4
 430         e4. b/ds |   % 63
 431         cs4.:sus4.7 b/ds |   % 64
 432         \time 2/4
 433         cs4:sus4 b |   % 65
 434         \time 5/4
 435         gs2:m7 fs2./as |   % 66
 436         \time 2/2
 437         a1:6.9 |   % 67
 438         gs1:m7 |   % 68
 439         e1:m6/g |   % 69
 440         fs1:sus4 |   % 70
 441
 442         % Coda
 443
 444 s1 % Extra bar for coda
 445
 446         e2 fs |   % 71
 447         gs1:m7 |   % 72
 448         fs1 |   % 73
 449         e1 |   % 74
 450         fs1 |   % 75
 451         s1 |   % 76
 452
 453         b2.. e8:sus2 |   % 77
 454         s2.. gs8:m7 |   % 78
 455         s2.. fs8 |   % 79
 456         s1 |   % 80
 457         b2.. e8:sus2 |   % 81
 458         s2.. gs8:m |   % 82
 459         s2.. fs8 |   % 83
 460         s1 |   % 84
 461         b2.. e8:sus2 |   % 85
 462         s2.. gs8:m |   % 86
 463         s2.. fs8 |   % 87
 464         s1 |   % 88
 465         b2.. e8:sus2 |   % 89
 466         s2.. gs8:m |   % 90
 467         s2.. fs8 |   % 91
 468         s1 |   % 92
 469
 470         e1 |   % 93
 471         s1 |   % 94
 472         fs1/e |   % 95
 473
 474         s1 |   % 96
 475
 476         s1 |   % 97
 477
 478         e1:3.5.9 |   % 98
 479 }
 480
 481
 482 %
 483 % Chord rhythms
 484 %
 485 Rhythm = \relative c
 486 {
 487         \numericTimeSignature
 488         \override NoteHead #'style = #'slash
 489         \teeny
 490
 491         % Intro
 492
 493         c2.. c8 ~ |   % 1
 494         c2.. c8 ~ |   % 2
 495         c2.. c8 ~ |   % 3
 496         c1 |   % 4
 497         c2.. c8 ~ |   % 5
 498         c2.. c8 ~ |   % 6
 499         c2.. c8 ~ |   % 7
 500         c1 ~ |   % 8
 501         c1 |   % 9
 502
 503         c1 |   % 10
 504         c1 |   % 11
 505         c1 |   % 12
 506         c4. c8 ~ c2 |   % 13
 507         c1 |   % 14
 508         c1 |   % 15
 509         c1 ~ |   % 16
 510         c1 |   % 17
 511
 512         c1 |   % 18
 513         c1 |   % 19
 514         c1 |   % 20
 515         c4. c8 ~ c2 |   % 21
 516         c1 |   % 22
 517         c1 |   % 23
 518         c1 |   % 24
 519         c1 |   % 25
 520
 521         c1 |   % 26
 522         c1 |   % 27
 523         c1 |   % 28
 524         c1 |   % 29
 525         c1 |   % 30
 526         c1 |   % 31
 527         c1 |   % 32
 528         c2 c |   % 33
 529
 530         c1 |   % 34
 531         c1 |   % 35
 532         c1 |   % 36
 533         c2 c |   % 37
 534         c1 |   % 38
 535         c1 |   % 39
 536         c1 |   % 40
 537         c2 c4 c |   % 41
 538
 539         c1 |   % 42
 540         c1 |   % 43
 541         c1 |   % 44
 542         c2 c |   % 45
 543         c1 |   % 46
 544         c1 |   % 47
 545         c1 ~ |   % 48
 546         c1 |   % 49
 547
 548         c2.. c8 ~ |   % 50
 549         c2.. c8 ~ |   % 51
 550         c2.. c8 ~ |   % 52
 551         c1 |   % 53
 552         c2.. c8 ~ |   % 54
 553         c2.. c8 ~ |   % 55
 554         c2.. c8 ~ |   % 56
 555         c1 |   % 57
 556
 557         c2-\repeatTie c |   % 58
 558
 559         % Bridge (tricky timing!)
 560
 561         \time 5/4
 562         c2 c2. |   % 59
 563         \time 3/4
 564         c4. c |   % 60
 565         c4. c |   % 61
 566         \time 5/4
 567         c2 c2. |   % 62
 568         \time 3/4
 569         c4. c |   % 63
 570         c4. c |   % 64
 571         \time 2/4
 572         c4 c |   % 65
 573         \time 5/4
 574         c2 c2. |   % 66
 575         \time 2/2
 576         c1 |   % 67
 577         c1 |   % 68
 578         c1 |   % 69
 579         c1 |   % 70
 580
 581         % Coda
 582
 583         \stopStaff s1 \startStaff   % That removed the spurious floating bar line from line break
 584
 585         c2-\repeatTie c |   % 71
 586         c1 |   % 72
 587         c1 |   % 73
 588         c1 |   % 74
 589         c1 ~ |   % 75
 590         c1 |   % 76
 591
 592         c2.. c8 ~ |   % 77
 593         c2.. c8 ~ |   % 78
 594         c2.. c8 ~ |   % 79
 595         c1 |   % 80
 596         c2.. c8 ~ |   % 81
 597         c2.. c8 ~ |   % 82
 598         c2.. c8 ~ |   % 83
 599         c1 |   % 84
 600         c2.. c8 ~ |   % 85
 601         c2.. c8 ~ |   % 86
 602         c2.. c8 ~ |   % 87
 603         c1 |   % 88
 604         c2.. c8 ~ |   % 89
 605         c2.. c8 ~ |   % 90
 606         c2.. c8 ~ |   % 91
 607         c1 |   % 92
 608
 609         c1 |   % 93
 610         c1 |   % 94
 611         c1 |   % 95
 612
 613         c1 |   % 96
 614
 615         c1 |   % 97
 616
 617         c1-\fermata |   % 98
 618 }
 619
 620
 621 Dynamics =
 622 {
 623 %{
 624         s4_\markup { \italic { snare pat. } } s2 |   % 1
 625         s4_\markup { \italic { simile } } s2 |   % 2
 626         s2.*19
 627         s4_\markup { \italic { spacey } } s2 |   % 22
 628         s2.*5
 629         s4 s \< s \! |   % 28
 630         s2.*22
 631         s4_\markup { \italic { Last time } } s2 |   % 51
 632 %}
 633 }
 634
 635
 636 \score
 637 {
 638         <<
 639                 \Global         % The "roadmap" that everything else depends on
 640 %               \transpose b g \Global          % The "roadmap" that everything else depends on
 641
 642                 \context Staff
 643                 <<
 644                         \new Voice = "lead" \LeadVox
 645 %                       \new Voice = "lead" \transpose b g \LeadVox
 646                         \new Voice \Riffs
 647 %                       \new Voice \transpose b g \Riffs
 648                         \new Lyrics \lyricsto "lead" \LeadVoxText
 649                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 650                 >>
 651
 652                 \new ChoirStaff
 653                 <<
 654                         \new ChordNames \Chords
 655 %Capo 4 edition
 656 %                       \new ChordNames \transpose b g \Chords
 657                         \new RhythmicStaff << \Rhythm \Dynamics >>
 658                 >>
 659
 660                 \set Score.skipBars = ##t
 661                 \set Score.melismaBusyProperties = #'()
 662         >>
 663 }
 664
 665
 666 \paper
 667 {
 668         #(define fonts (make-pango-font-tree
 669                 "Times New Roman"
 670                 "LilyJAZZText"
 671                 "Luxi Mono"
 672                 (/ staffSize 20)))
 673
 674 % Spread staves vertically across last page (default: t)
 675 %       ragged-last-bottom = ##f
 676 % Don't spread staves vertically across the page (default: f)
 677 %       ragged-bottom = ##t
 678 % Allow partial line for last stave (default: f)
 679         ragged-last = ##t
 680
 681 % To find out what's eating the space at the top...
 682 %       annotate-spacing = ##t
 683 }
 684