Shamusworld >> Repos - music/blob - i-have-decided-to-follow-jesus-shortened.ly

   1 \version "2.16.0"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
   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 "I Have Decided To Follow Jesus" }
  14         subtitle    = \markup { \override #'(font-family . sans) \fontsize #1.5 "Slightly Shortened Version" }
  15         composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Traditional" }
  16         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Roger Freeland/Shamus Hammons/Chris Craig" }
  17         tagline  = "Engraved by JLH and Lilypond 2.8.2"
  18 }
  19
  20
  21 %
  22 % Lead vocal
  23 %
  24
  25 LeadVox = \relative c'
  26 {
  27         \set Voice.autoBeaming = ##f
  28 %       \set Staff.instrumentName = #"Lead vox"
  29         \override Staff.TimeSignature #'style = #'()
  30         \clef G
  31         \key d \major
  32         \time 4/4
  33 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  34
  35 %       \set Score.markFormatter = #format-mark-box-letters
  36
  37         % Intro
  38
  39         r1^\markup { \italic { Ac. guitar } } |   % 1
  40         r1 |   % 2
  41         r1^\markup { \italic { Guitar II in } } |   % 3
  42         r1 |   % 4
  43         r1^\markup { \italic { Bass in } } |   % 5
  44         r1 |   % 6
  45         r1^\markup { \italic { Drums in } } |   % 7
  46         r4 d d fs |   % 8
  47
  48         % Verse
  49
  50         \repeat volta 3
  51         {
  52 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  53
  54                 a4. a8 ~ a8 r8 r4 |   % 9
  55                 r4 a b a |   % 10
  56                 fs4. d8 ~ d8 r8 r4 |   % 11
  57                 r4 d' d d |   % 12
  58                 d4. d8 ~ d8 r8 r4 |   % 13
  59                 r4 d e d |   % 14
  60                 b4. a8 ~ a8 r8 r4 |   % 15
  61                 r4 d, d fs |   % 16
  62
  63                 a4. a8 ~ a8 r8 r4 |   % 17
  64                 r4 a b a |   % 18
  65                 fs4. d8 ~ d8 r8 r4 |   % 19
  66                 r4 a' b a |   % 20
  67                 fs4. r8 r2 |   % 21
  68                 r4 d fs e |   % 22
  69         }
  70         \alternative
  71         {
  72                 {
  73                         d4. r8 r2 |   % 23
  74 %                       r1 |   % 24
  75 %                       r1 |   % 25
  76                         r4 d d fs |   % 26
  77                 }
  78                 {
  79                         d4. r8 r2 |   % 27
  80                         r1 |   % 28
  81                         r1 |   % 29
  82                 }
  83         }
  84
  85         r4 d' d fs \bar "|:"   % 30
  86
  87         % Tag
  88
  89 \once \override Score.RehearsalMark #'self-alignment-X = #left
  90 \mark \markup { \override #'(font-family . sans) { \box { B } } \small \italic { Women 8vb throughout } }
  91
  92         fs4 r r2 |   % 31
  93         r4 d d fs |   % 32
  94         fs4 r r2 |   % 33
  95         r4 d d fs |   % 34
  96         fs4 r r2 |   % 35
  97         r4 d d fs |   % 36
  98         fs4 r r2 |   % 37
  99         r4 d d fs \bar ":|"   % 38
 100
 101         % Ending
 102
 103 \once \override Score.RehearsalMark #'self-alignment-X = #left
 104 \mark \markup { \override #'(font-family . sans) { \box { C } } \small \italic { On cue } }
 105
 106         r1 |   % 39
 107         r1 |   % 40
 108         r1 |   % 41
 109         r1 |   % 42
 110         r1 |   % 43
 111 %       r1 |   % 44
 112 %       r1 |   % 45
 113         r1 |   % 46
 114         r1^\fermata \bar "|."   % 47
 115 }
 116
 117
 118 LeadVoxText = \lyricmode
 119 {
 120         I have de- ci- ded _ to fol- low Je- sus _
 121         I have de- ci- ded _ to fol- low Je- sus _
 122         I have de- ci- ded _ to fol- low Je- sus _
 123         No tur- ning back, no tur- ning back.
 124
 125         Though none go
 126
 127         back.
 128
 129         No tur- ning back! No tur- ning back!
 130         No tur- ning back! No tur- ning back!
 131         No tur- ning
 132 }
 133
 134 LeadVoxTextB = \lyricmode
 135 {
 136         _ _ _ with me, _ still I will fol- low _
 137         Though none go with me, _ still I will fol- low _
 138         Though none go with me, _ still I will fol- low _
 139         No tur- ning back, no tur- ning back.
 140
 141         The world be-
 142 }
 143
 144 LeadVoxTextC = \lyricmode
 145 {
 146         _ _ _ hind me, _ the cross be- fore me _
 147         The world be- hind me, _ the cross be- fore me _
 148         The world be- hind me, _ the cross be- fore me _
 149         No tur- ning back, no tur- ning _
 150 }
 151
 152
 153 %
 154 % Chord names
 155 %
 156
 157 Chords = \chordmode
 158 {
 159 %Bah, can't we set this globally?
 160 %       \popChords
 161
 162         % Intro
 163
 164         c4.:9 b2:7.9+ bf8:7+ |   % 1
 165         s4. a2:sus4.7 c8:9 |   % 2
 166         s4. b2:7.9+ bf8:7+ |   % 3
 167         s4. a2:sus4.7 c8:9 |   % 4
 168         s4. b2:7.9+ bf8:7+ |   % 5
 169         s4. a2:sus4.7 c8:9 |   % 6
 170         s4. b2:7.9+ bf8:7+ |   % 7
 171         s4. a2:sus4.7 s8 |   % 8
 172
 173         % Verse
 174
 175         \repeat volta 3
 176         {
 177                 d2..:7+ g8:/a |   % 9
 178                 s1 |   % 10
 179                 d2..:7+ fs8:aug7 |   % 11
 180                 s1 |   % 12
 181                 g4.:7+ d2:/fs e8:m7 |   % 13
 182                 s4. a2:sus4.7 s8 |   % 14
 183                 d2..:7+ g8:m/a |   % 15
 184                 s1 |   % 16
 185
 186                 d2..:7+ cs8:m11 |   % 17
 187                 s4. fs2:7.9+ b8:m7 |   % 18
 188                 s2.. e8:9 |   % 19
 189                 s1 |   % 20
 190                 e2..:m9 a8:13 |   % 21
 191                 s2.. c8:9 |   % 22
 192         }
 193         \alternative
 194         {
 195                 {
 196                         s4. b2:7.9+ bf8:7+ |   % 23
 197 %                       s4. a2:sus4.7 c8:9 |   % 24
 198 %                       s4. b2:7.9+ bf8:7+ |   % 25
 199                         s4. a2:sus4.7 s8 |   % 26
 200                 }
 201                 {
 202                         s4. b2:7.9+ bf8:7+ |   % 27
 203                         s4. a2:sus4.7 c8:9 |   % 28
 204                         s4. b2:7.9+ bf8:7+ |   % 29
 205                 }
 206         }
 207
 208         s4 a:sus4.7 s2 |   % 30
 209
 210         % Tag
 211
 212         d2..:7+ af8:7.5- |   % 31
 213         s1 |   % 32
 214         g2..:7+ c8:9 |   % 33
 215         s1 |   % 34
 216         e2..:m7 a8:sus4.7 |   % 35
 217         s1 |   % 36
 218         c4.:9 b2:7.9+ bf8:7+ |   % 37
 219         s4. a2:sus4.7 s8 |   % 38
 220
 221         % Ending
 222
 223         c4.:9 b2:7.9+ bf8:7+ |   % 39
 224         s4. a2:sus4.7 c8:9 |   % 40
 225         s4. b2:7.9+ bf8:7+ |   % 41
 226         s4. a2:sus4.7 c8:9 |   % 42
 227         s4. b2:7.9+ bf8:7+ |   % 43
 228 %       s4. a2:sus4.7 c8:9 |   % 44
 229 %       s4. b2:7.9+ bf8:7+ |   % 45
 230         s4. a2:sus4.7 s8 |   % 46
 231         d1:7+ |   % 47
 232 }
 233
 234
 235 %
 236 % Chord rhythms
 237 %
 238
 239 % Use a RhythmicStaff on the chords instead of this?
 240 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 241
 242 StaffC = \relative c
 243 {
 244         \set Voice.autoBeaming = ##f
 245 %       \set Staff.instrumentName = #"Rhythm"
 246         \override Staff.TimeSignature #'style = #'()
 247         \time 4/4
 248         \override NoteHead #'style = #'slash
 249
 250         % Intro
 251
 252         c4. c8 ~ c4. c8 ~ |   % 1
 253         c4. c8 ~ c4. c8 ~ |   % 2
 254         c4. c8 ~ c4. c8 ~ |   % 3
 255         c4. c8 ~ c4. c8 ~ |   % 4
 256         c4. c8 ~ c4. c8 ~ |   % 5
 257         c4. c8 ~ c4. c8 ~ |   % 6
 258         c4. c8 ~ c4. c8 ~ |   % 7
 259         c4. c8 ~ c2 |   % 8
 260
 261         % Verse
 262
 263         \repeat volta 3
 264         {
 265                 c4 c c r8 c ~ |   % 9
 266                 c4 c c c |   % 10
 267                 c4 c c r8 c ~ |   % 11
 268                 c4 c c c |   % 12
 269                 c4. c8 ~ c4. c8 ~ |   % 13
 270                 c4. c8 ~ c2 |   % 14
 271                 c4 c c c8 c ~ |   % 15
 272                 c4 c c c |   % 16
 273
 274                 c4 c c r8 c ~ |   % 17
 275                 c4. c8 ~ c4. c8 ~ |   % 18
 276                 c4 c c r8 c ~ |   % 19
 277                 c4 c c c |   % 20
 278                 c4 c c r8 c ~ |   % 21
 279                 c4 c c r8 c ~ |   % 22
 280         }
 281         \alternative
 282         {
 283                 {
 284                         c4. c8 ~ c4. c8 ~ |   % 23
 285 %                       c4. c8 ~ c4. c8 ~ |   % 24
 286 %                       c4. c8 ~ c4. c8 ~ |   % 25
 287                         c4. c8 ~ c2 |   % 26
 288                 }
 289                 {
 290                         c4. c8 ~ c4. c8 ~ |   % 27
 291                         c4. c8 ~ c4. c8 ~ |   % 28
 292                         c4. c8 ~ c4. c8 ~ |   % 29
 293                 }
 294         }
 295
 296         c4 c r2 \bar "|:"   % 30
 297
 298         % Tag
 299
 300         c4 c c r8 c ~ |   % 31
 301         c4 c c c |   % 32
 302         c4 c c r8 c ~ |   % 33
 303         c4 c c c |   % 34
 304         c4 c c r8 c ~ |   % 35
 305         c4 c c c |   % 36
 306         c4. c8 ~ c4. c8 ~ |   % 37
 307         c4. c8 ~ c2 \bar ":|"   % 38
 308
 309         % Ending
 310
 311         c4. c8 ~ c4. c8 ~ |   % 39
 312         c4. c8 ~ c4. c8 ~ |   % 40
 313         c4. c8 ~ c4. c8 ~ |   % 41
 314         c4. c8 ~ c4. c8 ~ |   % 42
 315         c4._\markup { \italic rit. } c8 ~ c4. c8 ~ |   % 43
 316 %       c4. c8 ~ c4. c8 ~ |   % 44
 317 %       c4. c8 ~ c4. c8 ~ |   % 45
 318         c4. c8 ~ c2 |   % 46
 319         c1^\fermata \bar "|."   % 47
 320 }
 321
 322
 323 \score
 324 {
 325         <<
 326 %               \new ChoirStaff = "Vox"
 327                 <<
 328                         \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
 329                         \new Lyrics \lyricsto "lead" \LeadVoxText
 330                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 331                         \new Lyrics \lyricsto "lead" \LeadVoxTextC
 332                 >>
 333
 334                 \new ChoirStaff = "Rhythm"
 335                 <<
 336 %                       \new Staff = "riff" \RhythmB
 337                         \new ChordNames = "chords" \Chords
 338                         \new RhythmicStaff = "chordRhythm" \StaffC
 339                 >>
 340
 341                 \set Score.skipBars = ##t
 342                 \set Score.melismaBusyProperties = #'()
 343         >>
 344         \layout
 345         {
 346 %               ragged-last-bottom = ##t
 347                 ragged-last = ##t
 348         }
 349 }
 350
 351
 352 \paper
 353 {
 354   #(define fonts (make-pango-font-tree
 355     "Times New Roman"
 356     "DomCasual BT"
 357     "Luxi Mono"
 358     (/ staffSize 20)))
 359 }