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 "Above All" }
18 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Michael W. Smith" }
19 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
20 tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
28 LeadVox = \relative c''
30 % \set Voice.autoBeaming = ##f
31 % \set Staff.instrument = #"Lead vox"
34 \override Staff.TimeSignature #'style = #'()
36 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
40 \tiny r2 r8 d f bf | % 1
41 c8.f,16 f4 ~ f ~ f8 bf16 a | % 2
42 bf8. ef,16 ef4 ~ ef d | % 3
43 <f c>2 \normalsize r8 f,16 f ~ f bf8. \bar "||:" % 4
49 \once \override Score.RehearsalMark #'self-alignment-X = #left
50 \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
52 a8. g16 ~ g4 r8. ef16 ef g8. | % 5
53 f2 r8. f16 f bf8. | % 6
54 a8. g16 ~ g8 a bf a16 g ~ g f f8 ~ | % 7
55 f2 r8. d16 d g8. | % 8
56 g8 g4 a8 bf a16 f ~ f8 d16 g ( ~ | % 9
62 ef8 ef16 ef ~ ef8 f16 g ~ g8 f16 ef ~ ef8 d16 c ~ | % 11
63 c2 r8 f16 f ~ f bf8. | % 12
66 ef,8 ef16 ef ~ ef8 f16 g ~ g8 f16 ef ~ ef8 d16 d ~ | % 13
76 \mark \markup { \override #'(font-family . sans) { \box { B } } }
78 d'4. c16 ef ~ ef2 | % 15
79 c8 d16 ef ~ ef8 d16 d ~ d4 r8. bf16 | % 16
80 d4. c16 ef ~ ef4. ~ ef16 c | % 17
81 c8 d16 ef ~ ef8 d16 d ~ d4 d8 c16 bf ~ | % 18
82 bf2 d8 c bf a16 g ~ | % 19
83 g2 r8. c16 bf8 d,16 ef ~ | % 20
84 ef2 r8. f16 bf8 a16 bf ~ | % 21
85 bf2 r4 g16 a8 ( bf16 ) | % 22
90 << { \voiceOne bf1 } \context Voice = v { \voiceThree \tiny \tiny r2 r8 d f bf \normalsize } >> \oneVoice | % 23
91 \tiny c8.f,16 f4 ~ f ~ f8 bf16 a | % 24
92 bf8. ef,16 ef4 ~ ef d | % 25
93 <f c>2 \normalsize r8 f,16 f ~ f^\markup { \hspace #0.0 \raise #1.0 \bold D.S. } bf8. \bar "||" % 26
99 bf2. d8 c16 bf ~ | % 28
103 bf2 d8 c bf a16 g ~ | % 29
104 g2 r8. c16 bf8 d,16 ef ~ | % 30
105 ef2 r8. f16 bf8 a16 bf ~ | % 31
106 bf2 r4 g16 a8 ( bf16 ) | % 32
107 bf1^\fermata \bar "|." % 33
110 LeadVoxText = \lyricmode
115 A -- bove _ all po -- wers _ a -- bove all kings
116 A -- bove all na -- ture _ and all cre -- a -- _ ted things _
117 A -- bove all wis -- dom and all the ways _ of man __ _ _ _
118 You were here _ be -- fore _ the world _ be -- gan _
121 There's no way _ to mea -- _ sure what _ you're worth _
123 Cru -- ci -- fied, _ laid be -- hind _ the stone _
124 You lived to die, __ _ _ re -- ject -- ed and _ a -- lone _
125 Like a rose _ tra -- mpled on the ground _
126 You took the fall _ and thought of me _
136 Like a rose _ tra -- mpled on the ground _
137 You took the fall _ and thought of me _
141 LeadVoxTextB = \lyricmode
146 _ _ _ _ king -- doms _ a -- bove all thrones
147 A -- bove all won -- ders _ the world has e -- _ ver known _
148 A -- bove all wealth _ and trea -- sures of _ the earth __ _ _
158 %Bah, can't we set this globally?
200 g2:m bf:maj7/f | % 19
214 bf2 ef4/bf f/bf | % 27
221 g2:m bf:maj7/f | % 29
233 % Use a RhythmicStaff on the chords instead of this?
234 % It almost works, but not quite. Doesn't collapse chords above to single notes...
238 % \set Voice.autoBeaming = ##f
239 % \set Staff.instrument = #"Rhythm"
240 \override Staff.TimeSignature #'style = #'()
242 \override NoteHead #'style = #'slash
249 c4 c c c \bar "||:" % 4
273 c4 c c \< c \! | % 14
294 c4 c c c \bar "||" % 26
297 c4 c c \< c \! | % 27
307 c4_\markup { \italic { rit. } } c c c | % 32
308 c1^\fermata \bar "|." % 33
316 \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
317 \new Lyrics \lyricsto "lead" \LeadVoxText
318 \new Lyrics \lyricsto "lead" \LeadVoxTextB
321 \new ChoirStaff = "Rhythm"
323 \new ChordNames = "chords" \Chords
324 \new RhythmicStaff = "chordRhythm" \StaffC
327 \set Score.skipBars = ##t
328 \set Score.melismaBusyProperties = #'()
333 % \context { \RemoveEmptyStaffContext }
334 % ragged-last-bottom = ##t
342 #(define fonts (make-pango-font-tree