Shamusworld >> Repos - music/blob - o-holy-night.ly

   1 \version "2.19.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 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
  12
  13 \header
  14 {
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "O Holy Night" }
  16 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  18         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  19 }
  20
  21 % Useful tweak abbreviations (hn = harmony note)
  22
  23 hn = #(define-music-function (parser location arg) (ly:music?)
  24 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
  25
  26   (set! (ly:music-property arg 'tweaks)
  27     (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
  28
  29
  30 %
  31 % Song's structure
  32 %
  33 Global =
  34 {
  35         \key bf \major
  36         \numericTimeSignature
  37         \time 4/4
  38
  39 %       \once \override TextScript #'padding = #2.0
  40 %       s1*0^\markup { \large \bold { Samba } }
  41 % Capo 4 version
  42 %       s1*0^\markup { \hspace #0.0 \raise #2.0 \bigger \bold { "Moderate pop (*** CAPO 4 ***)" } }
  43
  44         % Intro
  45
  46         s1*2 \bar ".|:-||"   % 1-2
  47
  48         \repeat volta 2
  49         {
  50                 % Verse
  51
  52                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  53
  54                 s1 |   % 3
  55                 \time 2/4 s2 \time 4/4 |   % 4
  56                 s1*4 |   % 5-8
  57                 \time 2/4 s2 \time 4/4 |   % 9
  58                 s1*3 \bar "||"   % 10-12
  59
  60                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  61
  62                 s1*4 \bar "||"   % 13-16
  63
  64                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  65                 \mark \markup { \override #'(font-family . sans) { \box { C } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  66
  67                 s1*4 \bar "||"   % 17-20
  68
  69                 \mark \markup { \override #'(font-family . sans) { \box { D } } }
  70
  71                 s1*4 |   % 21-24
  72
  73                 \once \override Score.RehearsalMark #'self-alignment-X = #right
  74                 \mark \markup { \italic { to Coda } \hspace #0.5 \musicglyph #"scripts.coda" }
  75
  76                 s1*3 |   % 25-27
  77         }
  78         \alternative
  79         {
  80                 {
  81                         s1*2 |   % 28-29
  82                 }
  83                 {
  84                         s1 \bar "||"   % 30
  85                 }
  86         }
  87
  88         \once \override Score.RehearsalMark #'self-alignment-X = #right
  89         \mark \markup { \hspace #0.0 \raise #1.0 \italic { D.S. al Coda } }
  90
  91         % Coda
  92
  93         % blank measure between last measure and coda
  94         \stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
  95 %       \stopStaff s1 \startStaff   % That removed the spurious floating bar line from line break
  96         \break % Meh
  97         \set Score.currentBarNumber = #31
  98
  99         \once \override Score.RehearsalMark #'self-alignment-X = #left
 100         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
 101
 102         s1*3 \bar "||"   % 31-33
 103
 104         \mark \markup { \override #'(font-family . sans) { \box { E } } }
 105
 106         s1*5 \bar "|."   % 34-38
 107 }
 108
 109
 110 %
 111 % Lead vocal
 112 %
 113 LeadVox = \relative c'
 114 {
 115         \set tupletSpannerDuration = #(ly:make-moment 1 4)
 116
 117         % Intro
 118
 119         s1*2 |   % 1-2
 120
 121         % Verse
 122
 123         d4 \times 2/3 { d4 d8 } f4. f8 |   % 3
 124         \times 2/3 { g4 g8 ef4 g8 } |   % 4
 125         bf2 \times 2/3 { f4 f8 d4 c8 } |   % 5
 126         bf4 \times 2/3 { d4 ef8 } f4 \times 2/3 { ef4 c8 } |   % 6
 127         bf1 |   % 7
 128         d4 \times 2/3 { d4 d8 } f4. f8 |   % 8
 129         \times 2/3 { g4 g8 ef4 g8 } |   % 9
 130         bf2 \times 2/3 { f4 f8 e4 d8 } |   % 10
 131         a'4 \times 2/3 { f4 g8 } a4 \times 2/3 { bf4 a8 } |   % 11
 132         d,2. f4 |   % 12
 133
 134         f4 g c, f |   % 13
 135         \times 2/3 { g4 f8 bf4 d,8 } g4 \times 2/3 { f4 f8 } |   % 14
 136         f4 g c, f |   % 15
 137         \times 2/3 { g4 f8 bf4 d,8 } f2 |   % 16
 138
 139         bf2. \times 2/3 { a4 g8 } |   % 17
 140         a2. a4 |   % 18
 141         c2 ~ \times 2/3 { c4 g8 g4 g8 } |   % 19
 142         bf2 bf4. bf8 |   % 20
 143
 144         d2 ( c4. ) f,8 |   % 21
 145         bf2. \times 2/3 { a4 g8 } |   % 22
 146         f2 ~ \times 2/3 { f4 f8 g4 f8 } |   % 23
 147         f2. bf4 |   % 24
 148         c2. f,4 |   % 25
 149         d'2. c4 |   % 26
 150         bf2 ~ bf8 a bf c |   % 27
 151
 152         bf1 |   % 28
 153         s1 |   % 29
 154
 155         bf1 |   % 30
 156
 157         % Coda
 158
 159         s1   % Placeholder for blank measure between end and Coda
 160
 161         c2. f,4 |   % 31
 162         f'2 ( ~ f8 ef ) d ( c ) |   % 32
 163         bf2 ~ bf8 a bf c |   % 33
 164
 165         bf1 |   % 34
 166         r1 |   % 35
 167         r1 |   % 36
 168         r1 |   % 37
 169         r1 |   % 38
 170 }
 171
 172
 173 LeadVoxText = \lyricmode
 174 {
 175         O ho -- ly night, the stars are bright -- ly shin -- ing,
 176         it is the night of our dear sa -- vior’s birth.
 177         Long lay the world, in sin and er -- ror pin -- ing,
 178         ’til he ap -- peared and the soul felt its worth.
 179
 180         A thrill of hope the wear -- y world re -- joic -- es,
 181         for yon -- der breaks a new and glor -- ious morn.
 182         Fall on your knees! Oh hear __ _ the an -- gel voi -- ces!
 183         O night __ _ di -- vine, O the night __ _ when Christ was born;
 184         O night, O ho -- ly night, __ _ O night di -- vine!
 185
 186         claim!
 187
 188         night, O ho -- _ _ ly __ _ night, _ O night di -- vine!
 189 %{
 190 O Holy Night! The stars are brightly shining,
 191 It is the night of the dear Saviour's birth.
 192 Long lay the world in sin and error pining.
 193 Till He appeared and the Spirit felt its worth.
 194 A thrill of hope the weary world rejoices,
 195 For yonder breaks a new and glorious morn.
 196 Fall on your knees! Oh, hear the angel voices!
 197 O night divine, the night when Christ was born;
 198 O night, O Holy Night , O night divine!
 199 O night, O Holy Night , O night divine!
 200
 201 Led by the light of faith serenely beaming,
 202 With glowing hearts by His cradle we stand.
 203 O'er the world a star is sweetly gleaming,
 204 Now come the wisemen from out of the Orient land.
 205 The King of kings lay thus lowly manger;
 206 In all our trials born to be our friends.
 207 He knows our need, our weakness is no stranger,
 208 Behold your King! Before him lowly bend!
 209 Behold your King! Before him lowly bend!
 210
 211 Truly He taught us to love one another,
 212 His law is love and His gospel is peace.
 213 Chains he shall break, for the slave is our brother.
 214 And in his name all oppression shall cease.
 215 Sweet hymns of joy in grateful chorus raise we,
 216 With all our hearts we praise His holy name.
 217 Christ is the Lord! Then ever, ever praise we,
 218 His power and glory ever more proclaim!
 219 His power and glory ever more proclaim!
 220 %}
 221 }
 222
 223 LeadVoxTextB = \lyricmode
 224 {
 225         Tru -- ly he taught us to love one a -- no -- ther,
 226         his law is love and his gos -- pel is peace.
 227         Chains he shall break, for the slave is our bro -- ther,
 228         and in his name all op -- pres -- sion shall cease.
 229
 230         Sweet hymns of joy in grate -- ful cho -- rus raise we,
 231         With all our hearts we praise his ho -- ly name.
 232         Christ is the Lord! O praise _ his name for -- e -- ver!
 233         His po -- wer and glo -- ry _ e -- _ ver more pro -- claim!
 234         His pow’r and glo -- ry e -- _ ver more pro-
 235 }
 236
 237
 238 Riffs = \relative c
 239 {
 240         \set tupletSpannerDuration = #(ly:make-moment 1 4)
 241
 242         % Intro
 243
 244         \tiny
 245         \times 2/3 { r8 f bf c bf f ~ f f bf c bf f' ~ } |   % 1
 246         \times 2/3 { f8 f, bf c bf f ~ f f bf c bf f' } |   % 2
 247         s1 |   % 3
 248         s2 |   % 4
 249         s1*4 |   % 5-8
 250         s2 |   % 9
 251         s1*18 |   % 10-27
 252         \times 2/3 { r8 f, bf c bf f ~ f f bf c bf f' ~ } |   % 28
 253         \times 2/3 { f8 f, bf c bf f ~ f f bf c bf f' } |   % 29
 254         \normalsize
 255 }
 256
 257
 258 %
 259 % Chord names
 260 %
 261 Chords = \chordmode
 262 {
 263         % Intro
 264
 265         bf1:3.5.9 |   % 1
 266         s1 |   % 2
 267
 268         % Verse
 269
 270         bf1:3.5.9 |   % 3
 271         ef2:3.5.9 |   % 4
 272         bf1:3.5.9 |   % 5
 273         s2 ef4/f f:7 |   % 6
 274         bf1:3.5.9 |   % 7
 275         bf1:3.5.9 |   % 8
 276         ef4:3.5.9 ef/f |   % 9
 277         g1:m11 |   % 10
 278         d2:m7 g4:m9 a:7.9- |   % 11
 279         d1:m7 |   % 12
 280
 281         c2:m11 f:7 |   % 13
 282         bf2:6 g:m11 |   % 14
 283         c2:m11 f:7 |   % 15
 284         bf2.:6 bf4:/a |   % 16
 285
 286         g1:m7 |   % 17
 287         d1:m |   % 18
 288         c1:m7 |   % 19
 289         g1:m11 |   % 20
 290
 291         bf2/f f/ef |   % 21
 292         bf2/d ef:3.5.9 |   % 22
 293         bf2/f ef4/f f:7 |   % 23
 294         bf1:3.5.9 |   % 24
 295         f2 f/ef |   % 25
 296         bf2/d ef:3.5.9 |   % 26
 297         bf2/f ef/f |   % 27
 298
 299         bf1:3.5.9 |   % 28
 300         s1 |   % 29
 301
 302         bf1:3.5.9 |   % 30
 303
 304         % Coda
 305
 306         s1   % Placeholder for blank measure between end and Coda
 307
 308         f2 f/ef |   % 31
 309         bf2/d ef:3.5.9 |   % 32
 310         bf/f ef/f |   % 33
 311
 312         bf1:3.5.9 |   % 34
 313         ef1:3.5.9 |   % 35
 314         bf1:3.5.9 |   % 36
 315         ef1:3.5.9 |   % 37
 316         bf1:3.5.9 |   % 38
 317 }
 318
 319
 320 %
 321 % Chord rhythms
 322 %
 323 Rhythm = \relative c
 324 {
 325         \numericTimeSignature
 326         \override NoteHead #'style = #'slash
 327 %Not small enough... (?)
 328         \teeny
 329 %       \magnify #0.3
 330
 331         % Intro
 332
 333         c1 ~ |   % 1
 334         c1 |   % 2
 335
 336         % Verse
 337
 338         c4 c c c |   % 3
 339         c4 c |   % 4
 340         c4 c c c |   % 5
 341         c4 c c c |   % 6
 342         c4 c c c |   % 7
 343         c4 c c c |   % 8
 344         c4 c |   % 9
 345         c4 c c c |   % 10
 346         c4 c c c |   % 11
 347         c4 c c c |   % 12
 348
 349         c4 c c c |   % 13
 350         c4 c c c |   % 14
 351         c4 c c c |   % 15
 352         c4 c c c |   % 16
 353
 354         c4 c c c |   % 17
 355         c4 c c c |   % 18
 356         c4 c c c |   % 19
 357         c4 c c c |   % 20
 358
 359         c4 c c c |   % 21
 360         c4 c c c |   % 22
 361         c4 c c c |   % 23
 362         c4 c c c |   % 24
 363         c4 c c c |   % 25
 364         c4 c c2 |   % 26
 365         c4 c c2 |   % 27
 366
 367         c1 ~ |   % 28
 368         c1 |   % 29
 369
 370         c4 c c c |   % 30
 371
 372         % Coda
 373
 374 \stopStaff s1 \startStaff   % Placeholder for blank measure between end and Coda
 375
 376         c4 c c c |   % 31
 377         c4 c c2 |   % 32
 378         c2 c |   % 33
 379
 380         c4 c c c |   % 34
 381         c4 c c c |   % 35
 382         c4 c c c |   % 36
 383         c4 c c c |   % 37
 384         c1-\fermata |   % 38
 385 }
 386
 387
 388 Dynamics =
 389 {
 390 %       s1*4 |   % 1-4
 391 %       s4_\markup { \italic { 1st X: Melody, 2nd X+: Solos } } s2. |   % 5
 392 %       s1*38 |   % 1-38
 393 %       s4_\markup { \bold \italic { Double Chorus 2nd X } } s2. |   % 39
 394 %       s1*7 |   % 40-46
 395 %       s4_\markup { \bold { Tutti } } s2. |   % 47
 396 }
 397
 398
 399 \score
 400 {
 401         <<
 402                 \Global         % The "roadmap" that everything else depends on
 403                 \set Score.skipBars = ##t
 404                 \set Score.melismaBusyProperties = #'()
 405
 406                 \context Staff
 407                 <<
 408                         \new Voice = "lead" \LeadVox
 409                         \new Voice \Riffs
 410                         \new Lyrics \lyricsto "lead" \LeadVoxText
 411                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 412                 >>
 413
 414                 \new ChoirStaff
 415                 <<
 416                         \new ChordNames \Chords
 417 %Capo 4 edition
 418 %                       \new ChordNames \transpose b g \Chords
 419                         \new RhythmicStaff << \Rhythm \Dynamics >>
 420                 >>
 421         >>
 422 }
 423
 424
 425 \paper
 426 {
 427         #(define fonts (make-pango-font-tree
 428                 "Times New Roman"
 429                 "LilyJAZZText"
 430                 "Luxi Mono"
 431                 (/ staffSize 20)))
 432
 433 % Spread staves vertically across last page (default: t)
 434         ragged-last-bottom = ##f
 435 % Don't spread staves vertically across the page (default: f)
 436 %       ragged-bottom = ##t
 437 % Allow partial line for last stave (default: f)
 438         ragged-last = ##t
 439
 440 % To find out what's eating the space at the top...
 441 %       annotate-spacing = ##t
 442 }