]> Shamusworld >> Repos - music/blobdiff - how-great-thou-art-lead.ly
New charts "How Great Thou Art" and "In The Garden".
[music] / how-great-thou-art-lead.ly
diff --git a/how-great-thou-art-lead.ly b/how-great-thou-art-lead.ly
new file mode 100644 (file)
index 0000000..c830e56
--- /dev/null
@@ -0,0 +1,292 @@
+\version "2.21.1"
+\include "pop-chords.ly"
+\include "english.ly"
+
+% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
+staffSize = #18
+#(set-default-paper-size "letter")
+#(set-global-staff-size staffSize)
+#(ly:set-option (quote no-point-and-click))
+
+\header
+{
+       title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "How Great Thou Art" }
+%      composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
+%      poet     = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
+%      arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr." }
+       tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
+}
+
+
+%
+% Song's structure
+%
+Global =
+{
+       \key g \major
+       \numericTimeSignature
+       \time 4/4
+
+       \partial 8*3 s4. |   % 0
+       s1*4 |   % 1-4
+
+       \repeat volta 4
+       {
+               s1*8 \bar "||"   % 5-12
+               s1*7   % 13-19
+       }
+       \alternative
+       {
+               {
+                       s1 |   % 20
+               }
+               {
+                       s1 |   % 21
+               }
+       }
+
+       s1*0^\markup { \large \italic { Rit. } }
+       s1*2 \bar "|."   % 22-23
+}
+
+
+Soprano = \relative c'
+{
+       \clef G
+%      \voiceOne
+
+       s8*3 |   % 0
+       s1*3 |   % 1-3
+       s2 s8 f8 f f |   % 4
+
+       d2 r8 f8 f f |   % 5
+       g8. g16 ef8 g r g g16 g8 f16 ~ |   % 6
+       f4. d8 f f16 ef ~ ef8 ef16 d ~ |   % 7
+       d2 r8 f f f |   % 8
+       d2 r8 f8 f f |   % 9
+       g8. g16 ef8 g r g g16 g8 f16 ~ |   % 10
+       f4. d8 f f16 ef ~ ef8 ef16 d ~ |   % 11
+       d2 r8 f f bf |   % 12
+
+       d4. c8 bf8. a16 bf8. g16 |   % 13
+       f2 r8 bf bf a |   % 14
+       c,4. ef8 g4. f8 |   % 15
+       d2 r8 f f bf |   % 16
+       d4. c8 bf8. a16 bf8. g16 |   % 17
+       f2 r8 bf a bf |   % 18
+       c4. d8 ef4 a, |   % 19
+
+       bf2 r8 f f f |   % 20
+
+       bf2 r8 bf a bf |   % 21
+
+       c4. d8 ef4 a, |   % 22
+       bf1 |   % 23
+}
+
+
+VerseA = \lyricmode
+{
+       O Lord my God! when I in awe -- some won -- der
+       Con -- sid -- er all _ the worlds Thy hands _ have made, _
+       I see the stars, I hear the roll -- ing thun -- der,
+       Thy power through -- out _ the u -- ni -- verse _ dis -- played: _
+
+       Then sings my soul, my Sav -- ior God, to Thee,
+       How great Thou art, how great Thou art!
+       Then sings my soul, my Sav -- ior God, to Thee,
+       How great Thou art, how great Thou art!
+
+       When through the
+       art!
+
+       How great Thou art, how great Thou art!
+}
+
+VerseB = \lyricmode
+{
+       _ _ _ woods and for -- est glades I wan -- der
+       And hear the birds _ sing sweet -- ly in _ the trees; _
+       When I look down from loft -- y moun -- tain gran -- deur
+       And hear the brook _ and feel the gen -- _ tle breeze: _
+
+       _ _ _ _ _ _ _ _ _ _
+       _ _ _ _ _ _ _ _
+       _ _ _ _ _ _ _ _ _ _
+       _ _ _ _ _ _ _ _
+
+       And when I
+}
+
+VerseC = \lyricmode
+{
+       _ _ _ think that God, His Son not spar -- ing,
+       Sent Him to die, _ I scarce can take _ it in, _
+       That on the cross, my bur -- den glad -- ly bear -- ing,
+       He bled and died _ to take a -- way _ my sin; _
+
+       _ _ _ _ _ _ _ _ _ _
+       _ _ _ _ _ _ _ _
+       _ _ _ _ _ _ _ _ _ _
+       _ _ _ _ _ _ _ _
+
+       When Christ shall
+}
+
+VerseD = \lyricmode
+{
+       _ _ _ come with shout of ac -- cla -- ma -- tion
+       And take me home; _ what joy shall fill _ my heart! _
+       Then I shall bow in hum -- ble ad -- o -- ra -- tion,
+       And there pro -- claim, _ my God how great _ Thou art! _
+}
+
+
+%
+% Instrumental lines
+%
+RhythmB = \relative c'
+{
+       \clef G
+       \tiny
+
+       % Intro
+
+       f8 f bf |   % 0
+       d4. c8 bf8. a16 bf8. g16 |   % 1
+       f2 r8 bf a16 bf8. |   % 2
+       c4. d8 ef4 a, |   % 3
+       bf2 r8 s4. |   % 4
+}
+
+
+%
+% Chord names
+%
+Chords = \chordmode
+{
+       % Intro
+
+       s8*3 |   % 0
+       bf2 ef |   % 1
+       bf1 |   % 2
+       f2:7 c4:m7 f:7 |   % 3
+       bf2 ef |   % 4
+
+       bf1 |   % 5
+       ef2 e:dim7 |   % 6
+       bf2 f4 ef |   % 7
+       bf2 ef |   % 8
+       bf1 |   % 9
+       ef2 e:dim7 |   % 10
+       bf2 f4 ef |   % 11
+       bf2 f:7 |   % 12
+
+       bf2 ef |   % 13
+       bf1 |   % 14
+       f2 ef |   % 15
+       bf2 f:7 |   % 16
+       bf2 ef |   % 17
+       bf1 |   % 18
+       f2:7 c4:m7 f:7 |   % 19
+       bf2 ef |   % 20
+
+       bf1 |   % 21
+
+       f2:7 c4:m7 f:7 |   % 22
+       bf1 |   % 23
+}
+
+
+%
+% Chord rhythms
+%
+StaffC = \relative c
+{
+       \numericTimeSignature
+       \override NoteHead #'style = #'slash
+       \teeny
+
+       % Intro
+
+       s8*3 |   % 0
+       \stemDown c4 c c c |   % 1
+       c4 c c c |   % 2
+       c4 c c c |   % 3
+       c4 c c c |   % 4
+
+       % Verse
+
+       c4 c c c |   % 5
+       c4 c c c |   % 6
+       c4 c c c |   % 7
+       c4 c c c |   % 8
+       c4 c c c |   % 9
+       c4 c c c |   % 10
+       c4 c c c |   % 11
+       c4 c c c |   % 12
+
+       % Chorus
+
+       c4 c c c |   % 13
+       c4 c c c |   % 14
+       c4 c c c |   % 15
+       c4 c c c |   % 16
+       c4 c c c |   % 17
+       c4 c c c |   % 18
+       c4 c c c |   % 19
+
+       c4 c c c |   % 20
+
+       c4 c c c |   % 21
+
+       c4 c c c |   % 22
+       c1 |   % 23
+}
+
+
+\score
+{
+       <<
+               \Global
+
+               \context Staff
+               <<
+                       \new Voice = "vA" \transpose bf g \Soprano
+                       \new Lyrics \lyricsto "vA" \VerseA
+                       \new Lyrics \lyricsto "vA" \VerseB
+                       \new Lyrics \lyricsto "vA" \VerseC
+                       \new Lyrics \lyricsto "vA" \VerseD
+                       \new Voice \transpose bf g \RhythmB
+               >>
+
+               \new ChoirStaff
+               <<
+                       \new ChordNames \transpose bf g \Chords
+                       \new RhythmicStaff \StaffC
+               >>
+
+               \set Score.skipBars = ##t
+               \set Score.melismaBusyProperties = #'()
+       >>
+}
+
+
+\paper
+{
+       #(define fonts (make-pango-font-tree
+               "Times New Roman"
+               "LilyJazz Text"
+               "Luxi Mono"
+               (/ staffSize 20)))
+
+% Spread staves vertically across last page (default: t)
+%      ragged-last-bottom = ##f
+% Don't spread staves vertically across the page (default: f)
+%      ragged-bottom = ##t
+% Allow partial line for last stave (default: f)
+       ragged-last = ##t
+
+% To find out what's eating the space at the top...
+%      annotate-spacing = ##t
+}