Shamusworld >> Repos - music/blob - jesus-all-for-jesus.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 = #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 "Jesus, All For Jesus" }
  16 %       composer = \markup { \override #'(font-family . sans) "" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  18         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  19 }
  20
  21
  22 % Useful tweak abbreviations (hn = harmony note)
  23
  24 hn = #(define-music-function (parser location arg) (ly:music?)
  25 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  26
  27   (set! (ly:music-property arg 'tweaks)
  28     (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
  29
  30
  31 %
  32 % Song's structure
  33 %
  34 Global =
  35 {
  36         \clef G
  37         \key d \major
  38         \numericTimeSignature
  39         \time 4/4
  40
  41         % Intro
  42
  43         \repeat volta 2
  44         {
  45                 s1*2 |   % 1-2
  46         }
  47
  48         s1*8 \bar ".|:-||"   % 3-10
  49
  50         % A section
  51
  52         \repeat volta 2
  53         {
  54                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  55                 s1*5 |   % 11-15
  56         }
  57         \alternative
  58         {
  59                 {
  60                         s1*3 |   % 16-18
  61                 }
  62                 {
  63                         s1 |   % 19
  64                 }
  65         }
  66
  67         s1*2 \bar ".|:-||"   % 20-21
  68
  69         \repeat volta 2
  70         {
  71                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  72
  73                 s1*5 |   % 22-26
  74         }
  75         \alternative
  76         {
  77                 {
  78                         s1*3 |   % 27-29
  79                 }
  80                 {
  81                         s1   % 30
  82                 }
  83         }
  84
  85         s1*2 \bar "||"   % 31-32
  86
  87         % B section
  88
  89         \once \override Score.RehearsalMark #'self-alignment-X = #left
  90         \mark \markup { \override #'(font-family . sans) { \box { C } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  91
  92         s1*8 \bar "||"   % 40
  93
  94         % A section
  95
  96         \mark \markup { \override #'(font-family . sans) { \box { D } } }
  97
  98         s1*5 |   % 41-45
  99         s1 |   % 46
 100         \once \override Score.RehearsalMark #'self-alignment-X = #right
 101         \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
 102         s1*2 \bar "||"   % 47-48
 103
 104         % Midtro
 105
 106         \mark \markup { \override #'(font-family . sans) { \box { E } } }
 107         s1*8 \bar "||"   % 49-56
 108
 109         % A section
 110
 111         \mark \markup { \override #'(font-family . sans) { \box { F } } }
 112         s1*5 |   % 57-61
 113         s1*3 \bar "||"   % 62-64
 114
 115         \mark \markup { \override #'(font-family . sans) { \box { G } } }
 116         s1*8 \bar "||"   % 65-72
 117
 118         \once \override Score.RehearsalMark #'self-alignment-X = #right
 119         \mark \markup { \italic { D.S. al Coda } }
 120
 121         % Coda
 122
 123 %\stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
 124 \stopStaff s1 \startStaff
 125 \set Score.currentBarNumber = #73
 126
 127         \once \override Score.RehearsalMark #'self-alignment-X = #left
 128         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
 129
 130         s1*2 \bar "||"   % 73-74
 131         s1*7 \bar "|."   % 75-81
 132 }
 133
 134
 135 % Various melody lines
 136
 137 melodyLineA =
 138 {
 139         fs4. e8 fs2 ~ |
 140         fs2 fs4 a |
 141         b4. a8 a2 ~ |
 142         a2 b4 a |
 143         e4. d8 e2 ~ |
 144         e4. e8 fs e d cs |
 145 }
 146
 147 melodyLineB =
 148 {
 149 %       <fs \hn d \hn a>4.
 150         <e \hn cs \hn a>8 <fs \hn d \hn a>2 ~ |
 151         <fs \hn d \hn a>4 <e \hn cs \hn a> <fs \hn d \hn a>8 <a \hn fs \hn d> ~ <a \hn fs \hn d>4 |
 152         <b \hn g \hn d>4. <a \hn g \hn d>8 <a \hn fs \hn d>2 ~ |
 153         <a \hn fs \hn d>2 <b \hn fs \hn d>4 <a \hn fs \hn d> |
 154         <e \hn cs \hn a>4. <d \hn b \hn a>8 <e \hn cs \hn a>2 ~ |
 155 }
 156
 157 melodyLineBRptA =
 158 {
 159         <e \hn cs \hn a>4. <e \hn cs \hn a>8
 160         << { \voiceOne fs8 ( e ) <d \hn a> ( a ) } \context Voice = vb { \voiceTwo <\hn cs \hn a>4 s4 } >> \oneVoice |
 161         b1 ( |
 162         a2 ) r |
 163 }
 164
 165 melodyLineBRptB =
 166 {
 167 %       <e \hn cs \hn a>4. \repeatTie
 168         <e \hn cs \hn a>8
 169         << { \voiceOne fs8 ( e ) <d \hn a> ( <cs \hn a \hn g> ) } \context Voice = vb { \voiceTwo \tiny <cs a>4 s4 } >> \oneVoice |
 170 }
 171
 172 melodyLineC =
 173 {
 174         <fs \hn d \hn a>4. <e \hn cs \hn a>8 <fs \hn d \hn a>2 ~ |
 175         <fs \hn d \hn a>2 <fs \hn d \hn a>4 <a \hn fs \hn d> |
 176         <b \hn g \hn d>4. <a \hn fs \hn d>8 <a \hn fs \hn d>2 ~ |
 177         <a \hn fs \hn d>2 <b \hn fs \hn d>4 <a \hn fs \hn d> |
 178         <e \hn cs \hn a>4. <d \hn cs \hn a>8 <e \hn cs \hn a>2 ~ |
 179 %       <e \hn cs \hn a>4. <e \hn cs \hn a>8
 180 %       << { \voiceOne fs ( e ) <d>    % Partial measure...
 181 }
 182
 183
 184 %
 185 % Lead vocal
 186 %
 187 LeadVox = \relative c'
 188 {
 189         \clef G
 190
 191         % Intro
 192
 193         R1*2 |   % 1-2
 194
 195         s1*8 |   % 3-10
 196
 197         % A section
 198
 199         fs4. ( e8 ) fs2 ~ |   % 11
 200         fs2 fs4 a |   % 12
 201         b4. ( a8 ) a2 ~ |   % 13
 202         a2 b4 a |   % 14
 203         e4. d8 e2 ~ |   % 15
 204
 205         e4. e8 fs e d a |   % 16
 206         b1 ( |   % 17
 207         a2 ) r2 |   % 18
 208
 209         e'4. \repeatTie e8 fs e d cs |   % 19
 210
 211         d1 ~ |   % 20
 212         d2 r |   % 21
 213
 214
 215         <fs \hn d \hn a>4. \melodyLineB   % 22-26
 216
 217         \melodyLineBRptA   % 27-29
 218
 219         <e' \hn cs \hn a>4. \repeatTie \melodyLineBRptB   % 30
 220
 221         <d \hn a \hn fs>1 |   % 31
 222         r2 <fs \hn d>8 ( <a \hn fs \hn d> ) <a \hn fs \hn d>4 |   % 32
 223
 224         % B section
 225
 226         <b \hn g \hn d>4. <a \hn fs \hn d>8 <b \hn g \hn d>2 ~ |   % 33
 227         <b \hn g \hn d>4 <a \hn fs \hn d> <b \hn g \hn e>8 ( a ) <a \hn fs \hn d>4 |   % 34
 228         <a \hn fs \hn d>4. <fs \hn d \hn a>8 <a \hn fs \hn d>2 ~ |   % 35
 229         <a \hn fs \hn d>4 r <fs \hn d>8 ( <a \hn fs \hn d> ) <a \hn fs \hn d>4 |   % 36
 230         <b \hn g \hn d>4. <a \hn fs \hn d>8 <b \hn g \hn d>2 ~ |   % 37
 231         <b \hn g \hn d>4 <cs \hn a \hn g> <d \hn b \hn g>8 ( <cs \hn a \hn d,> ) <b \hn g \hn d> ( <a \hn fs \hn d> ) |   % 38
 232         <a \hn fs \hn d>2. <fs \hn d \hn a>4 |   % 39
 233         <e \hn cs \hn a>1 |   % 40
 234
 235         % A section
 236
 237         \melodyLineC   % 41-45
 238         <e \hn cs \hn a>4. \melodyLineBRptB   % 46
 239         <d \hn a \hn fs>1 ~ |   % 47
 240         <d \hn a \hn fs>2 r |   % 48
 241
 242         % Midtro
 243
 244         s1*8 |   % 49-56
 245
 246         % A section
 247
 248         \melodyLineC   % 57-61
 249         \melodyLineBRptA |   % 62-64
 250
 251         <fs' \hn d \hn a>4. \melodyLineB   % 65-69
 252         <e \hn cs \hn a>4. \melodyLineBRptB   % 70
 253         <d \hn a \hn fs>1 |   % 71
 254         r2 <fs \hn d>8 ( <a \hn fs \hn d> ) <a \hn fs \hn d>4 |   % 72
 255
 256         % Coda
 257
 258         s1 % blank bar for coda
 259
 260         <d, \hn a \hn fs>1 ~ |   % 73
 261         <d \hn a \hn fs>2 r |   % 74
 262         s1*7 |   % 75-81
 263 }
 264
 265
 266 LeadVoxText = \lyricmode
 267 {
 268         Je -- _ sus, _ all for Je -- _ sus, _
 269         all I am and have, _ and e -- ver hope to be, _
 270
 271         _ and e -- ver hope to be. _
 272
 273         All of my _ am -- bi -- tions, _ hopes, and plans, _
 274         I sur -- ren -- der these, _ in -- to _ your _ hands, _
 275
 276         _ in -- to _ your _ hands.
 277
 278         For _ it’s on -- ly in _ your will _ that I am free, _
 279         For _ it’s on -- ly in _ you will _ that _ I am free.
 280
 281         Je -- _ sus, _ all for Je -- _ sus, _
 282         all I am and have, _ and e -- ver hope to be. _
 283
 284         Je -- _ sus, _ all for Je -- _ sus, _
 285         all I am and have, _ and e -- ver hope to be. _
 286
 287         All of my _ am -- bi -- tions, _ hopes, and plans, _
 288         I sur -- ren -- der these, _ in -- to _ your _ hands.
 289
 290         For _ it’s
 291
 292         be. _
 293 }
 294
 295
 296 %
 297 % Riffs
 298 %
 299 Riffs = \relative c'
 300 {
 301         \tiny
 302         s1*2 |   % 1-2
 303         \melodyLineA
 304         d1 ~ |   % 9
 305         d2 r |   % 10
 306
 307         s1*38 |   % 11-48
 308         \melodyLineA
 309         d1 ~ |   % 55
 310         d2 r |   % 56
 311
 312         s1*19 |   % 57-74 (+1 for coda)
 313         \melodyLineA
 314         d1^\fermata |   % 81
 315         \normalsize
 316 }
 317
 318
 319
 320 %
 321 % Chord names
 322 %
 323
 324 Chords = \chordmode
 325 {
 326         % Intro
 327
 328         d4. a8/d d2 |   % 1
 329         s1 |   % 2
 330
 331         d4. a8/d d2 |   % 3
 332         s1 |   % 4
 333         g2/d d |   % 5
 334         s1 |   % 6
 335         a4. a8:sus4 a2  |   % 7
 336         s1 |   % 8
 337         d1 |   % 9
 338         s2 d:sus4 |   % 10
 339
 340         % A section
 341
 342         d4. a8/d d2 |   % 11
 343         s1 |   % 12
 344         g2/d d |   % 13
 345         s1 |   % 14
 346         a4. a8:sus4 a2  |   % 15
 347
 348         s1 |   % 16
 349         b1:m |   % 17
 350         a1 |   % 18
 351
 352         a1 |   % 19
 353
 354         d1 |   % 20
 355         s2 g/a |   % 21
 356
 357         d4. a8/d d2 |   % 22
 358         s1 |   % 23
 359         g2 d |   % 24
 360         s1 |   % 25
 361         a4. a8:sus4 a2 |   % 26
 362
 363         s1 |   % 27
 364         b1:m |   % 28
 365         a1 |   % 29
 366
 367         a1 |   % 30
 368
 369         d1 |   % 31
 370         s1 |   % 32
 371
 372         % B section
 373
 374         g1 |   % 33
 375         s1 |   % 34
 376         d1 |   % 35
 377         s1 |   % 36
 378         g1 |   % 37
 379         s1 |   % 38
 380         d1 |   % 39
 381         a1 |   % 40
 382
 383         d4. a8/d d2 |   % 41
 384         s1 |   % 42
 385         g2 d |   % 43
 386         s1 |   % 44
 387         a4. a8:sus4 a2 |   % 45
 388         s1 |   % 46
 389         d1 |   % 47
 390         s2 g/a |   % 48
 391
 392         d4. a8/d d2 |   % 49
 393         s1 |   % 50
 394         g2/d d |   % 51
 395         s1 |   % 52
 396         a4. a8:sus4 a2 |   % 53
 397         s1 |   % 54
 398         d1 |   % 55
 399         d2 d:sus4 |   % 56
 400
 401         d4. a8/d d2 |   % 57
 402         s1 |   % 58
 403         g2 d |   % 59
 404         s1 |   % 60
 405         a4. a8:sus4 a2 |   % 61
 406         s1 |   % 62
 407         b1:m |   % 63
 408         a1 |   % 64
 409
 410         d4. a8/d d2 |   % 65
 411         s1 |   % 66
 412         g2 d |   % 67
 413         s1 |   % 68
 414         a4. a8:sus4 a2 |   % 69
 415         s1 |   % 70
 416         d1 |   % 71
 417         s1 |   % 72
 418
 419         % Coda
 420
 421         s1 % blank bar for coda
 422
 423         d1 |   % 73
 424         s2 g:sus2/a |   % 74
 425         d4. a8/d d2 |   % 75
 426         s1 |   % 76
 427         g2/d d |   % 77
 428         s1 |   % 78
 429         a4. a8:sus4 a2 |   % 79
 430         s1 |   % 80
 431         d1 |   % 81
 432 }
 433
 434
 435 %
 436 % Chord rhythms
 437 %
 438 StaffC = \relative c
 439 {
 440         \numericTimeSignature
 441         \override NoteHead #'style = #'slash
 442         \teeny
 443
 444         % Intro
 445
 446         c8. c16 ~ c8 c c4 c |   % 1
 447         c4 c c c |   % 2
 448
 449         c8. c16 ~ c8 c c4 c |   % 3
 450         c4 c c c |   % 4
 451         c4 c c c |   % 5
 452         c4 c c c |   % 6
 453         c8. c16 ~ c8 c c4 c |   % 7
 454         c4 c c c |   % 8
 455         c4 c c c |   % 9
 456         c4 c c c |   % 10
 457
 458         % A section
 459
 460         c8. c16 ~ c8 c c4 c |   % 11
 461         c4 c c c |   % 12
 462         c4 c c c |   % 13
 463         c4 c c c |   % 14
 464         c8. c16 ~ c8 c c4 c |   % 15
 465
 466         c4 c c c |   % 16
 467         c4 c c c |   % 17
 468         c4 c c c |   % 18
 469
 470         c4 c c c |   % 19
 471
 472         c4 c c c |   % 20
 473         c4 c c c |   % 21
 474
 475         c8. c16 ~ c8 c c4 c |   % 22
 476         c4 c c c |   % 23
 477         c4 c c c |   % 24
 478         c4 c c c |   % 25
 479         c8. c16 ~ c8 c c4 c |   % 26
 480
 481         c4 c c c |   % 27
 482         c4 c c c |   % 28
 483         c4 c c c |   % 29
 484
 485         c4 c c c |   % 30
 486
 487         c4 c c c |   % 31
 488         c4 c c c |   % 32
 489
 490         % B section
 491
 492         c4 c c c |   % 33
 493         c4 c c c |   % 34
 494         c4 c c c |   % 35
 495         c4 c c c |   % 36
 496         c4 c c c |   % 37
 497         c4 c c c |   % 38
 498         c4 c c c |   % 39
 499         c4 c c c |   % 40
 500
 501         c8. c16 ~ c8 c c4 c |   % 41
 502         c4 c c c |   % 42
 503         c4 c c c |   % 43
 504         c4 c c c |   % 44
 505         c8. c16 ~ c8 c c4 c |   % 45
 506         c4 c c c |   % 46
 507         c4 c c c |   % 47
 508         c4 c c c |   % 48
 509
 510         c8. c16 ~ c8 c c4 c |   % 49
 511         c4 c c c |   % 50
 512         c4 c c c |   % 51
 513         c4 c c c |   % 52
 514         c8. c16 ~ c8 c c4 c |   % 53
 515         c4 c c c |   % 54
 516         c4 c c c |   % 55
 517         c4 c c c |   % 56
 518
 519         c8. c16 ~ c8 c c4 c |   % 57
 520         c4 c c c |   % 58
 521         c4 c c c |   % 59
 522         c4 c c c |   % 60
 523         c8. c16 ~ c8 c c4 c |   % 61
 524         c4 c c c |   % 62
 525         c4 c c c |   % 63
 526         c4 c c c |   % 64
 527
 528         c8. c16 ~ c8 c c4 c |   % 65
 529         c4 c c c |   % 66
 530         c4 c c c |   % 67
 531         c4 c c c |   % 68
 532         c8. c16 ~ c8 c c4 c |   % 69
 533         c4 c c c |   % 70
 534         c4 c c c |   % 71
 535         c4 c c c |   % 72
 536
 537         % Coda
 538
 539 \stopStaff s1 \startStaff |
 540
 541         c4 c c c |   % 73
 542         c4 c c c |   % 74
 543
 544         c8. c16 ~ c8 c c4 c |   % 75
 545         c4 c c c |   % 76
 546         c4 c c c |   % 77
 547         c4 c c c |   % 78
 548         c8. c16 ~ c8 c c4 c |   % 79
 549         c4 c c c |   % 80
 550         c1^\fermata |   % 81
 551 }
 552
 553
 554 Dynamics =
 555 {
 556         s1*80 |   % 1-79 (+1 for coda)
 557         s2 s4_\markup { \italic { rit. } } s |   % 80
 558         s1 |   % 81
 559 }
 560
 561
 562 \score
 563 {
 564         <<
 565                 \Global         % The "roadmap" that everything else depends on
 566
 567                 \context Staff
 568                 <<
 569                         \new Voice = "lead" \LeadVox
 570                         \new Voice = "riffs" \Riffs
 571                         \new Lyrics \lyricsto "lead" \LeadVoxText
 572                 >>
 573
 574                 \new ChoirStaff
 575                 <<
 576                         \new ChordNames \Chords
 577                         \new RhythmicStaff << \StaffC \Dynamics >>
 578                 >>
 579
 580                 \set Score.skipBars = ##t
 581                 \set Score.melismaBusyProperties = #'()
 582         >>
 583 }
 584
 585
 586 \paper
 587 {
 588         #(define fonts (make-pango-font-tree
 589                 "Times New Roman"
 590                 "LilyJAZZText"
 591                 "Luxi Mono"
 592                 (/ staffSize 20)))
 593
 594 % Don't spread staves vertically across last page (default: t)
 595 %       ragged-last-bottom = ##f
 596 % Don't spread staves vertically across the page (default: f)
 597 %       ragged-bottom = ##t
 598 % Allow partial line for last stave (default: f)
 599         ragged-last = ##t
 600
 601 % To find out what's eating the space at the top...
 602 %       annotate-spacing = ##t
 603 }
 604