Shamusworld >> Repos - music/blob - how-great-thou-art-lead.ly

   1 \version "2.21.1"
   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 "How Great Thou Art" }
  14 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  15 %       poet     = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  16 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr." }
  17         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  18 }
  19
  20
  21 %
  22 % Song's structure
  23 %
  24 Global =
  25 {
  26         \key g \major
  27         \numericTimeSignature
  28         \time 4/4
  29
  30         \partial 8*3 s4. |   % 0
  31         s1*4 |   % 1-4
  32
  33         \repeat volta 4
  34         {
  35                 s1*8 \bar "||"   % 5-12
  36                 s1*7   % 13-19
  37         }
  38         \alternative
  39         {
  40                 {
  41                         s1 |   % 20
  42                 }
  43                 {
  44                         s1 |   % 21
  45                 }
  46         }
  47
  48         s1*0^\markup { \large \italic { Rit. } }
  49         s1*2 \bar "|."   % 22-23
  50 }
  51
  52
  53 Soprano = \relative c'
  54 {
  55         \clef G
  56 %       \voiceOne
  57
  58         s8*3 |   % 0
  59         s1*3 |   % 1-3
  60         s2 s8 f8 f f |   % 4
  61
  62         d2 r8 f8 f f |   % 5
  63         g8. g16 ef8 g r g g16 g8 f16 ~ |   % 6
  64         f4. d8 f f16 ef ~ ef8 ef16 d ~ |   % 7
  65         d2 r8 f f f |   % 8
  66         d2 r8 f8 f f |   % 9
  67         g8. g16 ef8 g r g g16 g8 f16 ~ |   % 10
  68         f4. d8 f f16 ef ~ ef8 ef16 d ~ |   % 11
  69         d2 r8 f f bf |   % 12
  70
  71         d4. c8 bf8. a16 bf8. g16 |   % 13
  72         f2 r8 bf bf a |   % 14
  73         c,4. ef8 g4. f8 |   % 15
  74         d2 r8 f f bf |   % 16
  75         d4. c8 bf8. a16 bf8. g16 |   % 17
  76         f2 r8 bf a bf |   % 18
  77         c4. d8 ef4 a, |   % 19
  78
  79         bf2 r8 f f f |   % 20
  80
  81         bf2 r8 bf a bf |   % 21
  82
  83         c4. d8 ef4 a, |   % 22
  84         bf1 |   % 23
  85 }
  86
  87
  88 VerseA = \lyricmode
  89 {
  90         O Lord my God! when I in awe -- some won -- der
  91         Con -- sid -- er all _ the worlds Thy hands _ have made, _
  92         I see the stars, I hear the roll -- ing thun -- der,
  93         Thy power through -- out _ the u -- ni -- verse _ dis -- played: _
  94
  95         Then sings my soul, my Sav -- ior God, to Thee,
  96         How great Thou art, how great Thou art!
  97         Then sings my soul, my Sav -- ior God, to Thee,
  98         How great Thou art, how great Thou art!
  99
 100         When through the
 101         art!
 102
 103         How great Thou art, how great Thou art!
 104 }
 105
 106 VerseB = \lyricmode
 107 {
 108         _ _ _ woods and for -- est glades I wan -- der
 109         And hear the birds _ sing sweet -- ly in _ the trees; _
 110         When I look down from loft -- y moun -- tain gran -- deur
 111         And hear the brook _ and feel the gen -- _ tle breeze: _
 112
 113         _ _ _ _ _ _ _ _ _ _
 114         _ _ _ _ _ _ _ _
 115         _ _ _ _ _ _ _ _ _ _
 116         _ _ _ _ _ _ _ _
 117
 118         And when I
 119 }
 120
 121 VerseC = \lyricmode
 122 {
 123         _ _ _ think that God, His Son not spar -- ing,
 124         Sent Him to die, _ I scarce can take _ it in, _
 125         That on the cross, my bur -- den glad -- ly bear -- ing,
 126         He bled and died _ to take a -- way _ my sin; _
 127
 128         _ _ _ _ _ _ _ _ _ _
 129         _ _ _ _ _ _ _ _
 130         _ _ _ _ _ _ _ _ _ _
 131         _ _ _ _ _ _ _ _
 132
 133         When Christ shall
 134 }
 135
 136 VerseD = \lyricmode
 137 {
 138         _ _ _ come with shout of ac -- cla -- ma -- tion
 139         And take me home; _ what joy shall fill _ my heart! _
 140         Then I shall bow in hum -- ble ad -- o -- ra -- tion,
 141         And there pro -- claim, _ my God how great _ Thou art! _
 142 }
 143
 144
 145 %
 146 % Instrumental lines
 147 %
 148 RhythmB = \relative c'
 149 {
 150         \clef G
 151         \tiny
 152
 153         % Intro
 154
 155         f8 f bf |   % 0
 156         d4. c8 bf8. a16 bf8. g16 |   % 1
 157         f2 r8 bf a16 bf8. |   % 2
 158         c4. d8 ef4 a, |   % 3
 159         bf2 r8 s4. |   % 4
 160 }
 161
 162
 163 %
 164 % Chord names
 165 %
 166 Chords = \chordmode
 167 {
 168         % Intro
 169
 170         s8*3 |   % 0
 171         bf2 ef |   % 1
 172         bf1 |   % 2
 173         f2:7 c4:m7 f:7 |   % 3
 174         bf2 ef |   % 4
 175
 176         bf1 |   % 5
 177         ef2 e:dim7 |   % 6
 178         bf2 f4 ef |   % 7
 179         bf2 ef |   % 8
 180         bf1 |   % 9
 181         ef2 e:dim7 |   % 10
 182         bf2 f4 ef |   % 11
 183         bf2 f:7 |   % 12
 184
 185         bf2 ef |   % 13
 186         bf1 |   % 14
 187         f2 ef |   % 15
 188         bf2 f:7 |   % 16
 189         bf2 ef |   % 17
 190         bf1 |   % 18
 191         f2:7 c4:m7 f:7 |   % 19
 192         bf2 ef |   % 20
 193
 194         bf1 |   % 21
 195
 196         f2:7 c4:m7 f:7 |   % 22
 197         bf1 |   % 23
 198 }
 199
 200
 201 %
 202 % Chord rhythms
 203 %
 204 StaffC = \relative c
 205 {
 206         \numericTimeSignature
 207         \override NoteHead #'style = #'slash
 208         \teeny
 209
 210         % Intro
 211
 212         s8*3 |   % 0
 213         \stemDown c4 c c c |   % 1
 214         c4 c c c |   % 2
 215         c4 c c c |   % 3
 216         c4 c c c |   % 4
 217
 218         % Verse
 219
 220         c4 c c c |   % 5
 221         c4 c c c |   % 6
 222         c4 c c c |   % 7
 223         c4 c c c |   % 8
 224         c4 c c c |   % 9
 225         c4 c c c |   % 10
 226         c4 c c c |   % 11
 227         c4 c c c |   % 12
 228
 229         % Chorus
 230
 231         c4 c c c |   % 13
 232         c4 c c c |   % 14
 233         c4 c c c |   % 15
 234         c4 c c c |   % 16
 235         c4 c c c |   % 17
 236         c4 c c c |   % 18
 237         c4 c c c |   % 19
 238
 239         c4 c c c |   % 20
 240
 241         c4 c c c |   % 21
 242
 243         c4 c c c |   % 22
 244         c1 |   % 23
 245 }
 246
 247
 248 \score
 249 {
 250         <<
 251                 \Global
 252
 253                 \context Staff
 254                 <<
 255                         \new Voice = "vA" \transpose bf g \Soprano
 256                         \new Lyrics \lyricsto "vA" \VerseA
 257                         \new Lyrics \lyricsto "vA" \VerseB
 258                         \new Lyrics \lyricsto "vA" \VerseC
 259                         \new Lyrics \lyricsto "vA" \VerseD
 260                         \new Voice \transpose bf g \RhythmB
 261                 >>
 262
 263                 \new ChoirStaff
 264                 <<
 265                         \new ChordNames \transpose bf g \Chords
 266                         \new RhythmicStaff \StaffC
 267                 >>
 268
 269                 \set Score.skipBars = ##t
 270                 \set Score.melismaBusyProperties = #'()
 271         >>
 272 }
 273
 274
 275 \paper
 276 {
 277         #(define fonts (make-pango-font-tree
 278                 "Times New Roman"
 279                 "LilyJazz Text"
 280                 "Luxi Mono"
 281                 (/ staffSize 20)))
 282
 283 % Spread staves vertically across last page (default: t)
 284 %       ragged-last-bottom = ##f
 285 % Don't spread staves vertically across the page (default: f)
 286 %       ragged-bottom = ##t
 287 % Allow partial line for last stave (default: f)
 288         ragged-last = ##t
 289
 290 % To find out what's eating the space at the top...
 291 %       annotate-spacing = ##t
 292 }