Shamusworld >> Repos - music/blob - the-heart-of-worship.ly

   1 % Still needs hairpins/etc
   2
   3 \version "2.16.0"
   4 \include "pop-chords.ly"
   5 \include "english.ly"
   6
   7 % Good sizes are 16, 18, & 20
   8 staffSize = #16
   9 #(set-default-paper-size "letter")
  10 #(set-global-staff-size staffSize)
  11 #(ly:set-option (quote no-point-and-click))
  12
  13 \header
  14 {
  15 %Let's bump up the title size and switch to the chord font. :-)
  16
  17         title    = \markup { \override #'(font-family . sans)
  18                 { \fontsize #3.5 "The Heart Of Worship" } }
  19         composer = \markup { \override #'(font-family . sans) "Michael W. Smith" }
  20         arranger = \markup { \override #'(font-family . sans) "arr. Ed Smart" }
  21         tagline  = "Engraved by JLH and Lilypond 2.8.2"
  22 }
  23
  24
  25 %
  26 % Lead vocal
  27 %
  28
  29 LeadVox = \relative c''
  30 {
  31 %       \set Voice.autoBeaming = ##f
  32 %       \set Staff.instrumentName = #"Lead vox"
  33         \clef G
  34         \key d \major
  35         \override Staff.TimeSignature #'style = #'()
  36         \time 4/4
  37 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  38
  39         % Intro
  40
  41         r8^\markup { \hspace #0.0 \raise #1.5 { 8th note ballad } } \tiny a a a a d, d b' ~ |   % 1
  42         b8 a4 fs8 ~ fs e4 d16 d |   % 2
  43         fs8 fs16 g ~ g8 fs ~ fs2 |   % 3
  44         fs8 fs16 g ~ g8 fs ~ fs e4. ~ |   % 4
  45         e1 \normalsize \bar "||:"   % 5
  46
  47         \repeat volta 2
  48         {
  49                 % Verse
  50
  51 \once \override Score.RehearsalMark #'self-alignment-X = #left
  52 \mark \markup { \override #'(font-family . sans) { \box { A } } \italic { 1st time piano } }
  53
  54                 r4. a16 a a8 d,4 e8 ~ |   % 6
  55                 e2 fs8 e e d16 d ~ |   % 7
  56                 d4. a'16 a a8 d,4 e8 ~ |   % 8
  57                 e2 r |   % 9
  58                 r4. a16 a a8 d,4 e8 ~ |   % 10
  59                 e2 fs8 e e d16 d ~ |   % 11
  60                 d4. a'16 a a8 d,4 e8 ~ |   % 12
  61                 e2 r \bar "||"   % 13
  62
  63                 % Prechorus
  64
  65 \once \override Score.RehearsalMark #'self-alignment-X = #left
  66 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" \italic { band in } }
  67
  68                 r8 g g g fs e d e ~ |   % 14
  69                 e4. e16 d fs8 e d b |   % 15
  70                 r8 g' g g fs e d e ~ |   % 16
  71                 e2 r |   % 17
  72                 r8 g g g fs e d e ~ |   % 18
  73                 e4. e16 d fs8 e d b |   % 19
  74                 r8 g' g g a fs b fs16 e ~ |   % 20
  75                 e2 r \bar "||"   % 21
  76
  77                 % Chorus
  78
  79 \once \override Score.RehearsalMark #'self-alignment-X = #left
  80 \mark \markup { \override #'(font-family . sans) { \box { C } } \italic { snare } }
  81
  82                 r8 a a a a d, d b' ~ |   % 22
  83                 b8 a4 fs8 ~ fs e r d16 d |   % 23
  84                 fs8 fs16 g ~ g8 fs ~ fs2 |   % 24
  85                 fs8 fs16 g ~ g8 fs ~ fs e4 d8 |   % 25
  86                 r8 a' a a a d, d b' ~ |   % 26
  87                 b8 a4 fs8 ~ fs e r d16 d |   % 27
  88                 fs8 fs16 g ~ g8 fs ~ fs2 |   % 28
  89 \once \override Score.RehearsalMark #'self-alignment-X = #right
  90 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
  91         }
  92         \alternative
  93         {
  94                 {
  95                         fs8 fs16 g ~ g8 fs ~ fs e4 d8 ~ |   % 29
  96                         d2 r |   % 30
  97                         R1 |   % 31
  98                 }
  99                 {
 100                         fs8 fs16 g ~ g8 fs ~ fs e4 d8 ~ \bar "||"   % 32
 101                 }
 102         }
 103
 104         % Solo
 105
 106 \once \override Score.RehearsalMark #'self-alignment-X = #left
 107 \mark \markup { \override #'(font-family . sans) { \box { D } } \italic { solo } }
 108
 109         d2 r |   % 33
 110 %blegh
 111 \break
 112         R1 |   % 34
 113         R1 |   % 35
 114         R1 |   % 36
 115         R1 |   % 37
 116         R1 |   % 38
 117         R1 |   % 39
 118         R1 \bar "||"   % 40
 119
 120 \once \override Score.RehearsalMark #'self-alignment-X = #right
 121 \mark \markup { \italic { D.S. al Coda } }
 122
 123         % Coda
 124
 125 %\stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
 126 \stopStaff s1 \startStaff
 127 \set Score.currentBarNumber = #41
 128
 129 \once \override Score.RehearsalMark #'self-alignment-X = #left
 130 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
 131
 132         fs8 fs16 g ~ g8 fs ~ fs e4 d8 \bar "||"   % 41
 133
 134 \mark \markup { \override #'(font-family . sans) { \box { E } } }
 135
 136         r8 a' a a a d, d b' ~ |   % 42
 137         b8 a4 fs8 ~ fs e r d16 d |   % 43
 138         fs8 fs16 g ~ g8 fs ~ fs2 |   % 44
 139         fs8 fs16 g ~ g8 fs ~ fs e4 d8 |   % 45
 140         r8 a' a a a d, d b' ~ |   % 46
 141         b8 a4 fs8 ~ fs e r d16 d |   % 47
 142         fs8 fs16 g ~ g8 fs ~ fs2 |   % 48
 143         fs8 fs16 g ~ g8 fs ~ fs e4 d16 d |   % 49
 144
 145         fs8 fs16 g ~ g8 fs ~ fs2 |   % 50
 146         fs8 fs16 g ~ g8 fs ~ fs e4 d16 d |   % 51
 147
 148         fs8 fs16 g ~ g8 fs ~ fs2 |   % 50
 149         fs8 fs16 g ~ g8 fs ~ fs e4 d8 ~ |   % 53
 150         d1^\fermata \bar "|."   % 54
 151 }
 152
 153 LeadVoxText = \lyricmode
 154 {
 155         _ _ _ _ _ _ _ _ _ _ _ _ _ _
 156         _ _ _ _ _ _ _ _ _ _ _ _ _ _
 157
 158         When the mu- sic fades _ all is stripped a- way _
 159         And I simp- ly come _
 160         Long- ing just to bring _ some- thing that's of worth _
 161         That will bless your heart _
 162
 163         I'll bring you more than a song _
 164         for a song in it- self
 165         Is not what you have re- quired _
 166         You see much deep- er with- in _
 167         through the way things ap- pear
 168         You're look- ing in- to my heart __ _ _
 169
 170         I'm com- ing back to the heart _ of wor- _ ship
 171         and it's all a- bout _ you, _ all a- bout _ you _ Je- sus
 172         I'm sor- ry Lord for the thing _ I've made _ it
 173         when it's all a- bout _ you, _ all a- bout _ you _ Je- sus _
 174
 175         all a- bout _ you _ Je- sus _
 176         all a- bout _ you _ Je- sus
 177
 178         I'm com- ing back to the heart _ of wor- _ ship
 179         and it's all a- bout _ you, _ all a- bout _ you _ Je- sus
 180         I'm sor- ry Lord for the thing _ I've made _ it
 181         when it's all a- bout _ you, _ all a- bout _ you _ Lord
 182         when it's all a- bout _ you, _ all a- bout _ you _ Lord
 183         when it's all a- bout _ you, _ all a- bout _ you _ Je- sus
 184 }
 185
 186 LeadVoxTextB = \lyricmode
 187 {
 188         _ _ _ _ _ _ _ _ _ _ _ _ _ _
 189         _ _ _ _ _ _ _ _ _ _ _ _ _ _
 190
 191         King of end- less worth _ no one could ex- press _
 192         How much you de- serve _
 193         Though I'm weak and poor _ all I have is yours _
 194         Ev- ery sin- gle breath _
 195 }
 196
 197
 198 %
 199 % Chord names
 200 %
 201
 202 Chords = \chordmode
 203 {
 204 %Bah, can't we set this globally?
 205 %       \popChords
 206
 207         % Intro
 208
 209         d1 |   % 1
 210         a1:sus2/cs |   % 2
 211         e4.:m7 d:sus2/fs s4 |   % 3
 212         g4. a:sus4 s4 |   % 4
 213         a1 |   % 5
 214
 215         \repeat volta 2
 216         {
 217                 % Verse
 218
 219                 d1 |   % 6
 220                 a1 |   % 7
 221                 e1:m7 |   % 8
 222                 a2:sus4 a |   % 9
 223                 d1 |   % 10
 224                 a1:sus2/cs |   % 11
 225                 e1:m7 |   % 12
 226                 a2:sus4 a |   % 13
 227
 228                 % Prechorus
 229
 230                 e2:m7 d:sus2/fs |   % 14
 231                 a2:sus4 d/fs |   % 15
 232                 e2:m7 d:sus2/fs |   % 16
 233                 a2:sus4 a |   % 17
 234                 e2:m7 d:sus2/fs |   % 18
 235                 a2:sus4 d/fs |   % 19
 236                 e2:m7 d:sus2/fs |   % 20
 237                 a2:sus4 a |   % 21
 238
 239                 % Chorus
 240
 241                 d1 |   % 22
 242                 a1:sus2/cs |   % 23
 243                 e4.:m7 d:sus2/fs s4 |   % 24
 244                 g4. a:sus4 a4 |   % 25
 245                 d1 |   % 26
 246                 a1:sus2/cs |   % 27
 247                 e4.:m7 d:sus2/fs s4 |   % 28
 248         }
 249         \alternative
 250         {
 251                 {
 252                         g4. a:sus4 a4 |   % 29
 253                         d1 |   % 30
 254                         a2:sus4 a |   % 31
 255                 }
 256                 {
 257                         g4. a:sus4 a4 |   % 32
 258                 }
 259         }
 260
 261         % Solo
 262
 263         d1 |   % 33
 264         a1:sus2/cs |   % 34
 265         e4.:m7 d:sus2/fs s4 |   % 35
 266         g4. a:sus4 a4 |   % 36
 267         d1 |   % 37
 268         a1:sus2/cs |   % 38
 269         e4.:m7 d:sus2/fs s4 |   % 39
 270         g4. a:sus4 a4 |   % 40
 271
 272         % Coda
 273
 274 s1
 275
 276         g4. a:sus4 a4 |   % 41
 277         d1 |   % 42
 278         a1:sus2/cs |   % 43
 279         e4.:m7 d:sus2/fs s4 |   % 44
 280         g4. a:sus4 a4 |   % 45
 281         d1 |   % 46
 282         a1:sus2/cs |   % 47
 283         e4.:m7 d:sus2/fs s4 |   % 48
 284         g4. a:sus4 a4/fs |   % 49
 285         e4.:m7 d:sus2/fs s4 |   % 50
 286         g4. a:sus4 a4/fs |   % 51
 287         e4.:m7 d:sus2/fs s4 |   % 52
 288         g4. a:sus4 a4 |   % 53
 289         d1 |   % 54
 290 }
 291
 292
 293 %
 294 % Chord rhythms
 295 %
 296
 297 % Use a RhythmicStaff on the chords instead of this?
 298 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 299
 300 StaffC = \relative c
 301 {
 302 %       \set Voice.autoBeaming = ##f
 303 %       \set Staff.instrumentName = #"Rhythm"
 304         \override Staff.TimeSignature #'style = #'()
 305         \time 4/4
 306         \override NoteHead #'style = #'slash
 307
 308         % Intro
 309
 310         c4-\f c c c |   % 1
 311         c4 c c c |   % 2
 312         c4.-> c8-> ~ c4 c |   % 3
 313         c4.-> c8-> ~ c2 |   % 4
 314         c1 |   % 5
 315
 316         \repeat volta 2
 317         {
 318                 % Verse
 319
 320                 c4-\mp c c c |   % 6
 321                 c4 c c c |   % 7
 322                 c4 c c c |   % 8
 323                 c4 c c c |   % 9
 324                 c4 c c c |   % 10
 325                 c4 c c c |   % 11
 326                 c4 c c c |   % 12
 327                 c4 c c c \bar "||"   % 13
 328
 329                 % Prechorus
 330
 331                 c4-\mf c c c |   % 14
 332                 c4 c c c |   % 15
 333                 c4 c c c |   % 16
 334                 c4 c c c |   % 17
 335                 c4 c c c |   % 18
 336                 c4 c c c |   % 19
 337                 c4 c c c |   % 20
 338                 c4 c c c \bar "||"   % 21
 339
 340                 % Chorus
 341
 342                 c4-\f c c c |   % 22
 343                 c4 c c c |   % 23
 344                 c4.-> c8-> ~ c4 c |   % 24
 345                 c4.-> c8-> ~ c4 c |   % 25
 346                 c4 c c c |   % 26
 347                 c4 c c c |   % 27
 348                 c4.-> c8-> ~ c4 c |   % 28
 349         }
 350         \alternative
 351         {
 352                 {
 353                         c4.-> c8-> ~ c4 c |   % 29
 354                         c4 c c c |   % 30
 355                         c4 c c c |   % 31
 356                 }
 357                 {
 358                         c4.-> c8-> ~ c4 c \bar "||"   % 32
 359                 }
 360         }
 361
 362         % Solo
 363
 364         c4 c c c |   % 33
 365         c4 c c c |   % 34
 366         c4.-> c8-> ~ c4 c |   % 35
 367         c4.-> c8-> ~ c4 c |   % 36
 368         c4 c c c |   % 37
 369         c4 c c c |   % 38
 370         c4.-> c8-> ~ c4 c |   % 39
 371         c4.-> c8-> ~ c4 c |   % 40
 372
 373         % Coda
 374
 375 \stopStaff s1 \startStaff |
 376 \set Score.currentBarNumber = #41
 377
 378         c4.-> c8-> ~ c4 c \bar "||"   % 41
 379         c4 c c c |   % 42
 380         c4 c c c |   % 43
 381         c4.-> c8-> ~ c4 c |   % 44
 382         c4.-> c8-> ~ c4 c |   % 45
 383         c4 c c c |   % 46
 384         c4 c c c |   % 47
 385         c4.-> c8-> ~ c4 c |   % 48
 386         c4.-> c8-> ~ c4 c |   % 49
 387         c4.-> c8-> ~ c4 c |   % 50
 388         c4.-> c8-> ~ c4 c |   % 51
 389         c4.-> c8-> ~ c4 c |   % 52
 390         c4.-> c8->_\markup { \italic { rit. } } ~ c4 c |   % 53
 391         c1^\fermata \bar "|."   % 54
 392 }
 393
 394
 395 \score
 396 {
 397         <<
 398                 <<
 399                         \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
 400                         \new Lyrics \lyricsto "lead" \LeadVoxText
 401                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 402                 >>
 403
 404                 \new ChoirStaff = "Rhythm"
 405                 <<
 406                         \new ChordNames = "chords" \Chords
 407                         \new RhythmicStaff = "chordRhythm" \StaffC
 408                 >>
 409
 410                 \set Score.skipBars = ##t
 411                 \set Score.melismaBusyProperties = #'()
 412         >>
 413
 414         \layout
 415         {
 416 %               \context { \Staff \RemoveEmptyStaves }
 417 %               ragged-last-bottom = ##t
 418                 ragged-last = ##t
 419         }
 420 }
 421
 422
 423 \paper
 424 {
 425   #(define fonts (make-pango-font-tree
 426     "Times New Roman"
 427     "DomCasual BT"
 428     "Luxi Mono"
 429     (/ staffSize 20)))
 430 }