Shamusworld >> Repos - music/blob - come-and-see.ly

   1 % Still need hairpins, directions, dynamics, 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 = #18
   9 #(set-default-paper-size "letter")
  10 #(set-global-staff-size staffSize)
  11 #(ly:set-option (quote no-point-and-click))
  12
  13 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
  14
  15 \header
  16 {
  17 %Let's bump up the title size and switch to the chord font. :-)
  18
  19         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Come And See" }
  20         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Lenny LeBlanc" }
  21         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  22         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  23 }
  24
  25
  26 %
  27 % Song's structure
  28 %
  29 Global =
  30 {
  31         \key f \major
  32         \numericTimeSignature
  33         \time 4/4
  34
  35         % Intro
  36
  37         s1*4 |   % 1-4
  38
  39         % Verse
  40
  41         \repeat volta 2
  42         {
  43         \once \override Score.RehearsalMark #'self-alignment-X = #left
  44         \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  45
  46                 s1*7 |   % 5-11
  47         }
  48         \alternative
  49         {
  50                 {
  51                         s1 |   % 12
  52                 }
  53                 {
  54                         s1 \bar "||"   % 13
  55                 }
  56         }
  57
  58         % Chorus
  59
  60         \mark \markup { \override #'(font-family . sans) \box { B } }
  61
  62         s1*3 |   % 14-16
  63
  64         \once \override Score.RehearsalMark #'self-alignment-X = #right
  65         \once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible
  66         \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
  67
  68         \time 2/4 s2 \time 4/4 |   % 17
  69
  70         s1 \bar "||"   % 18
  71
  72         \mark \markup { \override #'(font-family . sans) \box { C } }
  73
  74         s1*3 |   % 19-21
  75
  76         \time 2/4 s2 \time 4/4 |   % 22
  77
  78         s1 \bar "||"   % 23
  79
  80         \once \override Score.RehearsalMark #'self-alignment-X = #right
  81         \mark \markup { \italic { D.S. al Coda (2nd end.) } }
  82
  83         \stopStaff s1 \startStaff
  84         \set Score.currentBarNumber = #24
  85
  86         % Coda
  87
  88         \once \override Score.RehearsalMark #'self-alignment-X = #left
  89         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
  90
  91         s1*2 \bar "||"   % 24-25
  92
  93         \mark \markup { \override #'(font-family . sans) \box { D } }
  94
  95         s1*4 |   % 26-29
  96
  97         \repeat volta 4
  98         {
  99                 \mark \markup { \override #'(font-family . sans) \box { E } }
 100
 101                 s1*3 |   % 30-32
 102         }
 103         \alternative
 104         {
 105                 {
 106                         s1 |   % 33
 107                 }
 108                 {
 109                         \time 2/4 s2 \time 4/4 |   % 34
 110                 }
 111         }
 112
 113         % Verse
 114
 115         s1 \bar "||"   % 35
 116
 117         \mark \markup { \override #'(font-family . sans) \box { F } }
 118
 119         s1*11 \bar "||"   % 36-46
 120
 121         % Outro
 122
 123         s1*4 \bar "|."   % 47-50
 124 }
 125
 126
 127 %
 128 % Lead vocal
 129 %
 130 LeadVox = \relative c'
 131 {
 132         \clef G
 133
 134         % Intro
 135
 136         R1 |   % 1
 137         R1 |   % 2
 138         R1 |   % 3
 139         R1 |   % 4
 140
 141         % Verse
 142
 143         f4. c8 g'4. ~ g16 a |   % 5
 144         bf8 a16 g ~ g f f8 ~ f4 r  |   % 6
 145         r4 f8 f e4 ( d8. ) c16 |   % 7
 146         c2 r |   % 8
 147         f4. c8 g'4. ~ g16 a |   % 9
 148         a8 bf16 a ~ a8 g16 ( f ) f4 r |   % 10
 149         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) |   % 11
 150
 151         f2 r |   % 12
 152
 153         f2 r8. f16 a c8. \bar "||"   % 13
 154
 155         % Chorus
 156
 157         c8 c16 c ~ c8 g16 g ( ~ g8. a16 ) a4 |   % 14
 158         bf8 bf16 bf ( ~ bf a ) a a ~ a4 r |   % 15
 159         c8 c16 c ~ c8 g16 g ( ~ g8. a16 ) a4 |   % 16
 160         bf8 bf16 bf ( ~ bf a ) a8 |   % 17
 161         a2. r4 \bar "||"   % 18
 162
 163         bf4. ( ~ bf16 a32 g ) bf4 r |   % 19
 164         a4 ( ~ a16 bf a g ) g4 r |   % 20
 165         bf4. ( ~ bf16 a32 g ) bf4 r |   % 21
 166         a4 ( ~ a16 bf a g ) |   % 22
 167         g1 \bar "||"   % 23
 168
 169         s1   % coda spacer
 170
 171         % Coda
 172
 173         bf8 bf r bf bf a16 g ~ g8 f |   % 24
 174         a1 \bar "||"   % 25
 175
 176         R1 |   % 26
 177         R1 |   % 27
 178         R1 |   % 28
 179         R1 |   % 29
 180
 181         bf4. ( ~ bf16 a32 g ) bf4 r |   % 30
 182         a4 ( ~ a16 bf a g ) g4 r |   % 31
 183         bf4. ( ~ bf16 a32 g ) bf4 r |   % 32
 184
 185         a4 ( ~ a16 bf a g ) g4 r |   % 33
 186
 187         a4 ( ~ a16 bf a g ) |   % 34
 188
 189         % Verse
 190
 191         g1 \bar "||"   % 35
 192
 193         f4. c8 g'4. ~ g16 a |   % 36
 194         bf8 a16 g ~ g f f8 ~ f4 r  |   % 37
 195         r4 f8 f e4 ( d8. ) c16 |   % 38
 196         c2 r |   % 39
 197         f4. c8 g'4. ~ g16 a |   % 40
 198         a8 bf16 a ~ a8 g16 ( f ) f4 r |   % 41
 199         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) |   % 42
 200         f2 r |   % 43
 201         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) |   % 44
 202         f2 r |   % 45
 203         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) \bar "||"   % 46
 204
 205         % Outro
 206
 207         f2 r |   % 47
 208         R1 |   % 48
 209         R1 |   % 49
 210         r1^\fermata \bar "|."   % 50
 211 }
 212
 213 LeadVoxText = \lyricmode
 214 {
 215         Come and see _ the glo -- ry of _ the Lord _
 216         Come be -- hold __ _ the Lamb
 217         Come and know _ the mer -- cy of _ the __ _ King
 218         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 219
 220         him
 221
 222         For he is Lord of all _ the hea -- _ _ vens
 223         Lord in all __ _ _ the earth; _
 224         Lord of all _ cre -- a -- _ _ tion
 225         Wor -- thy to __ _ _ be served
 226
 227         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 228         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 229
 230         Wor -- thy, so wor -- thy to _ be served.
 231
 232         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 233         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 234
 235         lu -- _ _ _ _ jah
 236
 237         Come and see _ the glo -- ry of _ the Lord _
 238         Come be -- hold __ _ the Lamb
 239         Come and know _ the mer -- cy of _ the __ _ King
 240         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 241         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 242         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 243 }
 244
 245 LeadVoxTextB = \lyricmode
 246 {
 247         Come and give _ _ thanks un -- to _ the Lord _
 248         Come be -- hold __ _ the Lamb
 249         Come and sing _ _ prais -- es of _ the __ _ King
 250 }
 251
 252
 253 %
 254 % Riffs
 255 %
 256 Riffs = \relative c''
 257 {
 258 %{
 259         % Intro
 260
 261         s1*41 |   % 1-41
 262
 263         \tiny
 264         e8 b ds b cs b ds b |   % 42
 265         e8 b ds b cs b ds b |   % 43
 266         e8 b ds b cs b ds b |   % 44
 267 %}
 268 }
 269
 270
 271 %
 272 % Chord names
 273 %
 274 Chords = \chordmode
 275 {
 276         % Intro
 277
 278         f2 c/e |   % 1
 279         bf2:sus2/d f/c |   % 2
 280         bf2:sus2 f4/c c:7 |   % 3
 281         f2:sus4 f |   % 4
 282
 283         % Verse
 284
 285         f2 c/e |   % 5
 286         bf2:sus2/d f/c |   % 6
 287         bf2:sus2 c4:11^9.7 bf/c |   % 7
 288         f2 bf/c |   % 8
 289         f2 c |   % 9
 290         a4:sus4 a d:m d:m/c |   % 10
 291         bf2:sus2 f4/c c:7 |   % 11
 292
 293         f2 bf/f |   % 12
 294
 295         f1 |   % 13
 296
 297         % Chorus
 298
 299         c2 c4/e f |   % 14
 300         bf2 f |   % 15
 301         c2 c4/e f |   % 16
 302         bf2 |   % 17
 303         a2:sus4 a |   % 18
 304         g2:m11 bf:sus2 |   % 19
 305         f2/c c |   % 20
 306         g2:m11 bf:sus2 |   % 21
 307         f2/c |   % 22
 308         c1 |   % 23
 309
 310 s1
 311         % Coda
 312
 313         bf2 g:m7 |   % 24
 314         a2:sus4 a |   % 25
 315         g2:m11 bf |   % 26
 316         f2/c c |   % 27
 317         g2:m11 bf/d |   % 28
 318         f2/c c/e |   % 29
 319
 320         g2:m11 bf |   % 30
 321         f2/c c |   % 31
 322         g2:m11 bf/d |   % 32
 323
 324         f2/c c/e |   % 33
 325
 326         f2/c |   % 34
 327
 328         % Verse
 329
 330         c1 |   % 35
 331
 332         f2 c/e |   % 36
 333         bf2:sus2/d f/c |   % 37
 334         bf2:sus2 c4:11^9.7 bf/c |   % 38
 335         f2 bf/c |   % 39
 336         f2 c |   % 40
 337         a4:sus4 a d:m d:m/c |   % 41
 338         bf2:sus2 f4/c c:7 |   % 42
 339         f2 f/a |   % 43
 340         bf2:sus2 f4/c c:7 |   % 44
 341         d2:m d:m/c |   % 45
 342         bf2:sus2 f4/c c:7 |   % 46
 343
 344         % Outro
 345
 346         f2 c/e |   % 47
 347         bf2:sus2/d f/c |   % 48
 348         bf2:sus2 f4/c c:7 |   % 49
 349         f1 |   % 50
 350 }
 351
 352
 353 %
 354 % Chord rhythms
 355 %
 356 Rhythm = \relative c
 357 {
 358         \numericTimeSignature
 359         \time 4/4
 360         \override NoteHead #'style = #'slash
 361         \teeny
 362
 363         % Intro
 364
 365         c4 c c c |   % 1
 366         c4 c c c |   % 2
 367         c4 c c c |   % 3
 368         c4 c c c |   % 4
 369
 370         % Verse
 371
 372         c4 c c c |   % 5
 373         c4 c c c |   % 6
 374         c4 c c c |   % 7
 375         c4 c c c |   % 8
 376         c4 c c c |   % 9
 377         c4 c c c |   % 10
 378         c4 c c c |   % 11
 379
 380         c4 c c c |   % 12
 381
 382         c4 c c c \bar "||"   % 13
 383
 384         % Chorus
 385
 386         c2-> c4-> c-> |   % 14
 387         c4 c c c |   % 15
 388         c2-> c4-> c-> |   % 16
 389         c4 c |   % 17
 390         c4 c c c \bar "||"   % 18
 391         c4 c c c |   % 19
 392         c4 c c c |   % 20
 393         c4 c c c |   % 21
 394         c4 c |   % 22
 395         c4 c c2 \bar "||"   % 23
 396
 397         % Coda
 398
 399         % blank measure between last measure and coda
 400 %hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!!
 401         \stopStaff s1 \startStaff
 402
 403         c4 c c c |   % 24
 404         c4 c c c \bar "||"   % 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
 410         c4 c c c |   % 30
 411         c4 c c c |   % 31
 412         c4 c c c |   % 32
 413
 414         c4 c c c |   % 33
 415
 416         c4 c |   % 34
 417
 418         % Verse
 419
 420         c4 c c2 \bar "||"   % 35
 421
 422         c4 c c c |   % 36
 423         c4 c c c |   % 37
 424         c4 c c c |   % 38
 425         c4 c c c |   % 39
 426         c4 c c c |   % 40
 427         c4 c c c |   % 41
 428         c4 c c c |   % 42
 429         c4 c c c |   % 43
 430         c4 c c c |   % 44
 431         c4 c c c |   % 45
 432         c4 c c c \bar "||"   % 46
 433
 434         % Outro
 435
 436         c4 c c c |   % 47
 437         c4 c c c |   % 48
 438         c4 c c c |   % 49
 439         c1^\fermata \bar "|."   % 50
 440 }
 441
 442
 443 Dynamics =
 444 {
 445 %{
 446         % Intro
 447         s4_\markup { \italic { Ac. gtr only } } s2. |   % 1
 448
 449         s1*3 |   % 2-4
 450
 451         s4_\markup { \italic { Band in } } s2. |   % 5
 452 %}
 453 }
 454
 455
 456 \score
 457 {
 458         <<
 459                 \set Score.skipBars = ##t
 460                 \set Score.melismaBusyProperties = #'()
 461
 462                 \context Staff
 463                 <<
 464                         \Global         % The "roadmap" that everything else depends on
 465                         \new Voice = "lead" \LeadVox
 466                         \new Voice \Riffs
 467                         \new Lyrics \lyricsto "lead" \LeadVoxText
 468                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 469                 >>
 470
 471                 \new ChoirStaff
 472                 <<
 473                         \new ChordNames \Chords
 474 %Capo 3 edition
 475 %                       \new ChordNames \transpose f d \Chords
 476                         \new RhythmicStaff << \Rhythm \Dynamics >>
 477                 >>
 478         >>
 479 }
 480
 481
 482 \paper
 483 {
 484         #(define fonts (make-pango-font-tree
 485                 "Times New Roman"
 486                 "JazzText"
 487                 "Luxi Mono"
 488                 (/ staffSize 20)))
 489
 490 % Don't spread staves vertically across last page (default: t)
 491 %       ragged-last-bottom = ##f
 492 % Don't spread staves vertically across the page (default: f)
 493 %       ragged-bottom = ##t
 494 % Allow partial line for last stave (default: f)
 495         ragged-last = ##t
 496
 497 % To find out what's eating the space at the top...
 498 %       annotate-spacing = ##t
 499 }
 500