Shamusworld >> Repos - music/blob - jesus-is-just-alright.ly

   1 \version "2.16.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 \header
  12 {
  13 %Let's bump up the title size and switch to the chord font. :-)
  14
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Jesus Is Just Alright" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Arthur Reynolds" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. The Doobie Brothers" }
  18         tagline  = "Engraved by JLH and Lilypond 2.8.8"
  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 % Lead vocal
  32 %
  33
  34 LeadVox = \relative c''
  35 {
  36 %       \set Voice.autoBeaming = ##f
  37 %       \set Staff.instrumentName = #"Lead vox"
  38         \clef G
  39         \key e \minor
  40         \override Staff.TimeSignature #'style = #'()
  41         \time 4/4
  42 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  43 \override MultiMeasureRest #'expand-limit = 1
  44
  45         % Intro
  46
  47 \once \override Score.RehearsalMark #'self-alignment-X = #left
  48 \mark \markup { \hspace #0.0 \raise #1.8 \small "Bright rock" }
  49
  50         R1*4 |   % 1-4
  51
  52         \repeat volta 2
  53         {
  54                 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 5
  55                 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 6
  56         }
  57         \alternative
  58         {
  59                 {
  60                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 7
  61                         <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r |   % 8
  62                 }
  63                 {
  64                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <d \hn b \hn gs>8 ~ |   % 9
  65                 }
  66         }
  67
  68         <d \hn b \hn gs>2 r |   % 10
  69         R1 |   % 11
  70
  71         s1 |   % 12
  72         s1 |   % 13
  73         s1 |   % 14
  74         s1 \bar "||:"   % 15
  75
  76         \repeat volta 2
  77         {
  78 \once \override Score.RehearsalMark #'self-alignment-X = #left
  79 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  80
  81                 % Verse
  82
  83                 <a' \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 16
  84                 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 17
  85                 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 18
  86                 <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r |   % 19
  87                 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 20
  88                 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 21
  89                 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <d \hn b \hn gs>8 ~ |   % 22
  90                 <d \hn b \hn gs>4 r r2 |   % 23
  91                 R1 \bar "||"   % 24
  92
  93 \once \override Score.RehearsalMark #'self-alignment-X = #left
  94 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  95
  96                 <a' \hn e \hn c>8 <g \hn d \hn b>4 <e \hn c \hn a>8 ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 25
  97                 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 26
  98                 <a \hn e \hn c>8 <g \hn d \hn b>4 <e \hn c \hn a>8 ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 27
  99                 <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r |   % 28
 100                 <a \hn e \hn c>8 <g \hn d \hn b>4 <e \hn c \hn a>8 ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 29
 101                 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 30
 102                 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 |   % 31
 103 \once \override Score.RehearsalMark #'self-alignment-X = #right
 104 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
 105         }
 106         \alternative
 107         {
 108                 {
 109                         r4 <g \hn e \hn c>8 <g \hn e \hn c> ~ <g \hn e \hn c>2 |   % 32
 110                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a> ( <d \hn b \hn gs> ) <d \hn b \hn gs> |   % 33
 111                         R1 |   % 34
 112                         r8 e4 ( g8 a2 ) \bar "||"   % 35
 113
 114                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 36
 115                         <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 37
 116                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 38
 117                         <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r |   % 39
 118                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ |   % 40
 119                         <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r |   % 41
 120                         <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <d \hn b \hn gs>8 ~ |   % 42
 121                         <d \hn b \hn gs>2 r4 r8 d |   % 43
 122                         g8 a a e g4 ef16 ( d c8 ) |   % 44
 123                 }
 124                 {
 125                         r4 <g' \hn e \hn c>8 <g \hn e \hn c> ~ <g \hn e \hn c>2-\fermata |   % 45
 126                 }
 127         }
 128
 129         % Bridge
 130
 131         \time 3/4
 132
 133 \once \override Score.RehearsalMark #'self-alignment-X = #left
 134 \mark \markup { \override #'(font-family . sans) { \box { C } } \small "Moderate jazz waltz" }
 135
 136         \repeat volta 2
 137         {
 138                 R2. |   % 46
 139                 R2. |   % 47
 140                 R2. |   % 48
 141                 R2. |   % 49
 142         }
 143
 144         e8 e ~ e2 ~ |   % 50
 145         e2. |   % 51
 146         R2. |   % 52
 147         r4 d8 d ~ d4 |   % 53
 148         c8 ( a ) ~ a2 |   % 54
 149         R2. |   % 55
 150         R2. |   % 56
 151         R2. |   % 57
 152
 153         a'8 a ~ a2 ~ |   % 58
 154         a2. |   % 59
 155         R2. |   % 60
 156         r8 a, e' e ~ e4 ~ |   % 61
 157         e8 c ( a2 ) ~ |   % 62
 158         a2. |   % 63
 159         R2. |   % 64
 160         R2. |   % 65
 161
 162         r2 r8 a |   % 66
 163         e'8 d c4 a8 d ~ |   % 67
 164         d2. |   % 68
 165         R2. |   % 69
 166         r4 e8 e g4 ~ |   % 70
 167         g2. ~ |   % 71
 168         g8 a4 g8 ~ g ef ( ~ |   % 72
 169         ef8 d c2 ) |   % 73
 170
 171         e8 e ~ e2 ~ |   % 74
 172         e2. |   % 75
 173         R2. |   % 76
 174         r4 d8 c ( d4 ) ~ |   % 77
 175         d4 c8 ( a ) ~ a4 ~ |   % 78
 176         a2. |   % 79
 177
 178         \repeat volta 2
 179         {
 180                 R2. |   % 80
 181         }
 182
 183 \once \override Score.RehearsalMark #'self-alignment-X = #left
 184 \mark \markup { \small "Guitar solo" \bold "(rpt. 6x)" }
 185
 186         \repeat volta 6
 187         {
 188                 R2.*4 |   % 81
 189 %               R2. |   % 82
 190 %               R2. |   % 83
 191 %               R2. |   % 84
 192         }
 193
 194         R2. |   % 85
 195         R2. |   % 86
 196
 197 %Ugh, only valid in size 18
 198 \break
 199
 200         \time 4/4
 201
 202         % Intro
 203
 204 \once \override Score.RehearsalMark #'self-alignment-X = #left
 205 \mark \markup { \override #'(font-family . sans) { \box { D } } \small "Bright rock - Guitar solo" \bold "(rpt. 7x)" }
 206 %\once \override Score.RehearsalMark #'self-alignment-X = #left
 207 %\mark \markup { \override \once #'(font-family . sans) { \box { B } } }
 208
 209         \repeat volta 7
 210         {
 211                 s1 |   % 87
 212                 s1 |   % 88
 213         }
 214
 215         s1 |   % 89
 216         s1 \bar "||"   % 90
 217
 218 \once \override Score.RehearsalMark #'self-alignment-X = #right
 219 \mark \markup { \italic { D.S. al Coda } }
 220
 221         % Coda
 222
 223 \stopStaff s1 \startStaff |
 224 \set Score.currentBarNumber = #91
 225
 226 \once \override Score.RehearsalMark #'self-alignment-X = #left
 227 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
 228
 229         r4 g'8 g ~ g2-\fermata \bar "|."   % 91
 230 }
 231
 232 LeadVoxText = \lyricmode
 233 {
 234         Do, do, do, do, _ do, do, _ do, do. _
 235         Do, do, do, do, _ do, do, _ do, do. _
 236
 237         Do, do, do, do, _ do, do. _
 238
 239         Je -- sus is just _ al -- right _ with me. _
 240         Je -- sus is just _ al -- right, _ oh yeah. _
 241         Je -- sus is just _ al -- right _ with me. _
 242         Je -- sus is just _ al -- right. _
 243
 244         I don’t care _ what they _ may say. _
 245         I don’t care _ what they _ may do. _
 246         I don’t care _ what they _ may say. _
 247         Je -- sus is just _ al -- right, oh yeah! _
 248         Je -- sus is just _ al -- _ right.
 249         Oh! __ _ _
 250
 251         Do, do, do, do, _ do, do, _ do, do. _
 252         Do, do, do, do, _ do, do, _ do, do. _
 253
 254         Do, do, do, do, _ do, do, _ do, do. _
 255         Do, do, do, do, _ do, do. _
 256
 257         A ho -- pin’ and a pray -- in’, __ _ _
 258
 259         oh yeah! _
 260
 261         Je -- sus, __ _ _ he’s my _ fri -- end. _
 262         Je -- sus, __ _ _ well, he’s my __ _ _ fri -- end. _
 263         He took me by the hand, _ led me far __ _ _ from this _ land, __ _ _ _
 264         Je -- sus, __ _ _ he’s my __ _ _ fri -- end. __ _ _
 265
 266         oh yeah! _
 267 }
 268
 269 LeadVoxTextB = \lyricmode
 270 {
 271         _ _ _ _ _ _ _ _ _ _ _
 272         _ _ _ _ _ _ _ _ _ _ _
 273
 274         _ _ _ _ _ _ _ _
 275
 276         _ _ _ _ _ _ _ _ _ _ _
 277         _ _ _ _ _ _ _ _ _ _ _
 278         _ _ _ _ _ _ _ _ _ _ _
 279         _ _ _ _ _ _ _ _
 280
 281         I don’t care _ what they _ may know. _
 282         I don’t care _ where they _ may go. _
 283         I don’t care _ what they _ may know. _
 284 }
 285
 286
 287 Riffs = \relative c'
 288 {
 289         \clef G
 290         \key e \minor
 291         \override Staff.TimeSignature #'style = #'()
 292         \time 4/4
 293 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 294
 295         \tiny
 296         s1*11 |   % 1-11
 297
 298         d8 ds e c' ~ c2 |   % 12
 299         d,8 ds e c ~ c2 |   % 13
 300         d8 ds e c' ~ c2 |   % 14
 301         d,8 ds e g fs d e e, |   % 15
 302
 303         s1*30 |   % 16-
 304         s2.*41 |   % -86
 305
 306         d'8 ds e c' ~ c2 |   % 87
 307         d,8 ds e c ~ c2 |   % 88
 308         d8 ds e c' ~ c2 |   % 89
 309         d,8 ds e g fs d e e, |   % 90
 310         \normalsize
 311 }
 312
 313
 314 %
 315 % Chord names
 316 %
 317
 318 Chords = \chordmode
 319 {
 320 %Bah, can't we set this globally?
 321 %       \popChords
 322
 323         % Intro
 324
 325         s1*4 |   % 1-4
 326
 327         \repeat volta 2
 328         {
 329                 s1 |   % 5
 330                 s1 |   % 6
 331         }
 332         \alternative
 333         {
 334                 {
 335                         s1 |   % 7
 336                         s1 |   % 8
 337                 }
 338                 {
 339                         s1 |   % 9
 340                 }
 341         }
 342
 343         e1:7.9+ |   % 10
 344         f2:9 e:7.9+ |   % 11
 345         s1 |   % 12
 346         s1 |   % 13
 347         s1 |   % 14
 348         s1 |   % 15
 349
 350         \repeat volta 2
 351         {
 352                 % Verse
 353
 354                 a4.:m a8:5^3 s2 |   % 16
 355                 s2. d4/a |   % 17
 356                 a4.:m a8:5^3 s2 |   % 18
 357                 s4. e8:7.9+ s2 |   % 19
 358                 a4.:m a8:5^3 s2 |   % 20
 359                 s2. d4/a |   % 21
 360                 a4.:m a8:5^3 s2 |   % 22
 361                 e1:7.9+ |   % 23
 362                 f2:9 e:7.9+ |   % 24
 363
 364                 a4.:m a8:5^3 s2 |   % 25
 365                 s2. d4/a |   % 26
 366                 a4.:m a8:5^3 s2 |   % 27
 367                 s4. e8:7.9+ s2 |   % 28
 368                 a4.:m a8:5^3 s2 |   % 29
 369                 s2. d4/a |   % 30
 370                 a4.:m a8:5^3 s2 |   % 31
 371         }
 372         \alternative
 373         {
 374                 {
 375                         a4:m c2. |   % 32
 376                         a4.:m a8:5^3 s2 |   % 33
 377                         e1:7.9+ |   % 34
 378                         f2:9 e:7.9+ |   % 35
 379
 380                         a1:m |   % 36
 381                         s2. b4:m7 |   % 37
 382                         a1:m7 |   % 38
 383                         s2. e4:7.9+ |   % 39
 384                         a1:m7 |   % 40
 385                         s2. b4:m7 |   % 41
 386                         a1:m7 |   % 42
 387                         e1:7.9+ |   % 43
 388                         f2:9 e:7.9+ |   % 44
 389                 }
 390                 {
 391                         a4:m c2. |   % 45
 392                 }
 393         }
 394
 395         % Bridge
 396
 397         \time 3/4
 398
 399         \repeat volta 2
 400         {
 401                 a2.:m7 |   % 46
 402                 s2. |   % 47
 403                 d2. |   % 48
 404                 s2. |   % 49
 405         }
 406
 407         a2.:m7 |   % 50
 408         s2. |   % 51
 409         d2. |   % 52
 410         s2. |   % 53
 411         a2.:m7 |   % 54
 412         s2. |   % 55
 413         d2. |   % 56
 414         s2. |   % 57
 415
 416         a2.:m7 |   % 58
 417         s2. |   % 59
 418         d2. |   % 60
 419         s2. |   % 61
 420         a2.:m7 |   % 62
 421         s2. |   % 63
 422         d2. |   % 64
 423         s2. |   % 65
 424
 425         a2.:m7 |   % 66
 426         s2. |   % 67
 427         d2. |   % 68
 428         s2. |   % 69
 429         a2.:m7 |   % 70
 430         s2. |   % 71
 431         d2. |   % 72
 432         s2. |   % 73
 433
 434         a2.:m7 |   % 74
 435         s2. |   % 75
 436         d2. |   % 76
 437         s2. |   % 77
 438         a2.:m7 |   % 78
 439         s2. |   % 79
 440
 441         \repeat volta 2
 442         {
 443                 d2. |   % 80
 444         }
 445
 446         \repeat volta 6
 447         {
 448                 a2.:m7 |   % 81
 449                 s2. |   % 82
 450                 d2. |   % 83
 451                 s2. |   % 84
 452         }
 453
 454         a2.:m7 |   % 85
 455         s2. |   % 86
 456
 457         \time 4/4
 458
 459         % Intro
 460
 461         \repeat volta 7
 462         {
 463                 s1 |   % 87
 464                 s1 |   % 88
 465         }
 466
 467         s1 |   % 89
 468         s1 |   % 90
 469
 470         % Coda
 471
 472 s1
 473
 474         a4:m c2. |   % 91
 475 }
 476
 477
 478 %
 479 % Chord rhythms
 480 %
 481
 482 % Use a RhythmicStaff on the chords instead of this?
 483 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 484
 485 StaffC = \relative c
 486 {
 487 %       \set Voice.autoBeaming = ##f
 488 %       \set Staff.instrumentName = #"Rhythm"
 489         \override Staff.TimeSignature #'style = #'()
 490         \time 4/4
 491         \override NoteHead #'style = #'slash
 492 \override MultiMeasureRest #'expand-limit = 1
 493
 494         % Intro
 495
 496         R1*4 |   % 1-4
 497
 498         \repeat volta 2
 499         {
 500                 r1 |   % 5
 501                 r1 |   % 6
 502         }
 503         \alternative
 504         {
 505                 {
 506                         r1 |   % 7
 507                         r1 |   % 8
 508                 }
 509                 {
 510                         r1 |   % 9
 511                 }
 512         }
 513
 514         c4 c r2 |   % 10
 515         c4 c c c |   % 11
 516         r1 |   % 12
 517         r1 |   % 13
 518         r1 |   % 14
 519         r1 \bar "||:"   % 15
 520
 521         \repeat volta 2
 522         {
 523                 % Verse
 524
 525                 c4 r8 c r c r c |   % 16
 526                 r8 c r c r c c r |   % 17
 527                 c4 r8 c r c r c |   % 18
 528                 r8 c r c ~ c4 c8 r |   % 19
 529                 c4 r8 c r c r c |   % 20
 530                 r8 c r c r c c r |   % 21
 531                 c4 r8 c r c r c |   % 22
 532                 c4 c r2 |   % 23
 533                 c4 c c c \bar "||"   % 24
 534
 535                 c4 r8 c r c r c |   % 25
 536                 r8 c r c r c c r |   % 26
 537                 c4 r8 c r c r c |   % 27
 538                 r8 c r c ~ c4 c8 r |   % 28
 539                 c4 r8 c r c r c |   % 29
 540                 r8 c r c r c c r |   % 30
 541                 c4 r8 c r c r c |   % 31
 542         }
 543         \alternative
 544         {
 545                 {
 546                         c8 r c c ~ c2 |   % 32
 547                         c4 r8 c r c r c |   % 33
 548                         c4 c r2 |   % 34
 549                         c4 c c c \bar "||"   % 35
 550
 551                         c8 r r4 r2 |   % 36
 552                         r2 r4 c |   % 37
 553                         c4 r r2 |   % 38
 554                         r2 r4 c |   % 39
 555                         c8 r r4 r2 |   % 40
 556                         r2 r4 c |   % 41
 557                         c4 r r2 |   % 42
 558                         c4 c r2 |   % 43
 559                         c4 c c c |   % 44
 560                 }
 561                 {
 562                         c8 r c c ~ c2-\fermata |   % 45
 563                 }
 564         }
 565
 566         % Bridge
 567
 568         \time 3/4
 569
 570         \repeat volta 2
 571         {
 572                 c4 c c |   % 46
 573                 c4 c c |   % 47
 574                 c4 c c |   % 48
 575                 c4 c c |   % 49
 576         }
 577
 578         c4 c c |   % 50
 579         c4 c c |   % 51
 580         c4 c c |   % 52
 581         c4 c c |   % 53
 582         c4 c c |   % 54
 583         c4 c c |   % 55
 584         c4 c c |   % 56
 585         c4 c c |   % 57
 586
 587         c4 c c |   % 58
 588         c4 c c |   % 59
 589         c4 c c |   % 60
 590         c4 c c |   % 61
 591         c4 c c |   % 62
 592         c4 c c |   % 63
 593         c4 c c |   % 64
 594         c4 c c |   % 65
 595
 596         c4 c c |   % 66
 597         c4 c c |   % 67
 598         c4 c c |   % 68
 599         c4 c c |   % 69
 600         c4 c c |   % 70
 601         c4 c c |   % 71
 602         c4 c c |   % 72
 603         c4 c c |   % 73
 604
 605         c4 c c |   % 74
 606         c4 c c |   % 75
 607         c4 c c |   % 76
 608         c4 c c |   % 77
 609         c4 c c |   % 78
 610         c4 c c |   % 79
 611
 612         \repeat volta 2
 613         {
 614                 c8 c r2 |   % 80
 615         }
 616
 617         \repeat volta 6
 618         {
 619                 c4 c c |   % 81
 620                 c4 c c |   % 82
 621                 c4 c c |   % 83
 622                 c4 c c |   % 84
 623         }
 624
 625         c2. ~ |   % 85
 626         c2.-\fermata |   % 86
 627
 628         \time 4/4
 629
 630         % Intro
 631
 632         \repeat volta 7
 633         {
 634                 r1 |   % 87
 635                 r1 |   % 88
 636         }
 637
 638         r1 |   % 89
 639         r1 |   % 90
 640
 641         % Coda
 642
 643 \stopStaff s1 \startStaff |
 644 \set Score.currentBarNumber = #91
 645
 646         c8 r c c ~ c2-\fermata \bar "|."   % 91
 647 }
 648
 649
 650 Dynamics =
 651 {
 652         s1*4_\markup { \hspace #0.0 \raise #-1.0 \italic { percussion } } |   % 1-4
 653         s1*5 |   % 5-9
 654         s4_\f s2. |   % 10
 655         s1 |   % 11
 656         s4_\markup { \hspace #0.0 \raise #-1.5 \italic { Bass doubles gtr. riff } } s2. |   % 12
 657 }
 658
 659
 660 \score
 661 {
 662         <<
 663                 <<
 664 %                       \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
 665                         \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
 666                         \new Lyrics \lyricsto "lead" \LeadVoxText
 667                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 668                 >>
 669
 670                 \new ChoirStaff = "Rhythm"
 671                 <<
 672                         \new ChordNames = "chords" \Chords
 673                         \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
 674                 >>
 675
 676                 \set Score.skipBars = ##t
 677                 \set Score.melismaBusyProperties = #'()
 678         >>
 679
 680         \layout
 681         {
 682 %               \context { \Staff \RemoveEmptyStaves }
 683 %               ragged-last-bottom = ##t
 684                 ragged-last = ##t
 685         }
 686 }
 687
 688
 689 \paper
 690 {
 691   #(define fonts (make-pango-font-tree
 692     "Times New Roman"
 693     "DomCasual BT"
 694     "Luxi Mono"
 695     (/ staffSize 20)))
 696
 697 %  top-margin = -0.25 \in
 698 }