Shamusworld >> Repos - music/blob - refiner's-fire.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 = #16
   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)
  14                 { \fontsize #3.5 "Refiner's Fire" } }
  15 %       composer = \markup { \override #'(font-family . sans) "" }
  16         arranger = \markup { \override #'(font-family . sans) "arr. Ed Smart" }
  17         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  18 }
  19
  20
  21 %
  22 % Song's structure
  23 %
  24 Global =
  25 {
  26         \clef G
  27         \key e \major
  28         \numericTimeSignature
  29         \time 4/4
  30
  31         % Intro
  32
  33         s1*4 \bar ".|:-||"   % 1-4
  34
  35         \repeat volta 2
  36         {
  37                 % Verse
  38
  39                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  40                 s1*8 \bar "||"   % 5-12
  41
  42                 % Chorus
  43
  44                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  45                 s1*13 |   % 13-25
  46         }
  47         \alternative
  48         {
  49                 {
  50                         s1*4 |   % 26-29
  51                 }
  52                 {
  53                         s1 \bar "||"   % 30
  54                 }
  55         }
  56
  57         % Outro
  58
  59         \mark \markup { \override #'(font-family . sans) { \box { C } } }
  60         s1*6 \bar "|."   % 31-36
  61 }
  62
  63
  64 %
  65 % Lead vocal
  66 %
  67 LeadVox = \relative c''
  68 {
  69         % Intro
  70
  71         R1*4 |   % 1-4
  72
  73         % Verse
  74
  75         gs4 b8 fs ~ fs4 gs |   % 5
  76         e2 e8 fs gs a |   % 6
  77         a2. r8 e |   % 7
  78         e4 ds e fs |   % 8
  79         gs4 b8 fs ~ fs4 gs |   % 9
  80         e2 e8 fs gs a |   % 10
  81         a1 |   % 11
  82         gs4. ( fs8 ) fs2 |   % 12
  83
  84         % Chorus
  85
  86         gs2 a4 gs8 fs8 ~ |   % 13
  87         fs2 r |   % 14
  88         gs4 b a gs8 fs ~ |   % 15
  89         fs2 r4 e8 b' |   % 16
  90         b1 |   % 17
  91         b8 ( fs ) fs4 r2 |   % 18
  92         b8 ( a ) gs a ~ a e ( fs ) gs ~ |   % 19
  93         gs8 fs4. r8 e e b' |   % 20
  94         b1 |   % 21
  95         b8 ( fs ) fs4 r2 |   % 22
  96         b8 ( a ) gs a ~ a e ( fs ) gs ~ |   % 23
  97         gs4 a8 gs ~ gs fs4. |   % 24
  98         a8 gs fs e ~ e ds4. |   % 25
  99
 100         e1 |   % 26
 101         R1 |   % 27
 102         R1 |   % 28
 103         R1 |   % 29
 104
 105         e1 |   % 30
 106
 107         % Outro
 108
 109         a8 gs fs e ~ e ds4. |   % 31
 110         e2 r2 |   % 32
 111         a8 gs fs e ~ e ds4. |   % 33
 112         e2 r2 |   % 34
 113         R1 |   % 35
 114         r1^\fermata |   % 36
 115 }
 116
 117
 118 LeadVoxText = \lyricmode
 119 {
 120         Pu- ri- fy _ my heart, let me be as gold
 121         and pre- cious sil- ver
 122         Pu- ri- fy _ my heart, let me be as gold
 123         pure _ gold
 124
 125         Re- fi- ner's fire _
 126         My heart's one de- sire _
 127         is to be ho- _ ly
 128         Set _ a- part _ for _ you, _ Lord
 129         I choose to be ho- _ ly
 130         Set _ a- part _ for _ you _ my mas- _ ter
 131         Rea- dy to do _ your will
 132
 133         will
 134
 135         Rea- dy to do _ your will
 136         Rea- dy to do _ your will.
 137 }
 138
 139 LeadVoxTextB = \lyricmode
 140 {
 141         Pu- ri- fy _ my heart, cleanse me from wi- thin
 142         and make me ho- ly
 143         Pu- ri- fy _ my heart, cleanse me from my sin
 144         deep wi- thin
 145 }
 146
 147
 148 %
 149 % Chord names
 150 %
 151 Chords = \chordmode
 152 {
 153         % Intro
 154
 155         e4. e8:sus4 s2 |   % 1
 156         e4. e8:sus4 s2 |   % 2
 157         e4. e8:sus4 s2 |   % 3
 158         e1 |   % 4
 159
 160         % Verse
 161
 162         e4. b8/ds s2 |   % 5
 163         cs1:m |   % 6
 164         fs1:m7 |   % 7
 165         e4/b b a/b b |   % 8
 166         e4. b8/ds s2 |   % 9
 167         cs1:m |   % 10
 168         fs1:m7 |   % 11
 169         e4./b b8 s2 |   % 12
 170
 171         % Chorus
 172
 173         e2 a4. b8 |   % 13
 174         s1 |   % 14
 175         e2 a4. b8 |   % 15
 176         s1 |   % 16
 177         e1 |   % 17
 178         b1 |   % 18
 179         e4./gs a2 e8/b |   % 19
 180         s8 b2.. |   % 20
 181         e1 |   % 21
 182         b1 |   % 22
 183         e4./gs a2 e8/b |   % 23
 184         s4. b2 s8 |   % 24
 185         fs4.:m b4:sus4 b4. |   % 25
 186
 187         e4. e8:sus4 s2 |   % 26
 188         e4. e8:sus4 s2 |   % 27
 189         e4. e8:sus4 s2 |   % 28
 190         e1 |   % 29
 191
 192         cs1:m |   % 30
 193
 194         % Outro
 195
 196         fs4.:m b4:sus4 b4. |   % 31
 197         cs1:m |   % 32
 198         fs4.:m b4:sus4 b4. |   % 33
 199         e4. e8:sus4 s2 |   % 34
 200         e4. e8:sus4 s2 |   % 35
 201         e1 |   % 36
 202 }
 203
 204
 205 %
 206 % Chord rhythms
 207 %
 208 StaffC = \relative c
 209 {
 210         \numericTimeSignature
 211         \override NoteHead #'style = #'slash
 212
 213         % Intro
 214
 215         c4. c8 ~ c4 c |   % 1
 216         c4. c8 ~ c4 c |   % 2
 217         c4. c8 ~ c4 c |   % 3
 218         c1 |   % 4
 219
 220         % Verse
 221
 222         c4. c8 ~ c4 c |   % 5
 223         c4 c c c |   % 6
 224         c4 c c c |   % 7
 225         c4 c c c |   % 8
 226         c4. c8 ~ c4 c |   % 9
 227         c4 c c c |   % 10
 228         c4 c c c |   % 11
 229         c4. c8 ~ c4 c |   % 12
 230
 231         % Chorus
 232
 233         c4 c c4. c8 ~ |   % 13
 234         c4 c c c |   % 14
 235         c4 c c4. c8 ~ |   % 15
 236         c4 c c c |   % 16
 237         c4 c c c |   % 17
 238         c4 c c c |   % 18
 239         c4. c8 ~ c4. c8 ~ |   % 19
 240         c8 c4. ~ c4 c |   % 20
 241         c4 c c c |   % 21
 242         c4 c c c |   % 22
 243         c4. c8 ~ c4. c8 ~ |   % 23
 244         c4. c8 ~ c4 c |   % 24
 245         c4. c8 ~ c c4. |   % 25
 246
 247         c4. c8 ~ c4 c |   % 26
 248         c4. c8 ~ c4 c |   % 27
 249         c4. c8 ~ c4 c |   % 28
 250         c1 |   % 29
 251
 252         c4 c c c |   % 30
 253
 254         % Outro
 255
 256         c4. c8 ~ c c4. |   % 31
 257         c4 c c c |   % 32
 258         c4. c8 ~ c c4. |   % 33
 259         c4. c8 ~ c2 |   % 34
 260         c4. c8_\markup { \italic { rit. } } ~ c2 |   % 35
 261         c1^\fermata |   % 36
 262 }
 263
 264
 265 \score
 266 {
 267         <<
 268                 \Global         % The "roadmap" that everything else depends on
 269
 270                 \context Staff
 271                 <<
 272                         \new Voice = "lead" \LeadVox
 273                         \new Lyrics \lyricsto "lead" \LeadVoxText
 274                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 275                 >>
 276
 277                 \new ChoirStaff
 278                 <<
 279                         \new ChordNames \Chords
 280                         \new RhythmicStaff \StaffC
 281                 >>
 282
 283                 \set Score.skipBars = ##t
 284                 \set Score.melismaBusyProperties = #'()
 285         >>
 286 }
 287
 288
 289 \paper
 290 {
 291         #(define fonts (make-pango-font-tree
 292                 "Times New Roman"
 293                 "LilyJAZZText"
 294                 "Luxi Mono"
 295                 (/ staffSize 20)))
 296
 297 % Spread staves vertically across last page (default: t)
 298         ragged-last-bottom = ##f
 299 % Don't spread staves vertically across the page (default: f)
 300 %       ragged-bottom = ##t
 301 % Allow partial line for last stave (default: f)
 302         ragged-last = ##t
 303
 304 % To find out what's eating the space at the top...
 305 %       annotate-spacing = ##t
 306 }
 307