Shamusworld >> Repos - music/blob - there's-a-sweet-sweet-spirit.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 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
  12
  13 \header
  14 {
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "There’s A Sweet, Sweet Spirit" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Doris Akers" }
  17 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  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.5 (ly:music-property arg 'tweaks))) arg)
  28
  29
  30 %
  31 % Song's structure
  32 %
  33 Global =
  34 {
  35         \key g \major
  36         \numericTimeSignature
  37         \time 4/4
  38
  39         % Intro
  40
  41 %       \once \override TextScript #'padding = #2.0
  42 %       s1*0^\markup { \large \bold { Moderately fast pop } }
  43 %%Capo 3 version
  44 %%      s1*0^\markup { \large \bold { Moderately fast pop "(*** CAPO 3 ***)" } }
  45 %       s1*13 \bar "||:"   % 1-13
  46
  47         s1 |   % 1
  48
  49         \repeat volta 3
  50         {
  51                 % A section
  52
  53                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  54
  55 %               s1*7 |   % 2-8
  56                 s1*2 |   % 2-3
  57 s2 s^\markup { \fret-diagram-terse #"x;2;3;2;3;x;" }
  58                 s1*4 |   % 5-8
  59
  60                 s1 \bar "||"   % 9
  61                 s1*7 |   % 10-16
  62                 s1 \bar "||"   % 17
  63
  64                 % B section
  65
  66                 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  67
  68                 s1*17 |   % 18-34
  69         }
  70 }
  71
  72
  73 %
  74 % Lead vocal
  75 %
  76 LeadVox = \relative c'
  77 {
  78         % Lead in
  79
  80         r2 b4 c |   % 1
  81
  82         % A section
  83
  84         d2 g |   % 2
  85         e4 d g a |   % 3
  86         b1 ~ |   % 4
  87         b2 b4 d |   % 5
  88         c4. c8 b4 a |   % 6
  89         g8 ( e ) d4 fs8 ( g ) a4 |   % 7
  90         g1 ~ |   % 8
  91         g2 b,4 c |   % 9
  92
  93         d2 g |   % 10
  94         e4 d g a |   % 11
  95         b1 ~ |   % 12
  96         b2 b4 d |   % 13
  97         c4. c8 b4 a |   % 14
  98         g8 ( e ) d4 fs8 ( g ) a4 |   % 15
  99         g1 ~ |   % 16
 100         g1 |   % 17
 101
 102         % B section
 103
 104         d'2 b4 e |   % 18
 105         d4 d2 r4 |   % 19
 106         d2 b8 b e4 |   % 20
 107         d2. r4 |   % 21
 108         b2 b4 a |   % 22
 109         b8 ( a ) g2. |   % 23
 110         b8 a g4 b8 ( a ) g4 |   % 24
 111         a2. r4 |   % 25
 112
 113         d2 b4 e |   % 26
 114         d4 d2 g,4 |   % 27
 115         b4 b b a |   % 28
 116         g2 ~ g8 e g a |   % 29
 117         b4 a8 g ~ g e g a |   % 30
 118         b4 a8 g ~ g4 a4 |   % 31
 119         b4 g g a |   % 32
 120         g1 ~ |   % 33
 121         g4 r b, c |   % 34
 122 }
 123
 124 LeadVoxText = \lyricmode
 125 {
 126         There’s a sweet, sweet spir -- it in this place, _
 127         And I know that it’s the spir -- _ it of _ the Lord; _
 128         There are sweet ex -- pres -- sions on each face, _
 129         And I know they feel the pres -- _ ense of _ the Lord. _
 130
 131         Sweet Ho -- ly Spir -- it, Sweet hea -- ven -- ly dove,
 132         Stay right here with _ us, Fill -- ing us with _ your love;
 133         And for these bless -- ings We lift our hearts in praise; _
 134         With -- out a doubt we’ll know _
 135         that we have been re -- vived, _
 136         When we shall leave this place. _
 137
 138         There are
 139 }
 140
 141 LeadVoxTextB = \lyricmode
 142 {
 143         _ _
 144
 145         bless -- ings you can -- not re -- ceive _
 146         ’Til you know him in his full -- _ ness and _ be -- lieve; _
 147         You’re the one to prof -- it when you say, _
 148         “I am going to walk with Je -- _ sus all _ the way.” _
 149
 150         _ _ _ _ _ _ _ _ _ _
 151         _ _ _ _ _ _ _ _ _ _ _ _ _
 152         _ _ _ _ _ _ _ _ _ _ _ _
 153         _ _ _ _ _ _ _
 154         _ _ _ _ _ _ _
 155         _ _ _ _ _ _ _
 156
 157         If you
 158 }
 159
 160 LeadVoxTextC = \lyricmode
 161 {
 162         _ _
 163
 164         say he saved you from your sin, _
 165         Now you’re weak you’re bound and can -- _ not en -- _ ter in; _
 166         You can make it right if you will yield, _
 167         You’ll en -- joy the Ho -- ly Spir -- _ it that _ we feel.
 168 }
 169
 170
 171 %
 172 % Riffs
 173 %
 174 Riffs = \relative c''
 175 {
 176 %{
 177         % Intro
 178
 179         \tiny
 180         R1 |   % 1
 181         R1 |   % 2
 182         R1 |   % 3
 183         R1 |   % 4
 184
 185         c8 ( f ) ~ f2. |   % 5
 186         e2 ~ e8 a4. |   % 6
 187         d,1 ( |   % 7
 188         c1 ) |   % 8
 189         bf4 ( df2. ) |   % 9
 190         df4 ( e2. ) |   % 10
 191         ef1 |   % 11
 192         d8 ef4 f8 ~ f4 bf-. |   % 12
 193         d,2 s2 |   % 13
 194
 195         s1*36 |   % 14-49
 196         s2 |   % 50
 197         s1*32 |   % 51-82
 198         r8 df df df df ( c ) bf4 |   % 83
 199         R1*8 |   % 84-91
 200         \normalsize
 201 %}
 202 }
 203
 204
 205 %
 206 % Chord names
 207 %
 208 Chords = \chordmode
 209 {
 210         % Lead in
 211
 212         s1 |   % 1
 213
 214         % A section
 215
 216         g1 |   % 2
 217         c1 |   % 3
 218         g2 b:m7.5-/f |   % 4
 219         e1:7 |   % 5
 220         a2:m a4:m/b a:m/c |   % 6
 221         g2/d d:7 |   % 7
 222         g2 c |   % 8
 223         g1 |   % 9
 224
 225         g1 |   % 10
 226         c1 |   % 11
 227         g2 b:m7.5-/f |   % 12
 228         e1:7 |   % 13
 229         a2:m a4:m/b a:m/c |   % 14
 230         g2/d d:7 |   % 15
 231         g2 c |   % 16
 232         g1 |   % 17
 233
 234         % B section
 235
 236         g2 c/g |   % 18
 237         g1 |   % 19
 238         g2 c/g |   % 20
 239         g1 |   % 21
 240         g2 b:7 |   % 22
 241         e1:m7 |   % 23
 242         a2:7 a:7/cs |   % 24
 243         d2 d:7 |   % 25
 244
 245         g2 c/g |   % 26
 246         g1 |   % 27
 247         g2 b:7 |   % 28
 248         e1:m7 |   % 29
 249         g4. e2:m7 s8 |   % 30
 250         g4. e2:m7 s8 |   % 31
 251         a2:9 c/d |   % 32
 252         g1 |   % 33
 253         s1 |   % 34
 254 }
 255
 256
 257 %
 258 % Chord rhythms
 259 %
 260 Rhythm =
 261 {
 262         \numericTimeSignature
 263         \override NoteHead #'style = #'slash
 264         \teeny
 265
 266         % Lead in
 267
 268         r1 |   % 1
 269
 270         % A section
 271
 272         c4 c c c |   % 2
 273         c4 c c c |   % 3
 274         c4 c c c |   % 4
 275         c4 c c c |   % 5
 276         c4 c c c |   % 6
 277         c4 c c c |   % 7
 278         c4 c c c |   % 8
 279         c4 c c c |   % 9
 280
 281         c4 c c c |   % 10
 282         c4 c c c |   % 11
 283         c4 c c c |   % 12
 284         c4 c c c |   % 13
 285         c4 c c c |   % 14
 286         c4 c c c |   % 15
 287         c4 c c c |   % 16
 288         c4 c c c |   % 17
 289
 290         % B section
 291
 292         c4 c c c |   % 18
 293         c4 c c c |   % 19
 294         c4 c c c |   % 20
 295         c4 c c c |   % 21
 296         c4 c c c |   % 22
 297         c4 c c c |   % 23
 298         c4 c c c |   % 24
 299         c4 c c c |   % 25
 300
 301         c4 c c c |   % 26
 302         c4 c c c |   % 27
 303         c4 c c c |   % 28
 304         c4 c c c |   % 29
 305         c4 c8 c ~ c4 c |   % 30
 306         c4 c8 c ~ c4 c |   % 31
 307         c4 c c c |   % 32
 308         c4 c c c |   % 33
 309         c4 c c c |   % 34
 310 }
 311
 312 Dynamics =
 313 {
 314 %{
 315         % Intro
 316         s4_\markup { \italic { Ac. gtr only } } s2. |   % 1
 317
 318         s1*3 |   % 2-4
 319
 320         s4_\markup { \italic { Band in } } s2. |   % 5
 321 %}
 322 }
 323
 324
 325 \score
 326 {
 327         <<
 328                 \Global         % The "roadmap" that everything else depends on
 329
 330                 \context Staff
 331                 <<
 332                         \new Voice = "lead" \LeadVox
 333                         \new Voice \Riffs
 334                         \new Lyrics \lyricsto "lead" \LeadVoxText
 335                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 336                         \new Lyrics \lyricsto "lead" \LeadVoxTextC
 337                 >>
 338
 339                 \new ChoirStaff
 340                 <<
 341                         \new ChordNames \Chords
 342 %Capo 3 edition
 343 %                       \new ChordNames \transpose f d \Chords
 344                         \new RhythmicStaff << \Rhythm \Dynamics >>
 345                 >>
 346
 347                 \set Score.skipBars = ##t
 348                 \set Score.melismaBusyProperties = #'()
 349         >>
 350 }
 351
 352
 353 \paper
 354 {
 355         #(define fonts (make-pango-font-tree
 356                 "Times New Roman"
 357                 "LilyJAZZText"
 358                 "Luxi Mono"
 359                 (/ staffSize 20)))
 360
 361 % Spread staves vertically across last page (default: t)
 362 %       ragged-last-bottom = ##f
 363 % Don't spread staves vertically across the page (default: f)
 364 %       ragged-bottom = ##t
 365 % Allow partial line for last stave (default: f)
 366 %       ragged-last = ##t
 367
 368 % To find out what's eating the space at the top...
 369 %       annotate-spacing = ##t
 370 }
 371