Shamusworld >> Repos - music/blob - come-let-us-worship-and-bow-down.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 %Let's bump up the title size and switch to the chord font. :-)
  16
  17         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Come Let Us Worship And Bow Down" }
  18         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Dave Doherty" }
  19         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  20         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  21 }
  22
  23
  24 %
  25 % Lead vocal
  26 %
  27
  28 LeadVox = \relative c'
  29 {
  30 %       \set Voice.autoBeaming = ##f
  31 %       \set Staff.instrument = #"Lead vox"
  32         \clef G
  33         \key d \major
  34         \override Staff.TimeSignature #'style = #'()
  35         \time 4/4
  36 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  37
  38         % Intro
  39
  40         \repeat volta 2
  41         {
  42                 R1^\markup { Easy 8th note feel } |   % 1
  43                 R1 |   % 2
  44         }
  45
  46         % A section
  47
  48 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  49
  50         r8 fs fs16 fs8. fs e16 d8 fs |   % 3
  51         fs2 r4 e8 fs |   % 4
  52         g8. g16 g8. g16 g8 fs e d |   % 5
  53         fs8 ( e ) e4 r2 |   % 6
  54         r8 fs fs16 fs8. fs e16 d8 fs |   % 7
  55         fs2 r4 e8 fs |   % 8
  56         g8. g16 g8. g16 g8 fs e d |   % 9
  57         fs8 ( e ) e4 r4. fs8 \bar "||"   % 10
  58
  59         % B section
  60
  61 \mark \markup { \override #'(font-family . sans) { \box { B } } }
  62
  63         g2 ( fs4 ) g8 fs |   % 11
  64         e2 r4. fs8 |   % 12
  65         g4 g8. g16 g8 fs e d |   % 13
  66         fs8 ( e ) e4 r fs8 e |   % 14
  67         d4. ( fs8 e4 ) d8 e |   % 15
  68         fs2 r4 fs8 e |   % 16
  69         d4. ( fs8 e4 ) d8 cs |   % 17
  70         d2 r |   % 18
  71         R1 \bar "||"   % 19
  72
  73         % A section
  74
  75         \key f \major
  76
  77 \mark \markup { \override #'(font-family . sans) { \box { C } } }
  78
  79         r8 a' a16 a8. a g16 f8 a |   % 20
  80         a2 r4 g8 a |   % 21
  81         bf8. bf16 bf8. bf16 bf8 a g f |   % 22
  82         a8 ( g ) g4 r2 |   % 23
  83         r8 a a16 a8. a g16 f8 a |   % 24
  84         a2 r4 g8 a |   % 25
  85         bf8. bf16 bf8. bf16 bf8 a g f |   % 26
  86         a8 ( g ) g4 r4. a8 \bar "||"   % 27
  87
  88         % B section
  89
  90 \mark \markup { \override #'(font-family . sans) { \box { D } } }
  91
  92         bf2 ( a4 ) bf8 a |   % 28
  93         g2 r4. a8 |   % 29
  94         bf4 bf8. bf16 bf8 a g f |   % 30
  95         a8 ( g ) g4 r a8 g |   % 31
  96         f4. ( a8 g4 ) f8 g |   % 32
  97         a2 r4 a8 g |   % 33
  98         f4. ( a8 g4 ) f8 g |   % 34
  99         a2 r4 a8 g |   % 35
 100         f4. ( a8 g4 ) f8 e |   % 36
 101         f1^\fermata \bar "|."   % 37
 102 }
 103
 104 LeadVoxText = \lyricmode
 105 {
 106         Come let us wor -- ship and bow down
 107         Let us kneel be -- fore the Lord our God our ma -- _ ker
 108         Come let us wor -- ship and bow down
 109         Let us kneel be -- fore the Lord our God our ma -- _ ker
 110
 111         For he __ _ is our God
 112         And we are the peo -- ple of his pas -- _ ture
 113         And the sheep __ _ _ of his hand
 114         Just the sheep __ _ _ of his hand.
 115
 116         Come let us wor -- ship and bow down
 117         Let us kneel be -- fore the Lord our God our ma -- _ ker
 118         Come let us wor -- ship and bow down
 119         Let us kneel be -- fore the Lord our God our ma -- _ ker
 120
 121         For he __ _ is our God
 122         And we are the peo -- ple of his pas -- _ ture
 123         And the sheep __ _ _ of his hand
 124         Just the sheep __ _ _ of his hand
 125         Just the sheep __ _ _ of his hand.
 126 }
 127
 128
 129 %
 130 % Chord names
 131 %
 132
 133 Chords = \chordmode
 134 {
 135 %Bah, can't we set this globally?
 136 %       \popChords
 137
 138         % Intro
 139
 140         \repeat volta 2
 141         {
 142                 d2 g:maj7 |   % 1
 143                 d2 g:maj7 |   % 2
 144         }
 145
 146         % A section
 147
 148         d2 g:maj7 |   % 3
 149         d1 |   % 4
 150         g4 g/fs e2 |   % 5
 151         d4/a a2. |   % 6
 152         d2 g:maj7 |   % 7
 153         d1 |   % 8
 154         g4 g/fs e2 |   % 9
 155         d4/a a2. |   % 10
 156
 157         % B section
 158
 159         e2:m d/g |   % 11
 160         a2:sus4 a |   % 12
 161         e2:m g |   % 13
 162         d4/a a2. |   % 14
 163         g2 a |   % 15
 164         d4 a/cs b:m b:m/a |   % 16
 165         e2:m a |   % 17
 166         d2 g:maj7 |   % 18
 167         d2 c4:sus4 c |   % 19
 168
 169         % A section
 170
 171         f2 bf:maj7 |   % 20
 172         f1 |   % 21
 173         bf4 bf/a g2:m7 |   % 22
 174         f4/c c2. |   % 23
 175         f2 bf:maj7 |   % 24
 176         f1 |   % 25
 177         bf4 bf/a g2:m7 |   % 26
 178         f4/c c2. |   % 27
 179
 180         % B section
 181
 182         g2:m7 f/bf |   % 28
 183         c2:sus4 c |   % 29
 184         g2:m bf |   % 30
 185         f4/c c2. |   % 31
 186         bf2 c |   % 32
 187         f4 f/e d:m d:m/c |   % 33
 188         bf2 c |   % 34
 189         f4 f/e d:m d:m/c |   % 35
 190         g2:m7 c |   % 36
 191         f1 |   % 37
 192 }
 193
 194
 195 %
 196 % Chord rhythms
 197 %
 198
 199 % Use a RhythmicStaff on the chords instead of this?
 200 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 201
 202 StaffC = \relative c
 203 {
 204 %       \set Voice.autoBeaming = ##f
 205 %       \set Staff.instrument = #"Rhythm"
 206         \override Staff.TimeSignature #'style = #'()
 207         \time 4/4
 208         \override NoteHead #'style = #'slash
 209
 210         % Intro
 211
 212         \repeat volta 2
 213         {
 214                 c4 c c8. c16 ~ c4 |   % 1
 215                 c4 c c8. c16 ~ c4 |   % 2
 216         }
 217
 218         % A section
 219
 220         c4 c c c |   % 3
 221         c4 c c c |   % 4
 222         c4 c c c |   % 5
 223         c4 c c c |   % 6
 224         c4 c c c |   % 7
 225         c4 c c c |   % 8
 226         c4 c c c |   % 9
 227         c4 c c c \bar "||"   % 10
 228
 229         % B section
 230
 231         c4 c c c |   % 11
 232         c4 c c c |   % 12
 233         c4 c c c |   % 13
 234         c4 c c c |   % 14
 235         c4 c c c |   % 15
 236         c4 c c c |   % 16
 237         c4 c c c |   % 17
 238         c4 c c8. c16 ~ c4 |   % 18
 239         c4 c c c \bar "||"   % 19
 240
 241         % A section
 242
 243         c4 c c c |   % 20
 244         c4 c c c |   % 21
 245         c4 c c c |   % 22
 246         c4 c c c |   % 23
 247         c4 c c c |   % 24
 248         c4 c c c |   % 25
 249         c4 c c c |   % 26
 250         c4 c c c \bar "||"   % 27
 251
 252         % B section
 253
 254         c4 c c c |   % 28
 255         c4 c c c |   % 29
 256         c4 c c c |   % 30
 257         c4 c c c |   % 31
 258         c4 c c c |   % 32
 259         c4 c c c |   % 33
 260         c4 c c c |   % 34
 261         c4 c c c |   % 35
 262         c4_\markup { \italic { rit. } } c c2 |   % 36
 263         c1^\fermata \bar "|."   % 37
 264 }
 265
 266
 267 \score
 268 {
 269         <<
 270                 <<
 271                         \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
 272                         \new Lyrics \lyricsto "lead" \LeadVoxText
 273                 >>
 274
 275                 \new ChoirStaff = "Rhythm"
 276                 <<
 277                         \new ChordNames = "chords" \Chords
 278                         \new RhythmicStaff = "chordRhythm" \StaffC
 279                 >>
 280
 281                 \set Score.skipBars = ##t
 282                 \set Score.melismaBusyProperties = #'()
 283         >>
 284
 285         \layout
 286         {
 287 %               \context { \Staff \RemoveEmptyStaves }
 288 %               ragged-last-bottom = ##t
 289                 ragged-last = ##t
 290         }
 291 }
 292
 293
 294 \paper
 295 {
 296   #(define fonts (make-pango-font-tree
 297     "Times New Roman"
 298     "DomCasual BT"
 299     "Luxi Mono"
 300     (/ staffSize 20)))
 301 }