]> Shamusworld >> Repos - music/blobdiff - how-great-thou-art-hymnal.ly
New charts "How Great Thou Art" and "In The Garden".
[music] / how-great-thou-art-hymnal.ly
diff --git a/how-great-thou-art-hymnal.ly b/how-great-thou-art-hymnal.ly
new file mode 100644 (file)
index 0000000..a0ebe05
--- /dev/null
@@ -0,0 +1,236 @@
+\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 bf \major
+       \numericTimeSignature
+       \time 4/4
+
+       \partial 8*3 s4. |   % 0
+       s1*8 \bar "||"   % 1-8
+       s1*7   % 9-15
+       \partial 8*5 s2 s8 \bar "|."   % 16
+}
+
+
+Soprano = \relative c'
+{
+       \clef G
+       \voiceOne
+
+       f8 f f |   % 0
+       d4. f8 f f g g |   % 1
+       ef4 g4. g8 g g |   % 2
+       f4. d8 f f ef ef |   % 3
+       d2 ~ d8 f f f |   % 4
+       d4. f8 f f g g |   % 5
+       ef4 g4. g8 g g |   % 6
+       f4. d8 f f ef ef |   % 7
+       d2 ~ d8 f f bf |   % 8
+
+       d4. c8 bf a bf8. g16 |   % 9
+       f2 ~ f8 bf bf a |   % 10
+       c,2 ~ c8 ef g f |   % 11
+       d2 ~ d8 f f bf |   % 12
+       d4. c8 bf a bf8. g16 |   % 13
+       f2 ~ f8 bf a bf |   % 14
+       c2 ~ c8 d ef a, |   % 15
+       bf2 ~ bf8 |   % 16
+}
+
+Alto = \relative c'
+{
+       \clef G
+       \voiceTwo
+
+       d8 d d |   % 0
+       bf4. d8 ef bf ef ef |   % 1
+       bf4 ef4. ef8 d cs |   % 2
+       d4. bf8 d d c a |   % 3
+       bf2 ~ bf8 d d d |   % 4
+       bf4. d8 ef bf ef ef |   % 5
+       bf4 ef4. ef8 d cs |   % 6
+       d4. bf8 d d c a |   % 7
+       bf2 ~ bf8 d d d |   % 8
+
+       f4. af8 g fs g8. ef16 |   % 9
+       d2 ~ d8 d d ef |   % 10
+       a,2 ~ a8 c ef c |   % 11
+       bf2 ~ bf8 d d d |   % 12
+       f4. af8 g fs g8. ef16 |   % 13
+       d2 ~ d8 d ef f |   % 14
+       g2 ~ g8 g g ef |   % 15
+       d2 ~ d8 |   % 16
+}
+
+Tenor = \relative c'
+{
+       \clef F
+       \voiceThree
+
+       bf8 bf bf |   % 0
+       f4. bf8 a f bf bf |   % 1
+       g4 bf4. bf8 bf bf |   % 2
+       bf4. f8 a a g f |   % 3
+       f2 ~ f8 bf bf bf |   % 4
+       f4. bf8 a f bf bf |   % 5
+       g4 bf4. bf8 bf bf |   % 6
+       bf4. f8 a a g f |   % 7
+       f2 ~ f8 bf8 bf bf |   % 8
+
+       bf4. bf8 ef ef ef8. bf16 |   % 9
+       bf2 ~ bf8 f f c' |   % 10
+       f,2 ~ f8 a bf a |   % 11
+       f2 ~ f8 bf bf bf |   % 12
+       bf4. bf8 ef ef ef8. bf16 |   % 13
+       bf2 ~ bf8 bf f bf |   % 14
+       bf2 ~ bf8 b c c |   % 15
+       bf2 ~ bf8 |   % 16
+}
+
+Bass = \relative c
+{
+       \clef F
+       \voiceFour
+
+       bf8 bf bf |   % 0
+       bf4. bf8 c d ef ef |   % 1
+       ef4 ef4. ef8 e e |   % 2
+       f4. f8 f, f f f |   % 3
+       bf2 ~ bf8 bf bf bf |   % 4
+       bf4. bf8 c d ef ef |   % 5
+       ef4 ef4. ef8 e e |   % 6
+       f4. f8 f, f f f |   % 7
+       bf2 ~ bf8 bf bf bf |   % 8
+
+       bf4. d8 ef ef ef8. ef16 |   % 9
+       bf2 ~ bf8 bf f' f |   % 10
+       f,2 ~ f8 f g a |   % 11
+       bf2 ~ bf8 bf bf bf |   % 12
+       bf4. d8 ef ef ef8. ef16 |   % 13
+       bf2 ~ bf8 bf c d |   % 14
+       ef2 ~ ef8 d c f |   % 15
+       bf,2 ~ bf8 |   % 16
+}
+
+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 starts, 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! _
+}
+
+VerseB = \lyricmode
+{
+       When through the 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: _
+}
+
+VerseC = \lyricmode
+{
+       And when I 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; _
+}
+
+VerseD = \lyricmode
+{
+       When Christ shall 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! _
+}
+
+
+\score
+{
+       <<
+               \context Staff
+               <<
+                       \Global
+                       \new Voice = "vA" \Soprano
+                       \new Voice = "vB" \Alto
+                       \new Lyrics \lyricsto "vA" \VerseA
+                       \new Lyrics \lyricsto "vA" \VerseB
+                       \new Lyrics \lyricsto "vA" \VerseC
+                       \new Lyrics \lyricsto "vA" \VerseD
+               >>
+
+               <<
+                       \new Staff = leadStaffB
+                       {
+                               <<
+                                       \Global
+                                       \new Voice = "vC" \Tenor
+                                       \new Voice = "vD" \Bass
+                               >>
+                       }
+               >>
+
+               \set Score.skipBars = ##t
+               \set Score.melismaBusyProperties = #'()
+       >>
+
+%{    \midi
+       {
+               \tempo 4 = 80
+               %% Remove the dynamics from the midi output
+               \context
+               {
+                       \Voice
+                       \remove "Dynamic_performer"
+                       \remove "Span_dynamic_performer"
+               }
+       }
+%}
+}
+
+
+\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
+}