--- /dev/null
+\version "2.19.48"
+\include "pop-chords.ly"
+\include "english.ly"
+
+% Good sizes are 16, 18, & 20
+staffSize = #20
+#(set-default-paper-size "letter")
+#(set-global-staff-size staffSize)
+#(ly:set-option (quote no-point-and-click))
+
+%{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
+
+\header
+{
+%Let's bump up the title size and switch to the chord font. :-)
+
+ title = \markup { \override #'(font-family . sans) \fontsize #3.5 "We Fall Down" }
+ composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "C. Tomlin" }
+ arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" }
+ tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
+}
+
+% Useful tweak abbreviations (hn = harmony note)
+
+hn = #(define-music-function (parser location arg) (ly:music?)
+;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
+
+ (set! (ly:music-property arg 'tweaks)
+ (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
+
+%
+% Song's structure
+%
+
+Global =
+{
+ \key a \major
+ % \override Staff.TimeSignature #'style = #'()
+ \time 4/4
+
+ % Intro
+
+% \once \override TextScript #'padding = #2.0
+% s1*0^\markup { \large \italic { Piano only } }
+ s1*2 \bar "||" % 1-2
+
+ % Verse
+
+ \mark \markup { \override #'(font-family . sans) { \box { A } } }
+ s1*8 \bar "||" % 3-10
+
+ % Refrain
+
+ \mark \markup { \override #'(font-family . sans) { \box { B } } }
+ s1*6 \bar "||" % 11-16
+
+ % Outro
+
+ \mark \markup { \override #'(font-family . sans) { \box { C } } }
+ s1*4 \bar "|." % 17-20
+}
+
+
+%
+% Lead vocal
+%
+
+LeadVox = \relative c'
+{
+ \clef G
+ \override Score.SpacingSpanner #'average-spacing-wishes = ##f
+
+ % Intro
+
+ R1 | % 1
+ R1 | % 2
+
+ % Verse
+
+ cs8 e4 e8 ~ e4 ~ e8 a, | % 3
+ gs8 b4 a8 ~ a4 ~ a8 b16 cs | % 4
+ d2 ~ d8 cs4 cs8 ( ~ | % 5
+ cs8 b ) b2 r8. b16 | % 6
+
+ cs8 e4 e8 ~ e4 ~ e8 a, | % 7
+ gs16 gs b4 a8 ~ a4 ~ a8 b16 cs | % 8
+ d2 ~ d8 cs4 cs8 ( ~ | % 9
+ cs8 b ) b a a4 e' | % 10
+
+ % Refrain
+
+ e4 e8 d ~ d d4 cs8 ~ | % 11
+ cs8 b4 r8 a4 e' | % 12
+ e4 e8 d ~ d d4 cs8 ~ | % 13
+ cs8 b4 r8 a4 e' | % 14
+
+ e4 e8 d ~ d d4 cs8 ~ | % 15
+ cs8 b4. cs4 b8 ( a ) | % 16
+
+ % Outro
+
+ a2 r | % 17
+ R1 | % 18
+ R1 | % 19
+ R1 | % 20
+}
+
+
+LeadVoxTextA = \lyricmode
+{
+ We fall down, _ _ we lay our crowns, _ _
+ at the feet _ of Je -- _ _ sus
+
+ The great -- ness of _ _ his mer -- cy and love, _ _
+ at the feet _ of Je -- _ _ sus
+
+ And we cry, ho -- ly, ho -- _ ly, ho -- _ ly,
+ we cry, ho -- ly, ho -- _ ly, ho -- _ ly,
+ we cry, ho -- ly, ho -- _ ly, ho -- _ ly
+ is the _ lamb.
+}
+
+
+Riffs = \relative c''
+{
+%{
+ \tiny
+ a8 gs gs fs | % 0
+ gs4 gs a8 gs fs e | % 1
+ fs4 fs a8 gs gs fs | % 2
+ gs4 gs gs8 b4 e,8 ~ | % 3
+ e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 4
+ e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 5
+
+ s1*16 | % 6-21
+
+ r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 22
+ e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 23
+
+ s1*7 | % 24-30
+
+ s1 % blank bar for Coda
+
+ s1*13 | % 31-43
+
+ r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 44
+ e a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 45
+ e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 46
+ <a b e>1-\fermata | % 47
+ \normalsize
+%}
+}
+
+
+%
+% Chord names
+%
+
+Chords = \chordmode
+{
+ % Intro
+
+ a4. d8/a s2 | % 1
+ a4. d8/a s2 | % 2
+
+ % Verse
+
+ a1 | % 3
+ e4. fs8:m s2 | % 4
+ d2. cs4:m | % 5
+ e1 | % 6
+ a1 | % 7
+ e4. fs8:m s2 | % 8
+ d2. cs4:m | % 9
+ e2/b a | % 10
+
+ % Refrain
+
+ d2 a/cs | % 11
+ e2 fs:m | % 12
+ d2 cs:m | % 13
+ e2/b a | % 14
+ d2 a/cs | % 15
+ e1 | % 16
+
+ % Outro
+
+ a4. d8/a s2 | % 17
+ a4. d8/a s2 | % 18
+ a4. d8/a s2 | % 19
+ a1 | % 20
+}
+
+
+%
+% Chord rhythms
+%
+
+% Use a RhythmicStaff on the chords instead of this?
+% It almost works, but not quite. Doesn't collapse chords above to single notes...
+
+Rhythm = \relative c
+{
+ \override NoteHead #'style = #'slash
+ \teeny
+
+ % Intro
+
+ c4. c c4 | % 1
+ c4. c c4 | % 2
+
+ % Verse
+
+ c4 c c c | % 3
+ c4. c c4 | % 4
+ c4 c c c | % 5
+ c4 c c c | % 6
+ c4 c c c | % 7
+ c4. c c4 | % 8
+ c4 c c c | % 9
+ c4 c c c | % 10
+
+ % Refrain
+
+ c4 c c c | % 11
+ c4 c c c | % 12
+ c4 c c c | % 13
+ c4 c c c | % 14
+ c4 c c c | % 15
+ c4 c c c | % 16
+
+ % Outro
+
+ c4. c c4 | % 17
+ c4. c c4 | % 18
+ c4. c c4 | % 19
+ c1 | % 20
+}
+
+
+Dynamics =
+{
+%{
+ s2_\mf | % 0
+ s1*3 | % 1-3
+ s4_\markup { \italic { add cymbal colors } } s2. | % 5
+ s2 s16 s \> s4 s16 s \! | % 5
+
+ % Verse
+
+ s4_\markup { \italic { Unison 1st X } } s2. | % 6
+ s1*8 | % 7-14
+
+ % Chorus
+
+ s4_\markup { \italic { snare on D.S. } } s2. | % 15
+ s1*9 | % 16-24
+
+ % Bridge
+
+ s4_\markup { \italic { Unison 1st X } } s2. | % 25
+ s1*4 | % 26-29
+ s4.. s16_\markup { \italic { big fill } } \< s4. s8-\f | % 30
+
+ s1 % blank bar for coda
+
+ % Coda
+
+ s2 s8 \< s4 s8 \! | % 31
+ s4_\ff s2. | % 32
+ s1*6 | % 33-38
+ s2 s8 \> s4 s8-\mp | % 39
+
+ s4_\markup { \italic { floating } } s2. | % 40
+%}
+}
+
+
+\score
+{
+%{
+ <<
+ <<
+% \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
+ \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
+ \new Lyrics \lyricsto "lead" \LeadVoxText
+ >>
+
+ \new ChoirStaff = "Rhythm"
+ <<
+ \new ChordNames = "chords" \Chords
+ \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
+ >>
+
+ \set Score.skipBars = ##t
+ \set Score.melismaBusyProperties = #'()
+ >>
+%}
+ <<
+ \set Score.skipBars = ##t
+ \set Score.melismaBusyProperties = #'()
+
+ \new Staff
+ <<
+ \Global % The "roadmap" that everything else depends on
+ \new Voice = "lead" \LeadVox
+ \new Voice \Riffs
+ \new Lyrics \lyricsto "lead" \LeadVoxTextA
+ >>
+
+% \new Staff
+ <<
+ \new ChordNames \Chords
+ \new RhythmicStaff << \Rhythm \Dynamics >>
+ >>
+ >>
+}
+
+
+\paper
+{
+ #(define fonts (make-pango-font-tree
+ "Times New Roman"
+ "JazzText"
+ "Luxi Mono"
+ (/ staffSize 20)))
+
+% Spread staves vertically across last page (default: t)
+% ragged-last-bottom = ##f
+% Don't spread staves vertically across the page (default: f)
+% ragged-bottom = ##t
+% Allow partial line for last stave (default: f)
+ ragged-last = ##t
+
+% To find out what's eating the space at the top...
+% annotate-spacing = ##t
+%let's try this: [It works! Huzzah!][nope... :-/]
+% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
+}
+
projects / music / commitdiff