Shamusworld >> Repos - music/blob - take-my-life-and-let-it-be-consecrated-sa.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 = #20
   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 "Take My Life And Let It Be Consecrated" }
  16         subtitle = \markup { \override #'(font-family . sans) \fontsize #3.5 "SA version" }
  17 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  18         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart/Deborah Hammons" }
  19         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  20 }
  21
  22
  23 %
  24 % Song's structure
  25 %
  26 Global =
  27 {
  28         \key ef \major
  29         \override Staff.TimeSignature #'style = #'()
  30         \time 4/4
  31
  32         % Intro
  33
  34         s1*4 |   % 1-4
  35
  36         % Verse
  37
  38         \repeat volta 3
  39         {
  40                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  41
  42                 s1*9 |   % 5-13
  43
  44                 \time 2/4
  45
  46                 s2 |   % 14
  47
  48                 \time 4/4
  49
  50 \voiceTwo
  51                 s1 |   % 15
  52 \oneVoice
  53                 s1 |   % 16
  54         }
  55         \alternative
  56         {
  57                 {
  58                         s1*2 |   % 17-18
  59                 }
  60                 {
  61                         s1 |   % 19
  62                 }
  63         }
  64
  65         s1 \bar "||"   % 20
  66
  67         \key f \major
  68
  69         \mark \markup { \override #'(font-family . sans) { \box { B } } }
  70
  71         s1*15 \bar "|."   % 21-35
  72 }
  73
  74
  75 %
  76 % Lead vocal
  77 %
  78
  79 Soprano = \relative c'
  80 {
  81 %       \set Voice.autoBeaming = ##f
  82 %       \set Staff.instrumentName = #"Lead vox"
  83         \clef G
  84 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
  85
  86         % Intro
  87
  88         s1*4 |   % 1-4
  89
  90         % Verse
  91
  92         ef4 ef ef8 ( bf ) ef ( g ) |   % 5
  93         bf4 af g2 |   % 6
  94         g4 g g8 ( f ) af ( f ) |   % 7
  95         ef4 d8 ( f ) ef2 |   % 8
  96         g4 g f f8 ( g ) |   % 9
  97         af4 bf af ( g ) |   % 10
  98         bf4 bf c bf |   % 11
  99         bf8 ( af ) af ( g ) g4 ( f ) |   % 12
 100         ef4 f g af8 ( f ) |   % 13
 101
 102         \time 2/4
 103
 104         ef4 d |   % 14
 105
 106         \time 4/4
 107
 108 \voiceTwo
 109         ef1 |   % 15
 110 \oneVoice
 111         s1 |   % 16
 112
 113         s1*2 |   % 17-18
 114
 115         s1 |   % 19
 116
 117         s1 |   % 20
 118
 119         % Key: F
 120
 121         f4 f f8 ( c ) f ( a ) |   % 21
 122         c4 bf a2 |   % 22
 123         a4 a a8 ( g ) bf ( g ) |   % 23
 124         f4 e8 ( g ) f2 |   % 24
 125         a4 a g g8 ( a ) |   % 25
 126         bf4 c bf ( a ) |   % 26
 127         c4 c d c |   % 27
 128         c8 ( bf ) bf ( a ) a4 ( g ) |   % 28
 129         f4 g a bf8 ( g ) |   % 29
 130         f2 e |   % 30
 131         f1 |   % 31
 132         s1 |   % 32
 133         s1 |   % 33
 134         s1 |   % 34
 135         r1^\fermata |   % 35
 136 }
 137
 138 Alto = \relative c'
 139 {
 140 %       \set Voice.autoBeaming = ##f
 141 %       \set Staff.instrumentName = #"Lead vox"
 142         \clef G
 143 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
 144
 145         % Intro
 146
 147         s1*4 |   % 1-4
 148
 149         % Verse
 150
 151         bf4 bf bf bf |   % 5
 152         d4 d ef2 |   % 6
 153         c4 c c8 ( d ) ef4 |   % 7
 154         bf4 bf bf2 |   % 8
 155         bf4 ef d d8 ( ef ) |   % 9
 156         f4 g f ( ef ) |   % 10
 157         g4 g af g |   % 11
 158         f4 f8 ( ef ) ef4 ( d ) |   % 12
 159         bf4 bf ef ef |   % 13
 160
 161         \time 2/4
 162
 163         bf4 bf |   % 14
 164
 165         \time 4/4
 166
 167         bf1 |   % 15
 168         r1 |   % 16
 169
 170         r1 |   % 17
 171         r1 |   % 18
 172
 173         r1 |   % 19
 174
 175         r1 |   % 20
 176
 177         % Key: F
 178
 179         c4 c c c |   % 21
 180         e4 e f2 |   % 22
 181         d4 d d8 ( e ) f4 |   % 23
 182         c4 c c2 |   % 24
 183         d4 f ef ef8 ( f ) |   % 25
 184         g4 a g ( f ) |   % 26
 185         a4 a bf a |   % 27
 186         g4 g8 ( f ) f4 ( e ) |   % 28
 187         d4 c d c |   % 29
 188         c2 c |   % 30
 189
 190         c1 |   % 31
 191         r1 |   % 32
 192         r1 |   % 33
 193         r1 |   % 34
 194         r1^\fermata |   % 35
 195 }
 196
 197 LeadVoxText = \lyricmode
 198 {
 199         Take my life _ and _ let it be
 200         con- se- cra- _ ted _ Lord, to _ thee;
 201         Take my hands and _ let them move, _
 202         at the im- pulse of _ thy _ love, _
 203         at the im- pulse _ of thy love.
 204
 205         Take my love, _ my _ God, I pour
 206         at thy feet _ its _ trea- sure _ store;
 207         Take my- self and _ I will be, _
 208         e- ver, on- ly, for _ my _ king, _
 209         e- ver, on- ly, _ for my king.
 210 }
 211
 212 LeadVoxTextB = \lyricmode
 213 {
 214         Take my feet _ and _ let them be
 215         swift and beau- _ ti- _ ful for _ thee;
 216         Take my voice and _ let me sing, _
 217         al- ways, on- ly for _ my _ king, _
 218         al- ways, on- ly _ for my king.
 219 }
 220
 221 LeadVoxTextC = \lyricmode
 222 {
 223         Take my lips _ and _ let them be
 224         filled with mes- _ sa- _ ges from _ thee;
 225         Take my sil- ver _ and my gold, _
 226         not a mite would I _ with- _ hold, _
 227         not a mite would _ I with- hold.
 228 }
 229
 230
 231 Riffs = \relative c'
 232 {
 233         \clef G
 234         \key ef \major
 235         \override Staff.TimeSignature #'style = #'()
 236         \time 4/4
 237
 238         % Intro
 239
 240         \tiny
 241         <ef g,>16 d bf f ~ f4 ~ f4. g16 bf |   % 1
 242         c1 |   % 2
 243         <ef' g,>16 d bf f ~ f4 ~ f4. g16 bf |   % 3
 244         c2 <ef, bf af> |   % 4
 245
 246         s1*9
 247         s2
 248
 249 \voiceOne
 250 \tieDown
 251         <ef g,>16 d bf f ~ f4 ~ f4. g16 bf |   % 14
 252 \tieNeutral
 253 \oneVoice
 254         c1 |   % 15
 255         <ef' g,>16 d bf f ~ f4 ~ f4. g16 bf |   % 16
 256         c2 <ef, bf af> |   % 17
 257
 258         <ef' g,>16 d bf f ~ f4 ~ f4. g16 bf |   % 18
 259         c2 r |   % 19
 260
 261         s1*10
 262
 263         \stemUp
 264         <f a,>16 e c g ~ g4 ~ g4. a16 c |   % 31
 265         \stemNeutral
 266         d2 r |   % 32
 267         <f a,>16 e c g ~ g4 ~ g4. a16 c |   % 33
 268         d2 r |   % 34
 269 }
 270
 271
 272 %
 273 % Chord names
 274 %
 275
 276 Chords = \chordmode
 277 {
 278 %Bah, can't we set this globally?
 279 %       \popChords
 280
 281         % Intro
 282
 283         c1:m11 |   % 1
 284         af1:sus2 |   % 2
 285         c1:m11 |   % 3
 286         af2 bf:sus4.7 |   % 4
 287
 288         % Verse
 289
 290         \repeat volta 4
 291         {
 292                 ef2 f:m11 |   % 5
 293                 af2:sus2 ef |   % 6
 294                 c2:m7 af:sus2 |   % 7
 295                 ef4/bf bf ef2 |   % 8
 296                 c2:m7 bf:11^9.7 |   % 9
 297                 f2:m11 af4/ef ef |   % 10
 298                 ef2/g af4  ef/g |   % 11
 299                 f2:m11 ef4/bf bf |   % 12
 300                 af4/c bf/d ef af:sus2 |   % 13
 301
 302                 \time 2/4
 303
 304                 ef4/bf bf |   % 14
 305
 306                 \time 4/4
 307
 308                 c1:m11 |   % 15
 309                 af1:sus2 |   % 16
 310         }
 311         \alternative
 312         {
 313                 {
 314                         c1:m11 |   % 17
 315                         af2 bf:sus4.7 |   % 18
 316                 }
 317                 {
 318                         c1:m11 |   % 19
 319                 }
 320         }
 321
 322         af2:sus2 g:m11 |   % 20
 323
 324         f2 g:m11 |   % 21
 325         bf2:sus2 f |   % 22
 326         d2:m7 bf:sus2 |   % 23
 327         f4/c c f2 |   % 24
 328         d2:m7 ef:6.9 |   % 25
 329         g2:m11 bf4/f f |   % 26
 330         f2/a bf4 f/a |   % 27
 331         g2:m11 f4/c c |   % 28
 332         bf4/d c/e f bf |   % 29
 333         f2/c c |   % 30
 334         f1 |   % 31
 335         bf1:sus2 |   % 32
 336         f1 |   % 33
 337         bf1:sus2 |   % 34
 338         f |   % 35
 339 }
 340
 341
 342 %
 343 % Chord rhythms
 344 %
 345
 346 % Use a RhythmicStaff on the chords instead of this?
 347 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 348
 349 Rhythm = \relative c
 350 {
 351 %       \set Voice.autoBeaming = ##f
 352 %       \set Staff.instrumentName = #"Rhythm"
 353         \override Staff.TimeSignature #'style = #'()
 354         \time 4/4
 355         \override NoteHead #'style = #'slash
 356
 357         % Intro
 358
 359         c4_\markup { \italic { perc. groove } } c c c |   % 1
 360         c4 c c c |   % 2
 361         c4 c c c |   % 3
 362         c4 c c c |   % 4
 363
 364         % Verse
 365
 366         \repeat volta 3
 367         {
 368                 c4_\markup { \italic { piano 1st X } } c c c |   % 5
 369                 c4 c c c |   % 6
 370                 c4 c c c |   % 7
 371                 c4 c c c |   % 8
 372                 c4 c c c |   % 9
 373                 c4 c c c |   % 10
 374                 c4 c c c |   % 11
 375                 c4 c c c |   % 12
 376                 c4 c c c |   % 13
 377
 378                 \time 2/4
 379
 380                 c4 c |   % 14
 381
 382                 \time 4/4
 383
 384                 c4_\markup { \italic { band in 1st X } } c c c |   % 15
 385                 c4 c c c |   % 16
 386         }
 387         \alternative
 388         {
 389                 {
 390                         c4 c c c |   % 17
 391                         c4 c c c |   % 18
 392                 }
 393                 {
 394                         c4 c c c |   % 19
 395                 }
 396         }
 397
 398         c4 c c \< c \! \bar "||"   % 20
 399
 400         c4_\markup { \italic { snare } } c c c |   % 21
 401         c4 c c c |   % 22
 402         c4 c c c |   % 23
 403         c4 c c c |   % 24
 404         c4 c c c |   % 25
 405         c4 c c c |   % 26
 406         c4 c c c |   % 27
 407         c4 c c c |   % 28
 408         c4 c c c |   % 29
 409         c4 c c c |   % 30
 410         c4 c c c |   % 31
 411         c4 c c c |   % 32
 412         c4 c c c |   % 33
 413         c4 c c_\markup { \italic { rit. } } c |   % 34
 414         c1^\fermata \bar "|."   % 35
 415 }
 416
 417
 418
 419 Dynamics =
 420 {
 421 %{
 422 %Hmm, this is throwin off the layout...
 423         s4_\mf s2. |   % 1
 424         s1*18 |   % 2-19
 425         s4 s \< s2 |   % 20
 426         s4_\f s2. |   % 21
 427 %}
 428 %{
 429         % Intro
 430         s4_\markup { \italic { Ac. gtr only } } s2. |   % 1
 431
 432         s1*3 |   % 2-4
 433
 434         s4_\markup { \italic { Band in } } s2. |   % 5
 435 %}
 436 }
 437
 438
 439 \score
 440 {
 441         <<
 442                 \Global                                         % The "roadmap" that everything else depends on
 443
 444                 \context Staff
 445                 <<
 446                         \new Voice = "lead" \Soprano
 447                         \new Voice \Riffs
 448                         \new Lyrics \lyricsto "lead" \LeadVoxText
 449                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 450                         \new Lyrics \lyricsto "lead" \LeadVoxTextC
 451                 >>
 452
 453                 \new Staff
 454                 <<
 455                         \Global
 456                         \new Voice = "lead" \Alto
 457                 >>
 458
 459                 \new ChoirStaff
 460                 <<
 461                         \new ChordNames \Chords
 462 %Capo 3 edition
 463 %                       \new ChordNames \transpose f d \Chords
 464                         \new RhythmicStaff << \Rhythm \Dynamics >>
 465                 >>
 466
 467                 \set Score.skipBars = ##t
 468                 \set Score.melismaBusyProperties = #'()
 469         >>
 470 }
 471
 472
 473 \paper
 474 {
 475         #(define fonts (make-pango-font-tree
 476                 "Times New Roman"
 477                 "DomCasual BT"
 478                 "Luxi Mono"
 479                 (/ staffSize 20)))
 480
 481 % Don't spread staves vertically across last page (default: t)
 482         ragged-last-bottom = ##f
 483 % Don't spread staves vertically across the page (default: f)
 484 %       ragged-bottom = ##t
 485 % Allow partial line for last stave (default: f)
 486         ragged-last = ##t
 487
 488 % To find out what's eating the space at the top...
 489 %       annotate-spacing = ##t
 490 %let's try this: [It works! Huzzah!]
 491         obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 492 }