2 \include "pop-chords.ly"
5 % Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
7 #(set-default-paper-size "letter")
8 #(set-global-staff-size staffSize)
9 #(ly:set-option (quote no-point-and-click))
13 %Let's bump up the title size and switch to the chord font. :-)
15 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Jesus Is Just Alright" }
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Arthur Reynolds" }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. The Doobie Brothers" }
18 tagline = "Engraved by JLH and Lilypond 2.8.8"
21 % Useful tweak abbreviations (hn = harmony note)
23 hn = #(define-music-function (parser location arg) (ly:music?)
24 ;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
26 (set! (ly:music-property arg 'tweaks)
27 (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
34 LeadVox = \relative c''
36 % \set Voice.autoBeaming = ##f
37 % \set Staff.instrumentName = #"Lead vox"
40 \override Staff.TimeSignature #'style = #'()
42 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
43 \override MultiMeasureRest #'expand-limit = 1
47 \once \override Score.RehearsalMark #'self-alignment-X = #left
48 \mark \markup { \hspace #0.0 \raise #1.8 \small "Bright rock" }
54 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 5
55 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 6
60 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 7
61 <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r | % 8
64 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <d \hn b \hn gs>8 ~ | % 9
68 <d \hn b \hn gs>2 r | % 10
78 \once \override Score.RehearsalMark #'self-alignment-X = #left
79 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
83 <a' \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 16
84 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 17
85 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 18
86 <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r | % 19
87 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 20
88 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 21
89 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <d \hn b \hn gs>8 ~ | % 22
90 <d \hn b \hn gs>4 r r2 | % 23
93 \once \override Score.RehearsalMark #'self-alignment-X = #left
94 \mark \markup { \override #'(font-family . sans) { \box { B } } }
96 <a' \hn e \hn c>8 <g \hn d \hn b>4 <e \hn c \hn a>8 ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 25
97 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 26
98 <a \hn e \hn c>8 <g \hn d \hn b>4 <e \hn c \hn a>8 ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 27
99 <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r | % 28
100 <a \hn e \hn c>8 <g \hn d \hn b>4 <e \hn c \hn a>8 ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 29
101 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 30
102 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 | % 31
103 \once \override Score.RehearsalMark #'self-alignment-X = #right
104 \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }
109 r4 <g \hn e \hn c>8 <g \hn e \hn c> ~ <g \hn e \hn c>2 | % 32
110 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a> ( <d \hn b \hn gs> ) <d \hn b \hn gs> | % 33
112 r8 e4 ( g8 a2 ) \bar "||" % 35
114 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 36
115 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 37
116 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 38
117 <e \hn c \hn a>8 <a \hn e \hn c>4 <g \hn d \hn b>8 ~ <g \hn d \hn b>4 r | % 39
118 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <e \hn c \hn a>8 ~ | % 40
119 <e \hn c \hn a>8 <g \hn d \hn b>4 <a \hn d, \hn c>8 ~ <a \hn e \hn c>4 r | % 41
120 <a \hn e \hn c>8 <g \hn d \hn b> <e \hn c \hn a> <e \hn c \hn a> ~ <e \hn c \hn a> <e \hn c \hn a>4 <d \hn b \hn gs>8 ~ | % 42
121 <d \hn b \hn gs>2 r4 r8 d | % 43
122 g8 a a e g4 ef16 ( d c8 ) | % 44
125 r4 <g' \hn e \hn c>8 <g \hn e \hn c> ~ <g \hn e \hn c>2-\fermata | % 45
133 \once \override Score.RehearsalMark #'self-alignment-X = #left
134 \mark \markup { \override #'(font-family . sans) { \box { C } } \small "Moderate jazz waltz" }
156 r8 a, e' e ~ e4 ~ | % 61
163 e'8 d c4 a8 d ~ | % 67
168 g8 a4 g8 ~ g ef ( ~ | % 72
174 r4 d8 c ( d4 ) ~ | % 77
175 d4 c8 ( a ) ~ a4 ~ | % 78
183 \once \override Score.RehearsalMark #'self-alignment-X = #left
184 \mark \markup { \small "Guitar solo" \bold "(rpt. 6x)" }
197 %Ugh, only valid in size 18
204 \once \override Score.RehearsalMark #'self-alignment-X = #left
205 \mark \markup { \override #'(font-family . sans) { \box { D } } \small "Bright rock - Guitar solo" \bold "(rpt. 7x)" }
206 %\once \override Score.RehearsalMark #'self-alignment-X = #left
207 %\mark \markup { \override \once #'(font-family . sans) { \box { B } } }
218 \once \override Score.RehearsalMark #'self-alignment-X = #right
219 \mark \markup { \italic { D.S. al Coda } }
223 \stopStaff s1 \startStaff |
224 \set Score.currentBarNumber = #91
226 \once \override Score.RehearsalMark #'self-alignment-X = #left
227 \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }
229 r4 g'8 g ~ g2-\fermata \bar "|." % 91
232 LeadVoxText = \lyricmode
234 Do, do, do, do, _ do, do, _ do, do. _
235 Do, do, do, do, _ do, do, _ do, do. _
237 Do, do, do, do, _ do, do. _
239 Je -- sus is just _ al -- right _ with me. _
240 Je -- sus is just _ al -- right, _ oh yeah. _
241 Je -- sus is just _ al -- right _ with me. _
242 Je -- sus is just _ al -- right. _
244 I don’t care _ what they _ may say. _
245 I don’t care _ what they _ may do. _
246 I don’t care _ what they _ may say. _
247 Je -- sus is just _ al -- right, oh yeah! _
248 Je -- sus is just _ al -- _ right.
251 Do, do, do, do, _ do, do, _ do, do. _
252 Do, do, do, do, _ do, do, _ do, do. _
254 Do, do, do, do, _ do, do, _ do, do. _
255 Do, do, do, do, _ do, do. _
257 A ho -- pin’ and a pray -- in’, __ _ _
261 Je -- sus, __ _ _ he’s my _ fri -- end. _
262 Je -- sus, __ _ _ well, he’s my __ _ _ fri -- end. _
263 He took me by the hand, _ led me far __ _ _ from this _ land, __ _ _ _
264 Je -- sus, __ _ _ he’s my __ _ _ fri -- end. __ _ _
269 LeadVoxTextB = \lyricmode
271 _ _ _ _ _ _ _ _ _ _ _
272 _ _ _ _ _ _ _ _ _ _ _
276 _ _ _ _ _ _ _ _ _ _ _
277 _ _ _ _ _ _ _ _ _ _ _
278 _ _ _ _ _ _ _ _ _ _ _
281 I don’t care _ what they _ may know. _
282 I don’t care _ where they _ may go. _
283 I don’t care _ what they _ may know. _
291 \override Staff.TimeSignature #'style = #'()
293 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
298 d8 ds e c' ~ c2 | % 12
299 d,8 ds e c ~ c2 | % 13
300 d8 ds e c' ~ c2 | % 14
301 d,8 ds e g fs d e e, | % 15
306 d'8 ds e c' ~ c2 | % 87
307 d,8 ds e c ~ c2 | % 88
308 d8 ds e c' ~ c2 | % 89
309 d,8 ds e g fs d e e, | % 90
320 %Bah, can't we set this globally?
354 a4.:m a8:5^3 s2 | % 16
356 a4.:m a8:5^3 s2 | % 18
357 s4. e8:7.9+ s2 | % 19
358 a4.:m a8:5^3 s2 | % 20
360 a4.:m a8:5^3 s2 | % 22
364 a4.:m a8:5^3 s2 | % 25
366 a4.:m a8:5^3 s2 | % 27
367 s4. e8:7.9+ s2 | % 28
368 a4.:m a8:5^3 s2 | % 29
370 a4.:m a8:5^3 s2 | % 31
376 a4.:m a8:5^3 s2 | % 33
482 % Use a RhythmicStaff on the chords instead of this?
483 % It almost works, but not quite. Doesn't collapse chords above to single notes...
487 % \set Voice.autoBeaming = ##f
488 % \set Staff.instrumentName = #"Rhythm"
489 \override Staff.TimeSignature #'style = #'()
491 \override NoteHead #'style = #'slash
492 \override MultiMeasureRest #'expand-limit = 1
525 c4 r8 c r c r c | % 16
526 r8 c r c r c c r | % 17
527 c4 r8 c r c r c | % 18
528 r8 c r c ~ c4 c8 r | % 19
529 c4 r8 c r c r c | % 20
530 r8 c r c r c c r | % 21
531 c4 r8 c r c r c | % 22
533 c4 c c c \bar "||" % 24
535 c4 r8 c r c r c | % 25
536 r8 c r c r c c r | % 26
537 c4 r8 c r c r c | % 27
538 r8 c r c ~ c4 c8 r | % 28
539 c4 r8 c r c r c | % 29
540 r8 c r c r c c r | % 30
541 c4 r8 c r c r c | % 31
547 c4 r8 c r c r c | % 33
549 c4 c c c \bar "||" % 35
562 c8 r c c ~ c2-\fermata | % 45
643 \stopStaff s1 \startStaff |
644 \set Score.currentBarNumber = #91
646 c8 r c c ~ c2-\fermata \bar "|." % 91
652 s1*4_\markup { \hspace #0.0 \raise #-1.0 \italic { percussion } } | % 1-4
656 s4_\markup { \hspace #0.0 \raise #-1.5 \italic { Bass doubles gtr. riff } } s2. | % 12
664 % \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
665 \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
666 \new Lyrics \lyricsto "lead" \LeadVoxText
667 \new Lyrics \lyricsto "lead" \LeadVoxTextB
670 \new ChoirStaff = "Rhythm"
672 \new ChordNames = "chords" \Chords
673 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
676 \set Score.skipBars = ##t
677 \set Score.melismaBusyProperties = #'()
682 % \context { \Staff \RemoveEmptyStaves }
683 % ragged-last-bottom = ##t
691 #(define fonts (make-pango-font-tree
697 % top-margin = -0.25 \in