Shamusworld >> Repos - music/blob - the-first-noel.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 = #18
   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         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "The First Noel" }
  14         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "English Carol" }
  15         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  16         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  17 }
  18
  19
  20 %
  21 % Song's structure
  22 %
  23 Global =
  24 {
  25         \clef G
  26         \key d \major
  27         \numericTimeSignature
  28         \time 3/4
  29
  30         % Intro
  31
  32         \partial 4*1 s4 \bar "||"   % 0
  33         s2.*4 |   % 1-4
  34
  35         \repeat volta 3
  36         {
  37                 s2.*4 \bar "||"   % 5-8
  38
  39                 % Verse
  40
  41                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  42                 s2.*8 |   % 9-16
  43
  44                 \mark \markup { \override #'(font-family . sans) { \box { A9 } } }
  45                 s2.*8 \bar "||"   % 17-24
  46 %\break % bah, only valid for size 18
  47
  48                 % Chorus
  49
  50                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  51                 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  52
  53                 s2.*6 |   % 25-30
  54         }
  55         \alternative
  56         {
  57                 {
  58                         s2.*2 |   % 31-32
  59                 }
  60                 {
  61                         s2. |   % 33
  62                         s2^\markup { \hspace #3.0 \raise #1.0 { D.S. } } s4 \bar "||"   % 34
  63                 }
  64                 {
  65                         s2.*2 |   % 35-36
  66                 }
  67         }
  68
  69         s2.*4 \bar "|."   % 37-40
  70 }
  71
  72
  73 %
  74 % Lead vocal
  75 %
  76 LeadVox = \relative c'
  77 {
  78         % Intro
  79
  80         s4 |   % 0
  81         s2.*4 |   % 1-4
  82
  83         s2. |   % 5
  84         s2. |   % 6
  85         s2. |   % 7
  86         s2 fs8 e |   % 8
  87
  88         % Verse
  89
  90         d4. ( e8 ) fs ( g ) |   % 9
  91         a2 b8 ( cs ) |   % 10
  92         d4 cs b |   % 11
  93         a2 b8 cs |   % 12
  94         d4 ( cs ) b |   % 13
  95         a4 ( b ) cs |   % 14
  96         d4 ( a ) g |   % 15
  97         fs2 fs8 ( e ) |   % 16
  98
  99         d4. ( e8 ) fs ( g ) |   % 17
 100         a2 b8 ( cs ) |   % 18
 101         d4 ( cs ) b |   % 19
 102         a2 b8 ( cs ) |   % 20
 103         d4 cs b |   % 21
 104         a4 ( b ) cs |   % 22
 105         d4 ( a ) g |   % 23
 106         fs2 fs8 ( e ) |   % 24
 107
 108         % Chorus
 109
 110         d4. ( e8 ) fs ( g ) |   % 25
 111         a2 d8 ( cs ) |   % 26
 112         b2 b4 |   % 27
 113         a2. |   % 28
 114         d4 cs b |   % 29
 115         a4 ( b ) cs |   % 30
 116
 117         d4 ( a ) g |   % 31
 118         d2. |   % 32
 119
 120         d'4 ( a ) g |   % 33
 121         fs2 fs8 ( e ) |   % 34
 122
 123         d'4 ( a ) g |   % 35
 124         d2. |   % 36
 125
 126         s2.*4 \bar "|."   % 37-40
 127 }
 128
 129
 130 LeadVoxText = \lyricmode
 131 {
 132         The _ first _ no -- _ el the _ an -- gel did say
 133         Was to cer -- tain poor shep -- herds in fields as they lay
 134         In _ fields _ where _ they lay _ keep -- ing their sheep
 135         On a cold win -- ter’s night _ that was _ so deep.
 136
 137         No -- _ el, _ no -- _ el! No -- _ el, no -- el!
 138         Born is the king _ of Is -- _ ra -- el!
 139
 140         Is -- _ ra -- el!
 141         No -- _
 142
 143         Is -- _ ra -- el!
 144 }
 145
 146 LeadVoxTextB = \lyricmode
 147 {
 148         They _ look -- _ ed _ up and _ saw _ a star
 149         Shi -- ning in _ the east _ be -- yond _ them far
 150         And _ to _ the _ earth it _ gave _ great light,
 151         And _ so it con -- tin -- ued both day _ and night.
 152 }
 153
 154
 155 Riffs = \relative c'
 156 {
 157         % Intro
 158
 159         \tiny
 160         fs8 e |   % 0
 161         d4. e8 fs g |   % 1
 162         a2 d8 cs |   % 2
 163         b2 b4 |   % 3
 164         a2. |   % 4
 165
 166         d4 cs b |   % 5
 167         a4 b cs |   % 6
 168         d4 a g |   % 7
 169         fs2 s4 |   % 8
 170
 171         s2.*28 |   % 9-36
 172
 173         d'4 cs b |   % 37
 174         a4 b cs |   % 38
 175         d4 a g |   % 39
 176         fs2.^\fermata |   % 40
 177         \normalsize
 178 }
 179
 180
 181 %
 182 % Chord names
 183 %
 184 Chords = \chordmode
 185 {
 186         % Intro
 187
 188         d4/a |   % 0
 189         d2.:9^7 |   % 1
 190         a2.:9^7 |   % 2
 191         g2.:9^7 |   % 3
 192         d2 a4:9^7/cs |   % 4
 193
 194         % Verse
 195
 196         g4:6/b a:11^9.7 g |   % 5
 197         d4:sus2 g fs:m |   % 6
 198         e2:m7 a4:sus4.7 |   % 7
 199         d2 d4/a |   % 8
 200
 201         d2.:9^7 |   % 9
 202         fs2.:m7 |   % 10
 203         g2.:maj7 |   % 11
 204         d2.:9^7/fs |   % 12
 205         g2.:maj9 |   % 13
 206         d2./fs |   % 14
 207         e2.:m7 |   % 15
 208         a4:13 b:m a/cs |   % 16
 209
 210         d2.:9^7 |   % 17
 211         a2.:sus2/cs |   % 18
 212         g2./b |   % 19
 213         d2./a |   % 20
 214         g2.:maj9 |   % 21
 215         d2.:9^7/fs |   % 22
 216         e2:m7 a4:sus4.7 |   % 23
 217         d4 a:13 a:7 |   % 24
 218
 219         % Chorus
 220
 221         d2.:9^7 |   % 25
 222         a2:9^7 d4:9^7/fs |   % 26
 223         g2. |   % 27
 224         d2 a4:sus2/cs |   % 28
 225         g4:6/b a:11^9.7 g |   % 29
 226         d4:sus2/fs g fs:m |   % 30
 227
 228         e2:m7 a4:sus4.7 |   % 31
 229         d2 d4/cs |   % 32
 230
 231         e2:m7 a4:sus4.7 |   % 33
 232         d2 d4/a |   % 34
 233
 234         e2:m7 a4:sus4.7 |   % 35
 235         d2 d4/cs |   % 36
 236
 237         g4:6/b a:11^9.7 g |   % 37
 238         d4:sus2/fs g fs:m |   % 38
 239         e2:m7 a4:sus4.7 |   % 39
 240         d2. |   % 40
 241 }
 242
 243
 244 %
 245 % Chord rhythms
 246 %
 247 StaffC = \relative c
 248 {
 249         \numericTimeSignature
 250         \override NoteHead #'style = #'slash
 251         \teeny
 252
 253         % Intro
 254
 255         c4 |   % 0
 256         c4 c c |   % 1
 257         c4 c c |   % 2
 258         c4 c c |   % 3
 259         c4 c c |   % 4
 260
 261         % Verse
 262
 263         c4 c c |   % 5
 264         c4 c c |   % 6
 265         c4 c c |   % 7
 266         c4 c c |   % 8
 267
 268         c4 c c |   % 9
 269         c4 c c |   % 10
 270         c4 c c |   % 11
 271         c4 c c |   % 12
 272         c4 c c |   % 13
 273         c4 c c |   % 14
 274         c4 c c |   % 15
 275         c4 c c |   % 16
 276
 277         c4 c c |   % 17
 278         c4 c c |   % 18
 279         c4 c c |   % 19
 280         c4 c c |   % 20
 281         c4 c c |   % 21
 282         c4 c c |   % 22
 283         c4 c c |   % 23
 284         c4 c c |   % 24
 285
 286         % Chorus
 287
 288         c4 c c |   % 25
 289         c4 c c |   % 26
 290         c4 c c |   % 27
 291         c4 c c |   % 28
 292         c4 c c |   % 29
 293         c4 c c |   % 30
 294
 295         c4 c c |   % 31
 296         c4 c c |   % 32
 297
 298         c4 c c |   % 33
 299         c4 c c |   % 34
 300
 301         c4 c c |   % 35
 302         c4 c c |   % 36
 303
 304         c4 c c |   % 37
 305         c4 c c |   % 38
 306         c4 c c |   % 39
 307         c2.^\fermata |   % 40
 308 }
 309
 310
 311 Dynamics =
 312 {
 313 %disnowok
 314 %       \override TextScript #'staff-padding = #-4.0
 315
 316         \once \override TextScript #'extra-offset = #'( 0.0 . -1.0 )
 317         \partial 4*1 s8_\markup { \italic { guitar, light perc. } } s8
 318
 319         s2.*16
 320
 321         s4_\markup { \italic { bass in 1st X } } s2
 322
 323         s2.*7
 324
 325         s4_\markup { \italic { add snare } } s2
 326 }
 327
 328
 329 \score
 330 {
 331         <<
 332                 \Global         % The "roadmap" that everything else depends on
 333
 334                 \context Staff
 335                 <<
 336                         \new Voice = "lead" \LeadVox
 337                         \new Voice = "riffs" \Riffs
 338                         \new Lyrics \lyricsto "lead" \LeadVoxText
 339                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 340                 >>
 341
 342                 \new ChoirStaff
 343                 <<
 344                         \new ChordNames \Chords
 345                         \new RhythmicStaff << \StaffC \Dynamics >>
 346                 >>
 347
 348                 \set Score.skipBars = ##t
 349                 \set Score.melismaBusyProperties = #'()
 350         >>
 351 }
 352
 353
 354 \paper
 355 {
 356         #(define fonts (make-pango-font-tree
 357                 "Times New Roman"
 358                 "LilyJAZZText"
 359                 "Luxi Mono"
 360                 (/ staffSize 20)))
 361
 362 % Don't spread staves vertically across last page (default: t)
 363 %       ragged-last-bottom = ##f
 364 % Don't spread staves vertically across the page (default: f)
 365         ragged-bottom = ##t
 366 % Allow partial line for last stave (default: f)
 367         ragged-last = ##t
 368
 369 % To find out what's eating the space at the top...
 370 %       annotate-spacing = ##t
 371 }
 372