Shamusworld >> Repos - music/blob - one-small-child.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 \header
  12 {
  13         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "One Small Child" }
  14         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "D. Meece" }
  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         \key d \minor
  26         \numericTimeSignature
  27         \time 4/4
  28
  29         % Intro
  30
  31         s1*4 \bar "||"   % 1-4
  32
  33         % Verse
  34
  35         \mark \markup { \override #'(font-family . sans) { \box { A } } }
  36
  37         s1*9 |   % 5-13
  38
  39         \once \override Score.RehearsalMark #'self-alignment-X = #right
  40         \mark \markup { { To Coda } \hspace #0.5 \musicglyph #"scripts.coda" }
  41
  42         s1 \bar ".|:-||"   % 14
  43
  44         \repeat volta 2
  45         {
  46                 % Verse
  47
  48                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  49
  50                 s1*10 \bar "||"   % 15-24
  51
  52                 % Bridge
  53
  54                 \mark \markup { \override #'(font-family . sans) { \box { C } } }
  55
  56                 s1*7 |   % 25-31
  57         }
  58         \alternative
  59         {
  60                 {
  61                         \time 6/4 s1. |   % 32
  62                 }
  63                 {
  64                         \time 6/4 s1. \bar "||"   % 33
  65                 }
  66         }
  67
  68         \time 4/4
  69         \once \override Score.RehearsalMark #'self-alignment-X = #right
  70         \mark \markup { \hspace #0.0 \raise #1.0 \italic { D.C. al Coda } }
  71
  72         % Coda
  73
  74         % blank measure between last measure and coda
  75 %       \stopStaff s1 \bar "" \startStaff   % That removed the spurious floating bar line from line break
  76         \stopStaff s1 \startStaff
  77 %       \break % Meh
  78         \set Score.currentBarNumber = #34
  79
  80         \once \override Score.RehearsalMark #'self-alignment-X = #left
  81         \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
  82
  83         s1*5 \bar "|."   % 34-38
  84 }
  85
  86
  87 %
  88 % Lead vocal
  89 %
  90 LeadVox = \relative c'
  91 {
  92         % Intro
  93
  94         s1*4 |    % 1-4
  95
  96         % Verse
  97
  98         d4 a' g f8 e |    % 5
  99         d4 e8 f e ( d ) c4 |    % 6
 100         d4 a' c c8 c |    % 7
 101         b8 a g4 a2 |    % 8
 102         d,4 a' g f8 e |    % 9
 103         d4 e8 f e ( d ) c4 |    % 10
 104         d4 a' g f8 e |    % 11
 105         d1 |    % 12
 106         d4 a' g f8 e |    % 13
 107         d2. r4 |    % 14
 108
 109         % Verse
 110
 111         d4 a' g f8 e |    % 15
 112         d4 e8 ( f ) e ( d ) c4 |    % 16
 113         d4 a' c c8 c |    % 17
 114         b8 a g4 a2 |    % 18
 115         d,4 a' g f8 e |    % 19
 116         d4 e8 f e d c4 |    % 20
 117         d4 a' g f8 e |    % 21
 118         d4 ( a' g ) f8 ( e |    % 22
 119         d4 a' g f8 e |    % 23
 120         d1 ) |    % 24
 121
 122         % Bridge
 123
 124         a'4 a g a8 bf |    % 25
 125         a4 bf8 a g4 c, |    % 26
 126         a'4 a g c |    % 27
 127         f,8 ( e ) d4 c2 |    % 28
 128         a'4 a g c |    % 29
 129         a4 bf8 a g4 c, |    % 30
 130         a'4 a g c |    % 31
 131
 132         f,8 ( e ) d4 c1 |    % 32
 133
 134         f8 ( e ) d4 c1 |    % 33
 135
 136         % Coda
 137
 138         s1   % For blank measure
 139
 140         d1 |    % 34
 141         d4 a' g-\fermata f8 c' |   % 35
 142         d1 |   % 36
 143         s1*2 |    % 37-38
 144 }
 145
 146
 147 LeadVoxText = \lyricmode
 148 {
 149         One small child in a land of a thou -- _ sand,
 150         One small dream of a sav -- ior to -- night.
 151         One small hand reach -- ing out to the star -- _ light,
 152         One small ci -- ty of life.
 153         One small ci -- ty of life.
 154
 155         One king bring -- ing his gold and _ ri -- _ ches,
 156         One king rul -- ing an ar -- my of might,
 157         One king kneel -- ing with in -- cense and can -- dle -- light,
 158         One King bring -- ing us life. __ _ _
 159         Oh, __ _ _ _ _ _ _ _
 160
 161         See him ly -- ing a cra -- dle be -- neath him,
 162         See him smil -- ing in _ the stall.
 163         See his moth -- er prais -- ing his fa -- ther,
 164         See his ti -- ny eye -- _ lids fall.
 165
 166         _ _ _ _
 167         life.
 168         One small sav -- ior of life.
 169 }
 170
 171 LeadVoxTextB = \lyricmode
 172 {
 173         One small child in a land of a thou -- _ sand,
 174         One small dream in a peo -- ple of might,
 175         One small hand reach -- ing out to the star -- _ light,
 176         One small sav -- ior of life.
 177         One small sav -- ior of _
 178
 179         One small light from the flame of a can -- _ dle,
 180         One small light from a ci -- ty of might,
 181         One small light from the stars in the end -- less night,
 182         One small light from his face. __ _ _
 183         Oh, __ _ _ _ _ _ _ _
 184
 185         See the shep -- herds _ kneel -- ing be -- fore him,
 186         See the kings on bend -- _ ed knee,
 187         See the moth -- er prais -- ing his fa -- ther,
 188         See the bless -- ed _ _ _ _ in -- _ fant sleep.
 189 }
 190
 191
 192 Riffs = \relative c'''
 193 {
 194         % Intro
 195
 196         \tiny
 197         << { \tiny a2 g } \\ { \tiny r8 a, d f c4 g } >> |   % 1
 198         << { f'2 e } \\ { a,4 d8 a bf4 g } >> |   % 2
 199         << { d'4 e8 f e4 ~ e16 d cs8 } \\ { f,2 g } >> |   % 3
 200         << { <a d>1 } \\ { g2 f  } >> |   % 4
 201
 202         s1*27 |   % 5-31
 203         s1.*2 |   % 32-33
 204         s1*3 |   % 34-35 (+ blank Coda measure)
 205
 206         << { \tiny a'2 g } \\ { \tiny r8 a, d f c4 g } >> |   % 36
 207         << { f'2 e } \\ { a,4 d8 a bf4 g } >> |   % 37
 208         <fs a d>1-\fermata |   % 38
 209         \normalsize
 210 }
 211
 212
 213 %
 214 % Chord names
 215 %
 216 Chords = \chordmode
 217 {
 218         % Intro
 219
 220         d2:m c/e |    % 1
 221         d2:m/f g:m6 |    % 2
 222         d2:m/a a:7 |    % 3
 223         d2:sus4 d:m |    % 4
 224
 225         % Verse
 226
 227         d2:m c |    % 5
 228         d2:m a:m7 |    % 6
 229         d2:m f |    % 7
 230         g2 a4:sus4 a |    % 8
 231         d2:m a:m |    % 9
 232         bf2:maj7 a:m7 |    % 10
 233         g2:m7 a:m7 |    % 11
 234         d2:m c |    % 12
 235         bf2:maj7 c |    % 13
 236         d2:sus4 d:m |    % 14
 237
 238         % Verse
 239
 240         d2:m c |    % 15
 241         bf2:maj7 a:m7 |    % 16
 242         d2:m f |    % 17
 243         g2 a4:sus4 a |    % 18
 244         d2:m a:m7 |    % 19
 245         bf2:maj7 a:m7 |    % 20
 246         g2:m7 a:m7 |    % 21
 247         d2:m7 c |    % 22
 248         bf2:maj7 c |    % 23
 249         d1:m |    % 24
 250
 251         % Bridge
 252
 253         f2 g:m/f |    % 25
 254         f2 g:m/f |    % 26
 255         f2 c/e |    % 27
 256         d4:m7 g:7 c2:sus2 |    % 28
 257         f2 g:m/f |    % 29
 258         f2 g:m/f |    % 30
 259         f2 c/e |    % 31
 260
 261         d4:m7 g:7 c1:sus2 |    % 32
 262
 263         d4:m7 g:7 c1:sus2 |    % 33
 264
 265         % Coda
 266
 267         s1   % For blank measure
 268
 269         bf2:maj7 a:m7 |    % 34
 270         g2:m7 c |    % 35
 271         d2:m c/e |    % 36
 272         d2:m/f g:m6 |    % 37
 273         d1 |    % 38
 274 }
 275
 276
 277 %
 278 % Chord rhythms
 279 %
 280 Rhythm = \relative c
 281 {
 282         \numericTimeSignature
 283         \override NoteHead #'style = #'slash
 284         \teeny
 285
 286         % Intro
 287
 288         c2 c |    % 1
 289         c2 c |    % 2
 290         c2 c |    % 3
 291         c4 c c2 |    % 4
 292
 293         % Verse
 294
 295         c4 c c c |    % 5
 296         c4 c c c |    % 6
 297         c4 c c c |    % 7
 298         c4 c c c |    % 8
 299         c4 c c c |    % 9
 300         c4 c c c |    % 10
 301         c4 c c c |    % 11
 302         c4 c c c |    % 12
 303         c4 c c c |    % 13
 304         c4 c c2 |    % 14
 305
 306         % Verse
 307
 308         c4 c c c |    % 15
 309         c4 c c c |    % 16
 310         c4 c c c |    % 17
 311         c4 c c c |    % 18
 312         c4 c c c |    % 19
 313         c4 c c c |    % 20
 314         c4 c c c |    % 21
 315         c4 c c c |    % 22
 316         c4 c c c |    % 23
 317         c4 c c c |    % 24
 318
 319         % Bridge
 320
 321         c4 c c c |    % 25
 322         c4 c c c |    % 26
 323         c4 c c c |    % 27
 324         c4 c c c |    % 28
 325         c4 c c c |    % 29
 326         c4 c c c |    % 30
 327         c4 c c c |    % 31
 328
 329         c4 c c2 ~ c2 |    % 32
 330
 331         c4 c c2 ~ c2 |    % 33
 332
 333         % Coda
 334
 335 \stopStaff s1 \startStaff   % For blank measure
 336
 337         c4 c c c |    % 34
 338         c4 c c2-\fermata |    % 35
 339         c2 c |    % 36
 340         c2 c |    % 37
 341         c1-\fermata |    % 38
 342 }
 343
 344
 345 Dynamics =
 346 {
 347 %       s1*4 |   % 1-4
 348 %       s4_\markup { \italic { 1st X: Melody, 2nd X+: Solos } } s2. |   % 5
 349 %       s1*38 |   % 1-38
 350 %       s4_\markup { \bold \italic { Double Chorus 2nd X } } s2. |   % 39
 351 %       s1*7 |   % 40-46
 352 %       s4_\markup { \bold { Tutti } } s2. |   % 47
 353 }
 354
 355
 356 \score
 357 {
 358         <<
 359                 \Global         % The "roadmap" that everything else depends on
 360                 \set Score.skipBars = ##t
 361                 \set Score.melismaBusyProperties = #'()
 362
 363                 \context Staff
 364                 <<
 365                         \new Voice = "lead" \LeadVox
 366                         \new Voice \Riffs
 367                         \new Lyrics \lyricsto "lead" \LeadVoxText
 368                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 369                 >>
 370
 371                 \new ChoirStaff
 372                 <<
 373                         \new ChordNames \Chords
 374 %Capo 4 edition
 375 %                       \new ChordNames \transpose b g \Chords
 376                         \new RhythmicStaff << \Rhythm \Dynamics >>
 377                 >>
 378         >>
 379 }
 380
 381
 382 \paper
 383 {
 384         #(define fonts (make-pango-font-tree
 385                 "Times New Roman"
 386                 "LilyJAZZText"
 387                 "Luxi Mono"
 388                 (/ staffSize 20)))
 389
 390 % Spread staves vertically across last page (default: t)
 391         ragged-last-bottom = ##f
 392 % Don't spread staves vertically across the page (default: f)
 393 %       ragged-bottom = ##t
 394 % Allow partial line for last stave (default: f)
 395         ragged-last = ##t
 396
 397 % To find out what's eating the space at the top...
 398 %       annotate-spacing = ##t
 399 }
 400