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         \override Staff.TimeSignature #'style = #'()
  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
 131 LeadVox = \relative c'
 132 {
 133 %       \set Voice.autoBeaming = ##f
 134 %       \set Staff.instrument = #"Lead vox"
 135         \clef G
 136 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 137
 138         % Intro
 139
 140         R1 |   % 1
 141         R1 |   % 2
 142         R1 |   % 3
 143         R1 |   % 4
 144
 145         % Verse
 146
 147         f4. c8 g'4. ~ g16 a |   % 5
 148         bf8 a16 g ~ g f f8 ~ f4 r  |   % 6
 149         r4 f8 f e4 ( d8. ) c16 |   % 7
 150         c2 r |   % 8
 151         f4. c8 g'4. ~ g16 a |   % 9
 152         a8 bf16 a ~ a8 g16 ( f ) f4 r |   % 10
 153         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) |   % 11
 154
 155         f2 r |   % 12
 156
 157         f2 r8. f16 a c8. \bar "||"   % 13
 158
 159         % Chorus
 160
 161         c8 c16 c ~ c8 g16 g ( ~ g8. a16 ) a4 |   % 14
 162         bf8 bf16 bf ( ~ bf a ) a a ~ a4 r |   % 15
 163         c8 c16 c ~ c8 g16 g ( ~ g8. a16 ) a4 |   % 16
 164         bf8 bf16 bf ( ~ bf a ) a8 |   % 17
 165         a2. r4 \bar "||"   % 18
 166
 167         bf4. ( ~ bf16 a32 g ) bf4 r |   % 19
 168         a4 ( ~ a16 bf a g ) g4 r |   % 20
 169         bf4. ( ~ bf16 a32 g ) bf4 r |   % 21
 170         a4 ( ~ a16 bf a g ) |   % 22
 171         g1 \bar "||"   % 23
 172
 173         s1   % coda spacer
 174
 175         % Coda
 176
 177         bf8 bf r bf bf a16 g ~ g8 f |   % 24
 178         a1 \bar "||"   % 25
 179
 180         R1 |   % 26
 181         R1 |   % 27
 182         R1 |   % 28
 183         R1 |   % 29
 184
 185         bf4. ( ~ bf16 a32 g ) bf4 r |   % 30
 186         a4 ( ~ a16 bf a g ) g4 r |   % 31
 187         bf4. ( ~ bf16 a32 g ) bf4 r |   % 32
 188
 189         a4 ( ~ a16 bf a g ) g4 r |   % 33
 190
 191         a4 ( ~ a16 bf a g ) |   % 34
 192
 193         % Verse
 194
 195         g1 \bar "||"   % 35
 196
 197         f4. c8 g'4. ~ g16 a |   % 36
 198         bf8 a16 g ~ g f f8 ~ f4 r  |   % 37
 199         r4 f8 f e4 ( d8. ) c16 |   % 38
 200         c2 r |   % 39
 201         f4. c8 g'4. ~ g16 a |   % 40
 202         a8 bf16 a ~ a8 g16 ( f ) f4 r |   % 41
 203         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) |   % 42
 204         f2 r |   % 43
 205         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) |   % 44
 206         f2 r |   % 45
 207         d8 e16 f ~ f8 g16 ( f ) a8 ( g16 f e8. f16 ) \bar "||"   % 46
 208
 209         % Outro
 210
 211         f2 r |   % 47
 212         R1 |   % 48
 213         R1 |   % 49
 214         r1^\fermata \bar "|."   % 50
 215 }
 216
 217 LeadVoxText = \lyricmode
 218 {
 219         Come and see _ the glo -- ry of _ the Lord _
 220         Come be -- hold __ _ the Lamb
 221         Come and know _ the mer -- cy of _ the __ _ King
 222         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 223
 224         him
 225
 226         For he is Lord of all _ the hea -- _ _ vens
 227         Lord in all __ _ _ the earth; _
 228         Lord of all _ cre -- a -- _ _ tion
 229         Wor -- thy to __ _ _ be served
 230
 231         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 232         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 233
 234         Wor -- thy, so wor -- thy to _ be served.
 235
 236         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 237         Ha -- _ _ _ le -- lu -- _ _ _ _ jah
 238
 239         lu -- _ _ _ _ jah
 240
 241         Come and see _ the glo -- ry of _ the Lord _
 242         Come be -- hold __ _ the Lamb
 243         Come and know _ the mer -- cy of _ the __ _ King
 244         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 245         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 246         Bow -- ing down _ be -- _ fore __ _ _ _ _ him
 247 }
 248
 249 LeadVoxTextB = \lyricmode
 250 {
 251         Come and give _ _ thanks un -- to _ the Lord _
 252         Come be -- hold __ _ the Lamb
 253         Come and sing _ _ prais -- es of _ the __ _ King
 254         Bow -- ing down _ be -- _ fore __ _ _ _
 255 }
 256
 257
 258 %
 259 % Riffs
 260 %
 261
 262 Riffs = \relative c''
 263 {
 264 %{
 265         % Intro
 266
 267         s1*41 |   % 1-41
 268
 269         \tiny
 270         e8 b ds b cs b ds b |   % 42
 271         e8 b ds b cs b ds b |   % 43
 272         e8 b ds b cs b ds b |   % 44
 273 %}
 274 }
 275
 276
 277 %
 278 % Chord names
 279 %
 280
 281 Chords = \chordmode
 282 {
 283         % Intro
 284
 285         f2 c/e |   % 1
 286         bf2:sus2/d f/c |   % 2
 287         bf2:sus2 f4/c c:7 |   % 3
 288         f2:sus4 f |   % 4
 289
 290         % Verse
 291
 292         f2 c/e |   % 5
 293         bf2:sus2/d f/c |   % 6
 294         bf2:sus2 c4:11^9.7 bf/c |   % 7
 295         f2 bf/c |   % 8
 296         f2 c |   % 9
 297         a4:sus4 a d:m d:m/c |   % 10
 298         bf2:sus2 f4/c c:7 |   % 11
 299
 300         f2 bf/f |   % 12
 301
 302         f1 |   % 13
 303
 304         % Chorus
 305
 306         c2 c4/e f |   % 14
 307         bf2 f |   % 15
 308         c2 c4/e f |   % 16
 309         bf2 |   % 17
 310         a2:sus4 a |   % 18
 311         g2:m11 bf:sus2 |   % 19
 312         f2/c c |   % 20
 313         g2:m11 bf:sus2 |   % 21
 314         f2/c |   % 22
 315         c1 |   % 23
 316
 317 s1
 318         % Coda
 319
 320         bf2 g:m7 |   % 24
 321         a2:sus4 a |   % 25
 322         g2:m11 bf |   % 26
 323         f2/c c |   % 27
 324         g2:m11 bf/d |   % 28
 325         f2/c c/e |   % 29
 326
 327         g2:m11 bf |   % 30
 328         f2/c c |   % 31
 329         g2:m11 bf/d |   % 32
 330
 331         f2/c c/e |   % 33
 332
 333         f2/c |   % 34
 334
 335         % Verse
 336
 337         c1 |   % 35
 338
 339         f2 c/e |   % 36
 340         bf2:sus2/d f/c |   % 37
 341         bf2:sus2 c4:11^9.7 bf/c |   % 38
 342         f2 bf/c |   % 39
 343         f2 c |   % 40
 344         a4:sus4 a d:m d:m/c |   % 41
 345         bf2:sus2 f4/c c:7 |   % 42
 346         f2 f/a |   % 43
 347         bf2:sus2 f4/c c:7 |   % 44
 348         d2:m d:m/c |   % 45
 349         bf2:sus2 f4/c c:7 |   % 46
 350
 351         % Outro
 352
 353         f2 c/e |   % 47
 354         bf2:sus2/d f/c |   % 48
 355         bf2:sus2 f4/c c:7 |   % 49
 356         f1 |   % 50
 357 }
 358
 359
 360 %
 361 % Chord rhythms
 362 %
 363
 364 Rhythm = \relative c
 365 {
 366 %       \set Voice.autoBeaming = ##f
 367 %       \set Staff.instrument = #"Rhythm"
 368         \override Staff.TimeSignature #'style = #'()
 369         \time 4/4
 370         \override NoteHead #'style = #'slash
 371 \tiny
 372
 373         % Intro
 374
 375         c4 c c c |   % 1
 376         c4 c c c |   % 2
 377         c4 c c c |   % 3
 378         c4 c c c |   % 4
 379
 380         % Verse
 381
 382         c4 c c c |   % 5
 383         c4 c c c |   % 6
 384         c4 c c c |   % 7
 385         c4 c c c |   % 8
 386         c4 c c c |   % 9
 387         c4 c c c |   % 10
 388         c4 c c c |   % 11
 389
 390         c4 c c c |   % 12
 391
 392         c4 c c c \bar "||"   % 13
 393
 394         % Chorus
 395
 396         c2-> c4-> c-> |   % 14
 397         c4 c c c |   % 15
 398         c2-> c4-> c-> |   % 16
 399         c4 c |   % 17
 400         c4 c c c \bar "||"   % 18
 401         c4 c c c |   % 19
 402         c4 c c c |   % 20
 403         c4 c c c |   % 21
 404         c4 c |   % 22
 405         c4 c c2 \bar "||"   % 23
 406
 407         % Coda
 408
 409         % blank measure between last measure and coda
 410 %hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!!
 411         \stopStaff s1 \startStaff
 412
 413         c4 c c c |   % 24
 414         c4 c c c \bar "||"   % 25
 415         c4 c c c |   % 26
 416         c4 c c c |   % 27
 417         c4 c c c |   % 28
 418         c4 c c c |   % 29
 419
 420         c4 c c c |   % 30
 421         c4 c c c |   % 31
 422         c4 c c c |   % 32
 423
 424         c4 c c c |   % 33
 425
 426         c4 c |   % 34
 427
 428         % Verse
 429
 430         c4 c c2 \bar "||"   % 35
 431
 432         c4 c c c |   % 36
 433         c4 c c c |   % 37
 434         c4 c c c |   % 38
 435         c4 c c c |   % 39
 436         c4 c c c |   % 40
 437         c4 c c c |   % 41
 438         c4 c c c |   % 42
 439         c4 c c c |   % 43
 440         c4 c c c |   % 44
 441         c4 c c c |   % 45
 442         c4 c c c \bar "||"   % 46
 443
 444         % Outro
 445
 446         c4 c c c |   % 47
 447         c4 c c c |   % 48
 448         c4 c c c |   % 49
 449         c1^\fermata \bar "|."   % 50
 450 }
 451
 452
 453 Dynamics =
 454 {
 455 %{
 456         % Intro
 457         s4_\markup { \italic { Ac. gtr only } } s2. |   % 1
 458
 459         s1*3 |   % 2-4
 460
 461         s4_\markup { \italic { Band in } } s2. |   % 5
 462 %}
 463 }
 464
 465
 466 \score
 467 {
 468         <<
 469                 \set Score.skipBars = ##t
 470                 \set Score.melismaBusyProperties = #'()
 471
 472 %               \new ChoirStaff
 473                 <<
 474                         \new ChordNames \Chords
 475 %Capo 3 edition
 476 %                       \new ChordNames \transpose f d \Chords
 477                         \new RhythmicStaff << \Rhythm \Dynamics >>
 478                 >>
 479
 480                 \new Staff
 481                 <<
 482                         \Global                                         % The "roadmap" that everything else depends on
 483                         \new Voice = "lead" \LeadVox
 484                         \new Voice \Riffs
 485                         \new Lyrics \lyricsto "lead" \LeadVoxText
 486                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 487                 >>
 488         >>
 489 }
 490
 491
 492 \paper
 493 {
 494         #(define fonts (make-pango-font-tree
 495                 "Times New Roman"
 496                 "DomCasual BT"
 497                 "Luxi Mono"
 498                 (/ staffSize 20)))
 499
 500 % Don't spread staves vertically across last page (default: t)
 501 %       ragged-last-bottom = ##f
 502 % Don't spread staves vertically across the page (default: f)
 503 %       ragged-bottom = ##t
 504 % Allow partial line for last stave (default: f)
 505         ragged-last = ##t
 506
 507 % To find out what's eating the space at the top...
 508 %       annotate-spacing = ##t
 509 %let's try this: [It works! Huzzah!]
 510         obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 511 }