Shamusworld >> Repos - music/blob - spirit-of-the-living-god.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 "Spirit of the Living God" }
  14 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  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 f \major
  27         \numericTimeSignature
  28         \time 4/4
  29
  30         % Intro
  31
  32         s1*4 \bar ".|:-||"   % 4
  33
  34         \repeat volta 3
  35         {
  36                 % A section
  37
  38                 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  39                 s1*8 \bar "||"   % 5-12
  40
  41                 % B section
  42
  43                 \once \override Score.RehearsalMark #'self-alignment-X = #left
  44                 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  45
  46                 s1*4 \bar "||"   % 13-16
  47
  48                 % A section
  49
  50                 \mark \markup { \override #'(font-family . sans) { \box { C } } }
  51                 s1*3 |   % 17-19
  52         }
  53         \alternative
  54         {
  55                 {
  56                         s1 |   % 20
  57                 }
  58                 {
  59                         s1^\markup { \hspace #8.0 \raise #1.0 \bold { D.S. } } \bar "||"   % 21
  60                 }
  61                 {
  62                         s1 \bar "|."   % 22
  63                 }
  64         }
  65 }
  66
  67
  68 %
  69 % Lead vocal
  70 %
  71 LeadVox = \relative c''
  72 {
  73         % Intro
  74
  75         R1*4 |   % 1-4
  76
  77         % A section
  78
  79         a4. a8 a4 a |   % 5
  80         g4 a bf2 |   % 6
  81         a4. f8 f4 g |   % 7
  82         a1 |   % 8
  83
  84         a4. a8 a4 a |   % 9
  85         g4 a bf2 |   % 10
  86         a4. f8 f4 g |   % 11
  87         f1 |   % 12
  88
  89         % B section
  90
  91         bf2 bf |   % 13
  92         a2 a |   % 14
  93         b2 b |   % 15
  94         c2 c4 ( bf ) |   % 16
  95
  96         % A section
  97
  98         a4. a8 a4 a |   % 17
  99         g4 a bf2 |   % 18
 100         a4. f8 f4 g |   % 19
 101
 102         f1 |   % 20
 103
 104         f1 |   % 21
 105
 106         f1^\fermata |   % 22
 107 }
 108
 109
 110 LeadVoxText = \lyricmode
 111 {
 112         Spi- rit of the li- ving God
 113         fall a- fresh on me
 114
 115         Spi- rit of the li- ving God
 116         fall a- fresh on me.
 117
 118         Melt me, mold me,
 119         fill me, use me, __ _
 120
 121         Spi- rit of the li- ving God
 122         fall a- fresh on me.
 123
 124         me.
 125         me.
 126 }
 127
 128
 129 %
 130 % Chord names
 131 %
 132 Chords = \chordmode
 133 {
 134         % Intro
 135
 136         f2 f4:maj7 f:7 |   % 1
 137         bf4:6 d:7/a g2:m7 |   % 2
 138         f2/c bf4/c c |   % 3
 139         f2 bf/c |   % 4
 140
 141         % A section
 142
 143         f2 f4:maj7 f:7 |   % 5
 144         bf4:6 d:7/a g2:m7 |   % 6
 145         f2/c bf4/c c |   % 7
 146         f2 bf/c |   % 8
 147
 148         f2 f4:maj7 f:7 |   % 9
 149         bf4:6 d:7/a g2:m7 |   % 10
 150         f2/c bf4/c c |   % 11
 151         f2 f:7 |   % 12
 152
 153         % B section
 154
 155         bf2 g:m7 |   % 13
 156         f1 |   % 14
 157         g1:7 |   % 15
 158         c4 bf:sus2/d c2:7/e |   % 16
 159
 160         % A section
 161
 162         f2 f4:maj7 f:7 |   % 17
 163         bf4:6 d:7/a g2:m7.5- |   % 18
 164         f2/c bf4/c c |   % 19
 165
 166         f2 bf/c |   % 20
 167
 168         f2 f:7 |   % 21
 169
 170         f1 |   % 22
 171 }
 172
 173
 174 %
 175 % Chord rhythms
 176 %
 177 StaffC = \relative c
 178 {
 179         \numericTimeSignature
 180         \override NoteHead #'style = #'slash
 181         \teeny
 182
 183         % Intro
 184
 185         c4 c c c |   % 1
 186         c4 c c c |   % 2
 187         c4 c c c |   % 3
 188         c4 c c c |   % 4
 189
 190         % A section
 191
 192         c4 c c c |   % 5
 193         c4 c c c |   % 6
 194         c4 c c c |   % 7
 195         c4 c c c |   % 8
 196
 197         c4 c c c |   % 9
 198         c4 c c c |   % 10
 199         c4 c c c |   % 11
 200         c4 c c c |   % 12
 201
 202         % B section
 203
 204         c4 c c c |   % 13
 205         c4 c c c |   % 14
 206         c4 c c c |   % 15
 207         c4 c c c |   % 16
 208
 209         % A section
 210
 211         c4 c c c |   % 17
 212         c4 c c c |   % 18
 213         c4 c c c |   % 19
 214
 215         c4 c c c |   % 20
 216
 217         c4 c c c |   % 21
 218
 219         c1^\fermata |   % 22
 220 }
 221
 222
 223 \score
 224 {
 225         <<
 226                 \Global         % The "roadmap" that everything else depends on
 227
 228                 \context Staff
 229                 <<
 230                         \new Voice = "lead" \LeadVox
 231                         \new Lyrics \lyricsto "lead" \LeadVoxText
 232                 >>
 233
 234                 \new ChoirStaff
 235                 <<
 236                         \new ChordNames \Chords
 237                         \new RhythmicStaff \StaffC
 238                 >>
 239
 240                 \set Score.skipBars = ##t
 241                 \set Score.melismaBusyProperties = #'()
 242         >>
 243 }
 244
 245
 246 \paper
 247 {
 248         #(define fonts (make-pango-font-tree
 249                 "Times New Roman"
 250                 "LilyJAZZText"
 251                 "Luxi Mono"
 252                 (/ staffSize 20)))
 253
 254 % Don't spread staves vertically across last page (default: t)
 255 %       ragged-last-bottom = ##f
 256 % Don't spread staves vertically across the page (default: f)
 257 %       ragged-bottom = ##t
 258 % Allow partial line for last stave (default: f)
 259         ragged-last = ##t
 260
 261 % To find out what's eating the space at the top...
 262 %       annotate-spacing = ##t
 263 }
 264