Shamusworld >> Repos - music/blob - holy-is-the-lord.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 \header
  12 {
  13         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Holy Is The Lord" }
  14 %       subtitle = \markup { \override #'(font-family . sans) \fontsize #3.5 "" }
  15         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Blake/Harriton" }
  16 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  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 d \major
  27         \numericTimeSignature
  28         \time 4/4
  29
  30         % A section
  31
  32         \mark \markup { \override #'(font-family . sans) { \box { A } } }
  33
  34         s1*16 \bar "||"   % 1-16
  35
  36         % B section
  37
  38         \mark \markup { \override #'(font-family . sans) { \box { B } } }
  39
  40         s1*16 \bar ":|."   % 17-32
  41 }
  42
  43
  44 %
  45 % Lead vocal
  46 %
  47 LeadVox = \relative c'
  48 {
  49         \clef G
  50
  51         % A section
  52
  53         d4. ( a'8 ) a2 |   %
  54         d,4. ( a'8 ) a2 |   %
  55         fs4. ( b8 ) b2 |   %
  56         fs4. ( b8 ) b2 |   %
  57         b2. b4 |   %
  58         a2. e8 ( fs ) |   %
  59         fs1 ~ |   %
  60         fs2. r4 |   %
  61
  62         d4. ( a'8 ) a2 |   %
  63         d,4. ( a'8 ) a2 |   %
  64         fs4. ( b8 ) b2 |   %
  65         fs4. ( b8 ) b2 |   %
  66         b2. b4 |   %
  67         a2. e8 ( fs ) |   %
  68         fs1 ~ |   %
  69         fs4 d' cs4. a8 |   %
  70
  71         % B section
  72
  73         b1 ~ |   %
  74         b4 d cs4. a8 |   %
  75         b1 ~ |   %
  76         b4 b a e |   %
  77         a2. fs8 g |   %
  78         a4. d,8 g4. fs8 |   %
  79         fs2 ( ~ fs8 g fs4 ) |   %
  80         e4 d' cs4. a8 |   %
  81
  82         b1 ~ |   %
  83         b4 d cs4. a8 |   %
  84         b1 ~ |   %
  85         b4 b a e |   %
  86         a2. fs8 g |   %
  87         a4. d,8 g4. fs8 |   %
  88         fs2 ( ~ fs8 g fs e ) |   %
  89         e2. r4 |   %
  90 }
  91
  92 LeadVoxText = \lyricmode
  93 {
  94         Ho -- _ ly, ho -- _ ly,
  95         Ho -- _ ly, ho -- _ ly,
  96         Ho -- ly is the _ Lord. _
  97
  98         Ho -- _ ly, ho -- _ ly,
  99         Ho -- _ ly, ho -- _ ly,
 100         Ho -- ly is the _ Lord. _
 101
 102         His name is high _
 103         and lift -- ed up, _
 104         and there is peace
 105         in the sha -- dow of his glo -- _ _ _ ry.
 106
 107         His name is high _
 108         and lift -- ed up, _
 109         and there is peace
 110         in the sha -- dow of his glo -- _ _ _ _ ry.
 111 }
 112
 113
 114 Riffs = \relative c'
 115 {
 116 }
 117
 118
 119 %
 120 % Chord names
 121 %
 122 Chords = \chordmode
 123 {
 124         % A section
 125
 126         d1 |   % 1
 127         s1 |   % 2
 128         b1:m |   % 3
 129         s1 |   % 4
 130         g1 |   % 5
 131         a2:sus4 a |   % 6
 132         d1 |   % 7
 133         s1 |   % 8
 134
 135         d1 |   % 9
 136         s1 |   % 10
 137         b1:m |   % 11
 138         s1 |   % 12
 139         g1 |   % 13
 140         a2:sus4 a |   % 14
 141         d1 |   % 15
 142         d2 fs:m7 |   % 16
 143
 144         % B section
 145
 146         g1:3.5.9 |   % 17
 147         s2 fs:m7 |   % 18
 148         g2.:3.5.9 fs4:m7 |   % 19
 149         e2:m7 a/cs |   % 20
 150         d4:sus4 d a/d d |   % 21
 151         d2/fs g |   % 22
 152         d1/a |   % 23
 153         a2 fs:m7 |   % 24
 154
 155         g1:3.5.9 |   % 25
 156         s2 fs:m7 |   % 26
 157         g2.:3.5.9 fs4:m7 |   % 27
 158         e2:m7 a/cs |   % 28
 159         d4:sus4 d a/d d |   % 29
 160         d2/fs g |   % 30
 161         d1/a |   % 31
 162         a1 |   % 32
 163 }
 164
 165
 166 %
 167 % Chord rhythms
 168 %
 169 Rhythm = \relative c
 170 {
 171         \numericTimeSignature
 172         \override NoteHead #'style = #'slash
 173         \teeny
 174
 175         % A section
 176
 177         c4 c c c |   % 1
 178         c4 c c c |   %
 179         c4 c c c |   %
 180         c4 c c c |   %
 181         c4 c c c |   % 5
 182         c4 c c c |   %
 183         c4 c c c |   %
 184         c4 c c c |   %
 185
 186         c4 c c c |   % 9
 187         c4 c c c |   %
 188         c4 c c c |   %
 189         c4 c c c |   %
 190         c4 c c c |   % 13
 191         c4 c c c |   %
 192         c4 c c c |   %
 193         c4 c c c |   %
 194
 195         % B section
 196
 197         c4 c c c |   % 17
 198         c4 c c c |   %
 199         c4 c c c |   %
 200         c4 c c c |   %
 201         c4 c c c |   % 21
 202         c4 c c c |   %
 203         c4 c c c |   %
 204         c4 c c c |   %
 205
 206         c4 c c c |   % 25
 207         c4 c c c |   %
 208         c4 c c c |   %
 209         c4 c c c |   %
 210         c4 c c c |   % 29
 211         c4 c c c |   %
 212         c4 c c c |   %
 213         c4 c c c |   %
 214 }
 215
 216
 217
 218 Dynamics =
 219 {
 220 %{
 221 %Hmm, this is throwin off the layout...
 222         s4_\mf s2. |   % 1
 223         s1*18 |   % 2-19
 224         s4 s \< s2 |   % 20
 225         s4_\f s2. |   % 21
 226 %}
 227 %{
 228         % Intro
 229         s4_\markup { \italic { Ac. gtr only } } s2. |   % 1
 230
 231         s1*3 |   % 2-4
 232
 233         s4_\markup { \italic { Band in } } s2. |   % 5
 234 %}
 235 }
 236
 237
 238 \score
 239 {
 240         <<
 241                 \Global         % The "roadmap" that everything else depends on
 242
 243                 \context Staff
 244                 <<
 245                         \new Voice = "lead" \LeadVox
 246                         \new Voice \Riffs
 247                         \new Lyrics \lyricsto "lead" \LeadVoxText
 248                 >>
 249
 250                 \new ChoirStaff
 251                 <<
 252                         \new ChordNames \Chords
 253 %Capo 3 edition
 254 %                       \new ChordNames \transpose f d \Chords
 255                         \new RhythmicStaff << \Rhythm \Dynamics >>
 256                 >>
 257
 258                 \set Score.skipBars = ##t
 259                 \set Score.melismaBusyProperties = #'()
 260         >>
 261 }
 262
 263
 264 \paper
 265 {
 266         #(define fonts (make-pango-font-tree
 267                 "Times New Roman"
 268                 "JazzText"
 269                 "Luxi Mono"
 270                 (/ staffSize 20)))
 271
 272 % Don't spread staves vertically across last page (default: t)
 273         ragged-last-bottom = ##f
 274 % Don't spread staves vertically across the page (default: f)
 275 %       ragged-bottom = ##t
 276 % Allow partial line for last stave (default: f)
 277         ragged-last = ##t
 278
 279 % To find out what's eating the space at the top...
 280 %       annotate-spacing = ##t
 281 }
 282