2 \include "pop-chords.ly"
5 % Good sizes are 16, 18, & 20
7 #(set-default-paper-size "letter")
8 #(set-global-staff-size staffSize)
9 #(ly:set-option (quote no-point-and-click))
11 %{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
15 %Let's bump up the title size and switch to the chord font. :-)
17 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Jesus, All For Jesus" }
18 % composer = \markup { \override #'(font-family . sans) "" }
19 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
20 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
24 % Useful tweak abbreviations (hn = harmony note)
26 hn = #(define-music-function (parser location arg) (ly:music?)
27 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
29 (set! (ly:music-property arg 'tweaks)
30 (acons 'font-size -3.5 (ly:music-property arg 'tweaks))) arg)
33 % Various melody lines
48 <e \hn cs \hn a>8 <fs \hn d \hn a>2 ~ |
49 <fs \hn d \hn a>4 <e \hn cs \hn a> <fs \hn d \hn a>8 <a \hn fs \hn d> ~ <a \hn fs \hn d>4 |
50 <b \hn g \hn d>4. <a \hn g \hn d>8 <a \hn fs \hn d>2 ~ |
51 <a \hn fs \hn d>2 <b \hn fs \hn d>4 <a \hn fs \hn d> |
52 <e \hn cs \hn a>4. <d \hn b \hn a>8 <e \hn cs \hn a>2 ~ |
57 <e \hn cs \hn a>4. <e \hn cs \hn a>8
58 << { \voiceOne fs8 ( e ) <d \hn a> ( a ) } \context Voice = vb { \voiceTwo <\hn cs \hn a>4 s4 } >> \oneVoice |
65 % <e \hn cs \hn a>4. \repeatTie
67 << { \voiceOne fs8 ( e ) <d \hn a> ( <cs \hn a \hn g> ) } \context Voice = vb { \voiceTwo \tiny <cs a>4 s4 } >> \oneVoice |
72 <fs \hn d \hn a>4. <e \hn cs \hn a>8 <fs \hn d \hn a>2 ~ |
73 <fs \hn d \hn a>2 <fs \hn d \hn a>4 <a \hn fs \hn d> |
74 <b \hn g \hn d>4. <a \hn fs \hn d>8 <a \hn fs \hn d>2 ~ |
75 <a \hn fs \hn d>2 <b \hn fs \hn d>4 <a \hn fs \hn d> |
76 <e \hn cs \hn a>4. <d \hn cs \hn a>8 <e \hn cs \hn a>2 ~ |
77 % <e \hn cs \hn a>4. <e \hn cs \hn a>8
78 % << { \voiceOne fs ( e ) <d> % Partial measure...
86 LeadVox = \relative c'
88 % \set Voice.autoBeaming = ##f
89 % \set Staff.instrument = #"Lead vox"
92 \override Staff.TimeSignature #'style = #'()
94 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
110 \mark \markup { \override #'(font-family . sans) { \box { A } } }
112 fs4. ( e8 ) fs2 ~ | % 11
114 b4. ( a8 ) a2 ~ | % 13
121 e4. e8 fs e d a | % 16
126 e'4. \repeatTie e8 fs e d cs | % 19
135 \mark \markup { \override #'(font-family . sans) { \box { B } } }
137 <fs \hn d \hn a>4. \melodyLineB % 22-26
142 \melodyLineBRptA % 27-29
145 <e' \hn cs \hn a>4. \repeatTie \melodyLineBRptB % 30
149 <d \hn a \hn fs>1 | % 31
150 r2 <fs \hn d>8 ( <a \hn fs \hn d> ) <a \hn fs \hn d>4 \bar "||" % 32
154 \once \override Score.RehearsalMark #'self-alignment-X = #left
155 \mark \markup { \override #'(font-family . sans) { \box { C } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
157 <b \hn g \hn d>4. <a \hn fs \hn d>8 <b \hn g \hn d>2 ~ | % 33
158 <b \hn g \hn d>4 <a \hn fs \hn d> <b \hn g \hn e>8 ( a ) <a \hn fs \hn d>4 | % 34
159 <a \hn fs \hn d>4. <fs \hn d \hn a>8 <a \hn fs \hn d>2 ~ | % 35
160 <a \hn fs \hn d>4 r <fs \hn d>8 ( <a \hn fs \hn d> ) <a \hn fs \hn d>4 | % 36
161 <b \hn g \hn d>4. <a \hn fs \hn d>8 <b \hn g \hn d>2 ~ | % 37
162 <b \hn g \hn d>4 <cs \hn a \hn g> <d \hn b \hn g>8 ( <cs \hn a \hn d,> ) <b \hn g \hn d> ( <a \hn fs \hn d> ) | % 38
163 <a \hn fs \hn d>2. <fs \hn d \hn a>4 | % 39
164 <e \hn cs \hn a>1 \bar "||" % 40
168 \mark \markup { \override #'(font-family . sans) { \box { D } } }
171 <e \hn cs \hn a>4. \melodyLineBRptB % 46
172 \once \override Score.RehearsalMark #'self-alignment-X = #right
173 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
174 <d \hn a \hn fs>1 ~ | % 47
175 <d \hn a \hn fs>2 r \bar "||" % 48
179 \mark \markup { \override #'(font-family . sans) { \box { E } } }
181 s1*8 \bar "||" % 49-56
185 \mark \markup { \override #'(font-family . sans) { \box { F } } }
188 \melodyLineBRptA \bar "||" % 62-64
190 \mark \markup { \override #'(font-family . sans) { \box { G } } }
192 <fs' \hn d \hn a>4. \melodyLineB % 65-69
193 <e \hn cs \hn a>4. \melodyLineBRptB % 70
194 <d \hn a \hn fs>1 | % 71
195 r2 <fs \hn d>8 ( <a \hn fs \hn d> ) <a \hn fs \hn d>4 \bar "||" % 72
197 \once \override Score.RehearsalMark #'self-alignment-X = #right
198 \mark \markup { \italic { D.S. al Coda } }
202 %\stopStaff s1 \bar "" \startStaff % That removed the spurious floating bar line from line break
203 \stopStaff s1 \startStaff
204 \set Score.currentBarNumber = #73
206 \once \override Score.RehearsalMark #'self-alignment-X = #left
207 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
209 <d, \hn a \hn fs>1 ~ | % 73
210 <d \hn a \hn fs>2 r \bar "||" % 74
211 s1*7 \bar "|." % 75-81
214 LeadVoxText = \lyricmode
216 Je -- _ sus, _ all for Je -- _ sus, _
217 all I am and have, _ and e -- ver hope to be, _
219 _ and e -- ver hope to be. _
221 All of my _ am -- bi -- tions, _ hopes, and plans, _
222 I sur -- ren -- der these, _ in -- to _ your _ hands, _
224 _ in -- to _ your _ hands.
226 For _ it’s on -- ly in _ your will _ that I am free, _
227 For _ it’s on -- ly in _ you will _ that _ I am free.
229 Je -- _ sus, _ all for Je -- _ sus, _
230 all I am and have, _ and e -- ver hope to be. _
232 Je -- _ sus, _ all for Je -- _ sus, _
233 all I am and have, _ and e -- ver hope to be. _
235 All of my _ am -- bi -- tions, _ hopes, and plans, _
236 I sur -- ren -- der these, _ in -- to _ your _ hands.
251 \override Staff.TimeSignature #'style = #'()
253 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
267 s1*19 | % 57-74 (+1 for coda)
282 %Bah, can't we set this globally?
310 a4. a8:sus4 a2 | % 15
333 a4. a8:sus4 a2 | % 26
365 a4. a8:sus4 a2 | % 45
374 a4. a8:sus4 a2 | % 53
383 a4. a8:sus4 a2 | % 61
392 a4. a8:sus4 a2 | % 69
407 a4. a8:sus4 a2 | % 79
417 % Use a RhythmicStaff on the chords instead of this?
418 % It almost works, but not quite. Doesn't collapse chords above to single notes...
422 % \set Voice.autoBeaming = ##f
423 % \set Staff.instrument = #"Rhythm"
424 \override Staff.TimeSignature #'style = #'()
426 \override NoteHead #'style = #'slash
432 c8. c16 ~ c8 c c4 c | % 1
436 c8. c16 ~ c8 c c4 c | % 3
440 c8. c16 ~ c8 c c4 c | % 7
449 c8. c16 ~ c8 c c4 c | % 11
453 c8. c16 ~ c8 c c4 c | % 15
472 c8. c16 ~ c8 c c4 c | % 22
476 c8. c16 ~ c8 c c4 c | % 26
491 c4 c c c \bar "||" % 32
502 c4 c c c \bar "||" % 40
504 c8. c16 ~ c8 c c4 c | % 41
508 c8. c16 ~ c8 c c4 c | % 45
511 c4 c c c \bar "||" % 48
513 c8. c16 ~ c8 c c4 c | % 49
517 c8. c16 ~ c8 c c4 c | % 53
520 c4 c c c \bar "||" % 56
522 c8. c16 ~ c8 c c4 c | % 57
526 c8. c16 ~ c8 c c4 c | % 61
529 c4 c c c \bar "||" % 64
531 c8. c16 ~ c8 c c4 c | % 65
535 c8. c16 ~ c8 c c4 c | % 69
538 c4 c c c \bar "||" % 72
542 \stopStaff s1 \startStaff |
543 \set Score.currentBarNumber = #73
546 c4 c c c \bar "||" % 74
548 c8. c16 ~ c8 c c4 c | % 75
552 c8. c16 ~ c8 c c4 c | % 79
554 c1^\fermata \bar "|." % 81
560 s1*80 | % 1-79 (+1 for coda)
561 s2 s4_\markup { \italic { rit. } } s | % 80
570 % \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
571 \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
572 \new Lyrics \lyricsto "lead" \LeadVoxText
575 \new ChoirStaff = "Rhythm"
577 \new ChordNames = "chords" \Chords
578 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
581 \set Score.skipBars = ##t
582 \set Score.melismaBusyProperties = #'()
587 % \context { \Staff \RemoveEmptyStaves }
588 % ragged-last-bottom = ##t
596 #(define fonts (make-pango-font-tree