Shamusworld >> Repos - music/blob - more-love-more-power.ly

   1 \version "2.16.0"
   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 \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 "More Love, More Power" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Del Hierro" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  18         tagline  = "Engraved by JLH and Lilypond 2.8.6"
  19 }
  20
  21
  22 %
  23 % Lead vocal
  24 %
  25
  26 LeadVox = \relative c'
  27 {
  28 %       \set Voice.autoBeaming = ##f
  29 %       \set Staff.instrumentName = #"Lead vox"
  30         \clef G
  31         \key e \minor
  32         \override Staff.TimeSignature #'style = #'()
  33         \time 4/4
  34 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  35
  36         % Intro
  37
  38         \repeat volta 2
  39         {
  40                 c4 c c c |   % 1
  41                 c4 c c c |   % 2
  42                 c4 c c c |   % 3
  43                 c4 c c c |   % 4
  44         }
  45
  46         \repeat volta 2
  47         {
  48                 % Verse
  49
  50                 c4 c c c |   % 5
  51                 c4 c c c |   % 6
  52                 c4 c c c |   % 7
  53                 c4 c c c |   % 8
  54                 c4 c c c |   % 9
  55                 c4 c c c |   % 10
  56                 c4 c c c |   % 11
  57                 c4 c c c \bar "||"   % 12
  58
  59                 c4 c c c |   % 13
  60                 c4 c c c |   % 14
  61                 c4 c c c |   % 15
  62                 c4 c c c |   % 16
  63                 c4 c c c |   % 17
  64                 c4 c c c |   % 18
  65                 c4 c c c |   % 19
  66                 c4 c c c \bar "||"   % 20
  67
  68                 % Chorus
  69
  70                 c4 c c c |   % 21
  71                 c4 c c c |   % 22
  72                 c4 c c c |   % 23
  73                 c4 c c c |   % 24
  74                 c4 c c c |   % 25
  75                 c4 c c c |   % 26
  76                 c4 c c c |   % 27
  77                 c4 c c c |   % 28
  78                 c4 c c c |   % 29
  79                 c4 c c c |   % 30
  80                 c4 c c c |   % 31
  81                 c4 c c c |   % 32
  82                 c4 c c c |   % 33
  83                 c4 c c c |   % 34
  84                 c4 c c c |   % 35
  85         }
  86         \alternative
  87         {
  88                 {
  89                         c4 c c c |   % 36
  90                         c4 c c c |   % 37
  91                         c4 c c c |   % 38
  92                         c4 c c c |   % 39
  93                         c4 c c c |   % 40
  94                         c4 c c c |   % 41
  95                         c4 c c c |   % 42
  96                         c4 c c c |   % 43
  97                         c4 c c c |   % 44
  98                 }
  99                 {
 100                         c4 c c c |   % 45
 101                 }
 102         }
 103
 104         \repeat volta 4
 105         {
 106                 c4 c c c |   % 46
 107                 c4 c c c |   % 47
 108         }
 109         \alternative
 110         {
 111                 {
 112                         c4 c c c |   % 48
 113                         c4 c c c |   % 49
 114                 }
 115                 {
 116                         c4 c c c |   % 50
 117                         c4 c c c |   % 51
 118                 }
 119         }
 120
 121         \repeat volta 2
 122         {
 123                 c4 c c c |   % 52
 124                 c4 c c c |   % 53
 125                 c4 c c c |   % 54
 126                 c4 c c c |   % 55
 127                 c4 c c c |   % 56
 128                 c4 c c c |   % 57
 129                 c4 c c c |   % 58
 130                 c4 c c c |   % 59
 131                 c4 c c c |   % 60
 132                 c4 c c c |   % 61
 133                 c4 c c c |   % 62
 134                 c4 c c c |   % 63
 135                 c4 c c c |   % 64
 136                 c4 c c c |   % 65
 137         }
 138         \alternative
 139         {
 140                 {
 141                         c4 c c c |   % 66
 142                         c4 c c c |   % 67
 143                 }
 144                 {
 145                         c4 c c c |   % 68
 146                 }
 147         }
 148
 149         c4 c c c |   % 69
 150
 151         \repeat volta 2
 152         {
 153                 c4 c c c |   % 70
 154                 c4 c c c |   % 71
 155                 c4 c c c |   % 72
 156                 c4 c c c |   % 73
 157         }
 158
 159         c1^\fermata \bar "|."   % 74
 160
 161
 162
 163 %{
 164         % Intro
 165
 166         R1^\markup { 8th note ballad, s. stick & colors } |   % 1
 167         R1 |   % 2
 168         R1 |   % 3
 169         r2 r4. d8 \bar "||"   % 4
 170
 171         % Verse
 172
 173 \once \override Score.RehearsalMark #'self-alignment-X = #left
 174 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
 175
 176         g8 g g g fs4 d8 ( fs |   % 5
 177         e4 ) e16 ( d e8 ) d4 r |   % 6
 178         r8 g16 g  g a g8  fs fs  g16 a8 ( g16 ) |   % 7
 179         g2 r4. d8 |   % 8
 180         g8 g g g fs4 d8 ( fs |   % 9
 181         e4 ) e16 ( d e8 ) d4 r |   % 10
 182         r8 g16 g  g a g8  fs fs  g16 a8 ( g16 ) |   % 11
 183         g2 r \bar "||:"   % 12
 184
 185         % Chorus
 186
 187         \repeat volta 3
 188         {
 189 \mark \markup { \override #'(font-family . sans) { \box { B } } }
 190
 191                 c8.^\markup { \italic { 2nd time snare } } c16 c8 b a4 g8 a |   % 13
 192                 b8 b4 a16 ( g ) g4 r8 g |   % 14
 193                 c4 c8 b a a a16 g a8 |   % 15
 194                 b2 r4. g8 |   % 16
 195                 c4. b16 ( a ) a4. r16 g |   % 17
 196                 b8. c16 b8 a g e ~ e4 |   % 18
 197                 r8 g16 g  g a g8  fs fs  g16 a8 ( g16 ) |   % 19
 198         }
 199         \alternative
 200         {
 201                 {
 202                         g2 r |   % 20
 203                         r2 r4.^\markup { \hspace #0.0 \raise #0.65 \bold D.S. } d8 \bar "||"   % 21
 204                 }
 205                 {
 206                         g2 r |   % 22
 207                 }
 208                 {
 209                         g2 r |   % 23
 210                 }
 211         }
 212
 213         % Ending
 214
 215         r8 g16 g  g a g8  fs fs  fs16 a ( g8 ) |   % 24
 216         g2 r |   % 25
 217         r8 g16 g  g a g8  fs fs  fs16 a ( g8 ) |   % 26
 218         g1^\fermata \bar "|."   % 27
 219 %}
 220 }
 221
 222 LeadVoxText = \lyricmode
 223 {
 224         More love, more po- wer
 225         more of you in my life
 226         More love, more po- wer
 227         more of you in my life
 228
 229         And I will wor- ship you with all of my heart
 230 }
 231
 232
 233 %
 234 % Chord names
 235 %
 236
 237 Chords = \chordmode
 238 {
 239 %Bah, can't we set this globally?
 240 %       \popChords
 241
 242         % Intro
 243
 244         \repeat volta 2
 245         {
 246                 c4 c c c |   % 1
 247                 c4 c c c |   % 2
 248                 c4 c c c |   % 3
 249                 c4 c c c |   % 4
 250         }
 251
 252         \repeat volta 2
 253         {
 254                 % Verse
 255
 256                 c4 c c c |   % 5
 257                 c4 c c c |   % 6
 258                 c4 c c c |   % 7
 259                 c4 c c c |   % 8
 260                 c4 c c c |   % 9
 261                 c4 c c c |   % 10
 262                 c4 c c c |   % 11
 263                 c4 c c c |   % 12
 264
 265                 c4 c c c |   % 13
 266                 c4 c c c |   % 14
 267                 c4 c c c |   % 15
 268                 c4 c c c |   % 16
 269                 c4 c c c |   % 17
 270                 c4 c c c |   % 18
 271                 c4 c c c |   % 19
 272                 c4 c c c |   % 20
 273
 274                 % Chorus
 275
 276                 c4 c c c |   % 21
 277                 c4 c c c |   % 22
 278                 c4 c c c |   % 23
 279                 c4 c c c |   % 24
 280                 c4 c c c |   % 25
 281                 c4 c c c |   % 26
 282                 c4 c c c |   % 27
 283                 c4 c c c |   % 28
 284                 c4 c c c |   % 29
 285                 c4 c c c |   % 30
 286                 c4 c c c |   % 31
 287                 c4 c c c |   % 32
 288                 c4 c c c |   % 33
 289                 c4 c c c |   % 34
 290                 c4 c c c |   % 35
 291         }
 292         \alternative
 293         {
 294                 {
 295                         c4 c c c |   % 36
 296                         c4 c c c |   % 37
 297                         c4 c c c |   % 38
 298                         c4 c c c |   % 39
 299                         c4 c c c |   % 40
 300                         c4 c c c |   % 41
 301                         c4 c c c |   % 42
 302                         c4 c c c |   % 43
 303                         c4 c c c |   % 44
 304                 }
 305                 {
 306                         c4 c c c |   % 45
 307                 }
 308         }
 309
 310         \repeat volta 4
 311         {
 312                 c4 c c c |   % 46
 313                 c4 c c c |   % 47
 314         }
 315         \alternative
 316         {
 317                 {
 318                         c4 c c c |   % 48
 319                         c4 c c c |   % 49
 320                 }
 321                 {
 322                         c4 c c c |   % 50
 323                         c4 c c c |   % 51
 324                 }
 325         }
 326
 327         \repeat volta 2
 328         {
 329                 c4 c c c |   % 52
 330                 c4 c c c |   % 53
 331                 c4 c c c |   % 54
 332                 c4 c c c |   % 55
 333                 c4 c c c |   % 56
 334                 c4 c c c |   % 57
 335                 c4 c c c |   % 58
 336                 c4 c c c |   % 59
 337                 c4 c c c |   % 60
 338                 c4 c c c |   % 61
 339                 c4 c c c |   % 62
 340                 c4 c c c |   % 63
 341                 c4 c c c |   % 64
 342                 c4 c c c |   % 65
 343         }
 344         \alternative
 345         {
 346                 {
 347                         c4 c c c |   % 66
 348                         c4 c c c |   % 67
 349                 }
 350                 {
 351                         c4 c c c |   % 68
 352                 }
 353         }
 354
 355         c4 c c c |   % 69
 356
 357         \repeat volta 2
 358         {
 359                 c4 c c c |   % 70
 360                 c4 c c c |   % 71
 361                 c4 c c c |   % 72
 362                 c4 c c c |   % 73
 363         }
 364
 365         c1 |   % 74
 366 }
 367
 368
 369 %
 370 % Chord rhythms
 371 %
 372
 373 % Use a RhythmicStaff on the chords instead of this?
 374 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 375
 376 StaffC = \relative c
 377 {
 378 %       \set Voice.autoBeaming = ##f
 379 %       \set Staff.instrumentName = #"Rhythm"
 380         \override Staff.TimeSignature #'style = #'()
 381         \time 4/4
 382         \override NoteHead #'style = #'slash
 383
 384         % Intro
 385
 386         \repeat volta 2
 387         {
 388                 c4 c c c |   % 1
 389                 c4 c c c |   % 2
 390                 c4 c c c |   % 3
 391                 c4 c c c |   % 4
 392         }
 393
 394         \repeat volta 2
 395         {
 396                 % Verse
 397
 398                 c4 c c c |   % 5
 399                 c4 c c c |   % 6
 400                 c4 c c c |   % 7
 401                 c4 c c c |   % 8
 402                 c4 c c c |   % 9
 403                 c4 c c c |   % 10
 404                 c4 c c c |   % 11
 405                 c4 c c c \bar "||"   % 12
 406
 407                 c4 c c c |   % 13
 408                 c4 c c c |   % 14
 409                 c4 c c c |   % 15
 410                 c4 c c c |   % 16
 411                 c4 c c c |   % 17
 412                 c4 c c c |   % 18
 413                 c4 c c c |   % 19
 414                 c4 c c c \bar "||"   % 20
 415
 416                 % Chorus
 417
 418                 c4 c c c |   % 21
 419                 c4 c c c |   % 22
 420                 c4 c c c |   % 23
 421                 c4 c c c |   % 24
 422                 c4 c c c |   % 25
 423                 c4 c c c |   % 26
 424                 c4 c c c |   % 27
 425                 c4 c c c |   % 28
 426                 c4 c c c |   % 29
 427                 c4 c c c |   % 30
 428                 c4 c c c |   % 31
 429                 c4 c c c |   % 32
 430                 c4 c c c |   % 33
 431                 c4 c c c |   % 34
 432                 c4 c c c |   % 35
 433         }
 434         \alternative
 435         {
 436                 {
 437                         c4 c c c |   % 36
 438                         c4 c c c |   % 37
 439                         c4 c c c |   % 38
 440                         c4 c c c |   % 39
 441                         c4 c c c |   % 40
 442                         c4 c c c |   % 41
 443                         c4 c c c |   % 42
 444                         c4 c c c |   % 43
 445                         c4 c c c |   % 44
 446                 }
 447                 {
 448                         c4 c c c |   % 45
 449                 }
 450         }
 451
 452         \repeat volta 4
 453         {
 454                 c4 c c c |   % 46
 455                 c4 c c c |   % 47
 456         }
 457         \alternative
 458         {
 459                 {
 460                         c4 c c c |   % 48
 461                         c4 c c c |   % 49
 462                 }
 463                 {
 464                         c4 c c c |   % 50
 465                         c4 c c c |   % 51
 466                 }
 467         }
 468
 469         \repeat volta 2
 470         {
 471                 c4 c c c |   % 52
 472                 c4 c c c |   % 53
 473                 c4 c c c |   % 54
 474                 c4 c c c |   % 55
 475                 c4 c c c |   % 56
 476                 c4 c c c |   % 57
 477                 c4 c c c |   % 58
 478                 c4 c c c |   % 59
 479                 c4 c c c |   % 60
 480                 c4 c c c |   % 61
 481                 c4 c c c |   % 62
 482                 c4 c c c |   % 63
 483                 c4 c c c |   % 64
 484                 c4 c c c |   % 65
 485         }
 486         \alternative
 487         {
 488                 {
 489                         c4 c c c |   % 66
 490                         c4 c c c |   % 67
 491                 }
 492                 {
 493                         c4 c c c |   % 68
 494                 }
 495         }
 496
 497         c4 c c c |   % 69
 498
 499         \repeat volta 2
 500         {
 501                 c4 c c c |   % 70
 502                 c4 c c c |   % 71
 503                 c4 c c c |   % 72
 504                 c4 c c c |   % 73
 505         }
 506
 507         c1^\fermata \bar "|."   % 74
 508 }
 509
 510
 511 \score
 512 {
 513         <<
 514                 <<
 515                         \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
 516                         \new Lyrics \lyricsto "lead" \LeadVoxText
 517                 >>
 518
 519                 \new ChoirStaff = "Rhythm"
 520                 <<
 521                         \new ChordNames = "chords" \Chords
 522                         \new RhythmicStaff = "chordRhythm" \StaffC
 523                 >>
 524
 525                 \set Score.skipBars = ##t
 526                 \set Score.melismaBusyProperties = #'()
 527         >>
 528
 529         \layout
 530         {
 531 %               \context { \Staff \RemoveEmptyStaves }
 532 %               ragged-last-bottom = ##t
 533 %               ragged-last = ##t
 534         }
 535 }
 536
 537
 538 \paper
 539 {
 540   #(define fonts (make-pango-font-tree
 541     "Times New Roman"
 542     "DomCasual BT"
 543     "Luxi Mono"
 544     (/ staffSize 20)))
 545 }