Shamusworld >> Repos - music/blob - lo-how-a-rose-e'er-blooming.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 %Let's bump up the title size and switch to the chord font. :-)
  14
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Lo! How a Rose E’er Blooming" }
  16         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "German Carol" }
  17 %       poet     = \markup { \override #'(font-family . sans) \fontsize #1.3 "George Atkins" }
  18 %       arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Shamus Hammons" }
  19         tagline  = "Engraved by JLH and Lilypond 2.8.8"
  20 }
  21
  22
  23 Soprano = \relative c''
  24 {
  25         \clef G
  26         \key f \major
  27         \override Staff.TimeSignature #'style = #'()
  28         \time 6/4
  29 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  30         \voiceOne
  31
  32         c2 c4 c d c |   % 1
  33         c2 a bf |   % 2
  34         a4 g2 f e4 |   % 3
  35         \time 4/4 f1 |   % 4
  36         \time 6/4 c'2 c4 c d c |   % 5
  37         c2 a bf |   % 6
  38         a4 g2 f e4 |   % 7
  39         \time 3/4 f2. |   % 8
  40         \time 1/4 a4 |   % 9
  41         \time 4/4 g4 e f d |   % 10
  42         c2. c'4 |   % 11
  43         c4 c d c |   % 12
  44         \time 6/4 c2 a bf |   % 13
  45         a4 g2 f e4 |   % 14
  46         \time 4/4 f1 \bar "|."   % 15
  47 }
  48
  49 Alto = \relative c''
  50 {
  51         \clef G
  52         \key f \major
  53         \override Staff.TimeSignature #'style = #'()
  54         \time 6/4
  55 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  56         \voiceTwo
  57
  58         a2 a4 f f f |   % 1
  59         e2 d d |   % 2
  60         c4 c d4. ( a8 c4 ) c |   % 3
  61         \time 4/4 c1 |   % 4
  62         \time 6/4 a'2 a4 f f f |   % 5
  63         e2 d d |   % 6
  64         c4 c d4. ( a8 c4 ) c |   % 7
  65         \time 3/4 c2. |   % 8
  66         \time 1/4 f4 |   % 9
  67         \time 4/4 e4 c c b |   % 10
  68         c2. e4 |   % 11
  69         g4 f f f |   % 12
  70         \time 6/4 e2 d d |   % 13
  71         f4 d ( e ) f ( g ) c, |   % 14
  72         \time 4/4 c1 \bar "|."   % 15
  73 }
  74
  75 Tenor = \relative c'
  76 {
  77         \clef F
  78         \key f \major
  79         \override Staff.TimeSignature #'style = #'()
  80         \time 6/4
  81 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  82         \voiceThree
  83
  84         c2 c4 a bf a |   % 1
  85         g2 f f |   % 2
  86         a4 c bf ( a2 ) g4 |   % 3
  87         \time 4/4 a1 |   % 4
  88         \time 6/4 c2 c4 a bf a |   % 5
  89         g2 f f |   % 6
  90         a4 c bf ( a2 ) g4 |   % 7
  91         \time 3/4 a2. |   % 8
  92         \time 1/4 c4 |   % 9
  93         \time 4/4 bf4 a a g |   % 10
  94         e8 ( f g2 ) g4 |   % 11
  95         g4 a bf a |   % 12
  96         \time 6/4 g2 fs g |   % 13
  97         c4 bf a2 g |   % 14
  98         \time 4/4 a1 \bar "|."   % 15
  99 }
 100
 101 Bass = \relative c
 102 {
 103         \clef F
 104         \key f \major
 105         \override Staff.TimeSignature #'style = #'()
 106         \time 6/4
 107 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 108         \voiceFour
 109
 110         f2 f4 f bf f |   % 1
 111         c2 d bf |   % 2
 112         f'4 e d2 c |   % 3
 113         \time 4/4 f1 |   % 4
 114         \time 6/4 f2 f4 f bf f |   % 5
 115         c2 d bf |   % 6
 116         f'4 e d2 c |   % 7
 117         \time 3/4 f2. |   % 8
 118         \time 1/4 f4 |   % 9
 119         \time 4/4 g4 a f g |   % 10
 120         c,8 ( d e2 ) c4 |   % 11
 121         e4 f bf, f' |   % 12
 122         \time 6/4 c2 d g, |   % 13
 123         a4 bf c2 c |   % 14
 124         \time 4/4 f,1 \bar "|."   % 15
 125 }
 126
 127 VerseA = \lyricmode
 128 {
 129         Lo, how a rose e’er bloo -- ming from ten -- der stem hath sprung!
 130         Of Jes -- se’s line -- age com -- ing as men of old have sung.
 131         It came, a flo -- wer bright,
 132         A -- mid the cold of win -- ter, when half -- spent was the night.
 133 }
 134
 135 VerseB = \lyricmode
 136 {
 137         I -- sa -- iah ’twas fore -- told it, the rose I have in mind;
 138         With Ma -- ry we be -- hold it, the vir -- gin mo -- ther kind.
 139         To show God’s love a -- right
 140         She bore to men a sa -- vior, when half -- spent was the night.
 141 }
 142
 143 VerseC = \lyricmode
 144 {
 145         This flower, whose fra -- grance ten -- der with sweet -- ness fills the air,
 146         Dis -- pels with glo -- rious splen -- dor the dark -- ness e -- very -- where.
 147         True man, yet ve -- ry God,
 148         From sin and death he saves us and light -- ens e -- very load.
 149 }
 150
 151
 152 \score
 153 {
 154         <<
 155                 <<
 156                         \new Staff = leadStaffA { << \new Voice = "vA" \Soprano \new Voice = "vB" \Alto >> }
 157                         \new Lyrics \lyricsto "vA" \VerseA
 158                         \new Lyrics \lyricsto "vA" \VerseB
 159                         \new Lyrics \lyricsto "vA" \VerseC
 160                 >>
 161
 162                 <<
 163                         \new Staff = leadStaffB { << \new Voice = "vC" \Tenor \new Voice = "vD" \Bass >> }
 164                 >>
 165
 166                 \set Score.skipBars = ##t
 167                 \set Score.melismaBusyProperties = #'()
 168         >>
 169
 170 %{    \midi
 171         {
 172                 \tempo 4 = 80
 173                 %% Remove the dynamics from the midi output
 174                 \context
 175                 {
 176                         \Voice
 177                         \remove "Dynamic_performer"
 178                         \remove "Span_dynamic_performer"
 179                 }
 180         }
 181 %}
 182 }
 183
 184
 185 \paper
 186 {
 187   #(define fonts (make-pango-font-tree
 188     "Times New Roman"
 189     "DomCasual BT"
 190     "Luxi Mono"
 191     (/ staffSize 20)))
 192
 193 % Spread staves vertically across last page (default: t)
 194         ragged-last-bottom = ##f
 195 % Don't spread staves vertically across the page (default: f)
 196 %       ragged-bottom = ##t
 197 % Allow partial line for last stave (default: f)
 198 %       ragged-last = ##t
 199
 200 % To find out what's eating the space at the top...
 201 %       annotate-spacing = ##t
 202 %let's try this: [It works! Huzzah!]
 203         obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 204 }