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))
13 %Let's bump up the title size and switch to the chord font. :-)
15 title = \markup { \override #'(font-family . sans) \fontsize #3.5 "We Three Kings" }
16 composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "John H. Hopkins, Jr." }
17 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
18 tagline = "Engraved by JLH and Lilypond 2.8.6"
26 LeadVox = \relative c''
28 % \set Voice.autoBeaming = ##f
29 % \set Staff.instrumentName = #"Lead vox"
32 \override Staff.TimeSignature #'style = #'()
34 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
38 s2.^\markup { \hspace #0.0 \raise #1.0 { Light jazz waltz } } | % 1
45 \mark \markup { \override #'(font-family . sans) { \box { 1 } } }
56 \break %bleh, only valid for size 16
60 \mark \markup { \override #'(font-family . sans) { \box { A } } }
74 \break %bleh, only valid for size 16
86 \mark \markup { \override #'(font-family . sans) { \box { B } } }
91 \break %bleh, only valid for size 16
104 \break %bleh, only valid for size 16
127 \mark \markup { \override #'(font-family . sans) { \box { C } } }
135 r2.-\fermata \bar "|." % 50
138 LeadVoxText = \lyricmode
140 We three kings of O -- ri -- ent are
141 bear -- ing gifts we trav -- erse a -- far,
142 Field and foun -- tain, moor and moun -- _ tain,
143 fol -- low -- ing yon -- der star.
146 star of won- der, star of night,
147 star with roy -- al beau -- ty bright,
148 West -- ward lea -- ding, still pro -- cee -- ding,
149 guide us to thy per -- fect light.
154 LeadVoxTextB = \lyricmode
156 Born a king on Beth -- le -- hem’s plain,
157 gold I bring to crown him a -- gain,
158 King for -- e -- ver, cea -- sing ne -- _ ver
159 o -- ver us all to reign.
162 LeadVoxTextC = \lyricmode
164 Glo -- rious now be -- hold him a -- rise,
165 king and God and sa -- _ cri -- fice;
166 Al -- le -- lu -- ia, Al -- le -- lu -- _ ia!
167 Sounds thru the earth and skies.
171 Riffs = \relative c''
175 \override Staff.TimeSignature #'style = #'()
177 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
195 %Bah, can't we set this globally?
208 c4.:9 b:7.5+.9- | % 6
212 c4.:9 b:7.5+.9- | % 10
277 % Use a RhythmicStaff on the chords instead of this?
278 % It almost works, but not quite. Doesn't collapse chords above to single notes...
282 % \set Voice.autoBeaming = ##f
283 % \set Staff.instrumentName = #"Rhythm"
284 \override Staff.TimeSignature #'style = #'()
286 \override NoteHead #'style = #'slash
321 c4 c c \bar "||" % 27
359 c2.-\fermata \bar "|." % 50
371 s4_\markup { \italic { rit. 2nd time } } s2 | % 49
379 % \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
380 \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
381 \new Lyrics \lyricsto "lead" \LeadVoxText
382 \new Lyrics \lyricsto "lead" \LeadVoxTextB
383 \new Lyrics \lyricsto "lead" \LeadVoxTextC
386 \new ChoirStaff = "Rhythm"
388 \new ChordNames = "chords" \Chords
389 \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
392 \set Score.skipBars = ##t
393 \set Score.melismaBusyProperties = #'()
398 % \context { \Staff \RemoveEmptyStaves }
399 % ragged-last-bottom = ##t
407 #(define fonts (make-pango-font-tree
413 % top-margin = -0.25 \in