Shamusworld >> Repos - music/blob - this-is-my-father's-world-satb.ly

   1 \version "2.16.0"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20
   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 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
  12
  13 \header
  14 {
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "This Is My Father’s World" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "TERRA BEATA: S. M. D." }
  17 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" }
  18         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  19 }
  20
  21
  22 %
  23 % Lead vocal
  24 %
  25
  26 LeadVox = \relative c'
  27 {
  28         \set Staff.instrumentName = #"Sop."
  29         \clef G
  30         \key ef \major
  31         \override Staff.TimeSignature #'style = #'()
  32         \time 4/4
  33 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
  34
  35         % Verse
  36
  37         \partial 4 ef8 f |   % 0
  38         g4 bf g f |   % 1
  39         ef2. f8 g |   % 2
  40         af4 c bf g |   % 3
  41         f2. c'4 |   % 4
  42
  43         bf4 g g f8 ef |   % 5
  44         g4 f ef bf |   % 6
  45         ef8 f g4 bf f8 g |   % 7
  46         ef2. bf'4 |   % 8
  47
  48         ef4 bf c d |   % 9
  49         ef2. ef8 d |   % 10
  50         c4 ef d c |   % 11
  51         bf2. c8 ~ c |   % 12
  52
  53         bf4 g g f8 ef |   % 13
  54         g4 f ef bf |   % 14
  55         ef8 f g4 bf f8 ( g ) |   % 15
  56 %       \partial 2.
  57         ef2. \bar "|."   % 16
  58 }
  59
  60 AltoVox = \relative c'
  61 {
  62         \set Staff.instrumentName = #"Alto"
  63         \clef G
  64         \key ef \major
  65         \override Staff.TimeSignature #'style = #'()
  66         \time 4/4
  67 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
  68
  69         % Verse
  70
  71         \partial 4 ef4 |   % 0
  72         ef4 ef ef d |   % 1
  73         ef2. ef4 |   % 2
  74         f4 f f ef |   % 3
  75         d2. d4 |   % 4
  76
  77         ef4 ef d c |   % 5
  78         d4 b c bf |   % 6
  79         ef4 ef ef d |   % 7
  80         ef2. d4 |   % 8
  81
  82         ef4 g af af |   % 9
  83         g2. ef4 |   % 10
  84         ef4 ef ef ef |   % 11
  85         ef2. d8 ~ d |   % 12
  86
  87         ef4 ef d d8 ( ef ) |   % 13
  88         b4 d c bf |   % 14
  89         ef4 ef ef d8 ~ d |   % 15
  90 %       \partial 2.
  91         ef2. |   % 16
  92 }
  93
  94 TenorVox = \relative c'
  95 {
  96         \set Staff.instrumentName = #"Tenor"
  97         \clef F
  98         \key ef \major
  99         \override Staff.TimeSignature #'style = #'()
 100         \time 4/4
 101 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
 102
 103         % Verse
 104
 105         \partial 4 g8 af |   % 0
 106         bf4 bf bf af |   % 1
 107         g2. c4 |   % 2
 108         c4 af f g8 af |   % 3
 109         bf2. bf4 |   % 4
 110
 111         bf4 bf b g |   % 5
 112         g4 g g af |   % 6
 113         g8 af bf4 bf af |   % 7
 114         g2. bf8 af |   % 8
 115
 116         g4 bf af bf |   % 9
 117         bf2. bf4 |   % 10
 118         af4 c bf af |   % 11
 119         g2. af8 ~ af |   % 12
 120
 121         g4 bf g g8 ~ g |   % 13
 122         g4 g g f |   % 14
 123         g8 af bf4 bf af8 ( bf ) |   % 15
 124 %       \partial 2.
 125         g2. |   % 16
 126 }
 127
 128 BassVox = \relative c
 129 {
 130         \set Staff.instrumentName = #"Bass"
 131         \clef F
 132         \key ef \major
 133         \override Staff.TimeSignature #'style = #'()
 134         \time 4/4
 135 %\override Score.SpacingSpanner #'average-spacing-wishes = ##f
 136
 137         % Verse
 138
 139         \partial 4 ef4 |   % 0
 140         ef4 g, bf bf |   % 1
 141         c2. af'8 g |   % 2
 142         f4 ef d ef |   % 3
 143         bf2. af'4 |   % 4
 144
 145         g4 ef g, c |   % 5
 146         b4 g c f |   % 6
 147         ef4 ef g, bf |   % 7
 148         ef2. bf4 |   % 8
 149
 150         ef4 ef af f |   % 9
 151         ef2. g,4 |   % 10
 152         af4 af' af af |   % 11
 153         ef2. bf8 ~ bf |   % 12
 154
 155         ef4 ef b c8 ~ c |   % 13
 156         g4 b c d |   % 14
 157         ef4 ef g, bf8 ~ bf |   % 15
 158 %       \partial 2.
 159         ef2. |   % 16
 160 }
 161
 162 LeadVoxText = \lyricmode
 163 {
 164         This _ is my Fa -- ther’s world,
 165         And _ to my lis -- tening ears
 166         All na -- ture sings, and _ round me rings
 167         The mu -- _ sic of the _ spheres.
 168
 169         This is my Fa -- ther’s World:
 170         I _ rest me in the thought
 171         Of _ rock and trees, of _ skies and seas;
 172         His hand _ the won -- ders _ wrought.
 173 }
 174
 175 LeadVoxTextB = \lyricmode
 176 {
 177         This _ is my Fa -- ther’s world,
 178         The _ birds their car -- ols raise,
 179         The morn -- ing light, the _ li -- ly white
 180         De -- clare _ their Mak -- er’s _ praise.
 181
 182         This is my Fa -- ther’s World:
 183         He _ shines in all that’s fair
 184         In the rus -- tling grass I _ hear Him pass,
 185         He speaks _ to me ev -- ery -- where.
 186 }
 187
 188 LeadVoxTextC = \lyricmode
 189 {
 190         This _ is my Fa -- ther’s world,
 191         Oh _ let me ne’er for -- get
 192         That though the wrong seems _ oft so strong,
 193         God is _ the rul -- er _ yet.
 194
 195         This is my Fa -- ther’s World:
 196         The _ bat -- tle is not done;
 197         Je -- _ sus who died shall be sat -- is -- fied,
 198         And earth _ and heav’n be _ one.
 199 }
 200
 201
 202 Dynamics =
 203 {
 204 %{
 205         s4_\markup { \italic { snare on 4, bass 8th notes } } s2. |   % 1
 206         s1*26 |   % 2-27
 207         s2 s4 \< s |   % 28
 208         s4_\f s_\markup { \hspace #0.0 \raise #-2.0 \italic { snare 2 & 4 } } s2 |   % 29
 209         s1*8 |   % 30-37
 210         s2 s4 \< s \! |   % 38
 211         s1 |   % 39
 212         s2. s8 \> s \! |   % 40
 213         s4_\markup { \hspace #0.0 \raise #-2.0 \italic { bass 8th notes, band builds each repeat } } s2. |   % 41
 214         s1*8 |   % 42-49
 215         s4 \< s2. |   % 50
 216         s4_\f s2. |   % 51
 217         s1*5 |   % 52-56
 218         s4_\markup { \hspace #0.0 \raise #-2.0 \italic { rit. last time } } s2. |   % 57
 219         s2 s4 \< s \! |   % 58
 220 %}
 221 }
 222
 223
 224 \score
 225 {
 226         <<
 227 %               \new ChoirStaff = "Rhythm"
 228 %               <<
 229 %                       \new ChordNames = "chords" \Chords
 230 %                       \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
 231 %               >>
 232
 233                 \new ChoirStaff = "Vox"
 234                 <<
 235                         \new Staff = UpperStaffA { \new Voice = "lead" \LeadVox }
 236                         \new Lyrics \lyricsto "lead" \LeadVoxText
 237                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 238                         \new Lyrics \lyricsto "lead" \LeadVoxTextC
 239                         \new Staff = UpperStaffB { \new Voice = "alto" \AltoVox }
 240                         \new Staff = LowerStaffA { \new Voice = "tenor" \TenorVox }
 241                         \new Staff = LowerStaffB { \new Voice = "bass" \BassVox }
 242                 >>
 243
 244                 \set Score.skipBars = ##t
 245                 \set Score.melismaBusyProperties = #'()
 246         >>
 247 }
 248
 249
 250 \paper
 251 {
 252   #(define fonts (make-pango-font-tree
 253     "Times New Roman"
 254     "DomCasual BT"
 255     "Luxi Mono"
 256     (/ staffSize 20)))
 257
 258 % Spread staves vertically across last page (default: t)
 259 %       ragged-last-bottom = ##f
 260 % Don't spread staves vertically across the page (default: f)
 261 %       ragged-bottom = ##t
 262 % Allow partial line for last stave (default: f)
 263         ragged-last = ##t
 264
 265 % To find out what's eating the space at the top...
 266 %       annotate-spacing = ##t
 267 %let's try this: [It works! Huzzah!]
 268         page-top-space = 0
 269 }