-\version "2.16.0"
+\version "2.19.0"
\include "pop-chords.ly"
\include "english.ly"
\header
{
-%Let's bump up the title size and switch to the chord font. :-)
-
title = \markup { \override #'(font-family . sans) \fontsize #3.5 "I Stand Amazed In The Presence" }
composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Charles H. Gabriel" }
arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
%
-% Lead vocal
+% Song's structure
%
-
-LeadVox = \relative c'
+Global =
{
-% \set Voice.autoBeaming = ##f
-% \set Staff.instrument = #"Lead vox"
\clef G
\key g \major
- \override Staff.TimeSignature #'style = #'()
+ \numericTimeSignature
\time 4/4
-\override Score.SpacingSpanner #'average-spacing-wishes = ##f
% Intro
\repeat volta 2
{
- R1 | % 1
- R1 | % 2
- R1 | % 3
- r2 r4 r8 d | % 4
+ s1*4 | % 1-4
}
\repeat volta 3
{
% Verse
-\mark \markup { \override #'(font-family . sans) { \box { A } } }
-
- d4 b ( d ) g8 a16 g | % 5
- b4. ( a16 g ) g4 g | % 6
- fs4 fs8 fs g4 a | % 7
- g2. d4 | % 8
- e4. e8 g4 fs8 e | % 9
- d4. ( g8 ) g4 a | % 10
- b4 b8 b a4 a | % 11
- g1 \bar "||" % 12
+ \mark \markup { \override #'(font-family . sans) { \box { A } } }
+ s1*8 \bar "||" % 5-12
% Chorus
-\mark \markup { \override #'(font-family . sans) { \box { B } } }
-
- b4 b b8 a g4 | % 13
- d'4 d d8 c b4 | % 14
- a4 a a4. b8 | % 15
- c4 b a2 | % 16
- b4 b b8 a g4 | % 17
- d'4 d d8 c b4 | % 18
- a4 b8 ( c ) b4 a | % 19
- \time 2/4 g4 fs \time 4/4 | % 20
+ \mark \markup { \override #'(font-family . sans) { \box { B } } }
+ s1*7 | % 13-19
+ \time 2/4 s2 \time 4/4 | % 20
}
\alternative
{
{
- g1 | % 21
- r2 r4 r8 d | % 22
+ s1*2 | % 21-22
}
{
- g1 \bar "||" % 23
+ s1 \bar "||" % 23
}
}
% Chorus (redux)
-\mark \markup { \override #'(font-family . sans) { \box { C } } }
+ \mark \markup { \override #'(font-family . sans) { \box { C } } }
+ s1*8 \bar "||" % 24-31
+
+ % Outro
+
+ s1*3 \bar "|." % 32-34
+}
+
+
+%
+% Lead vocal
+%
+LeadVox = \relative c'
+{
+ \clef G
+
+ % Intro
+
+ R1*3 | % 1-3
+ r2 r4 r8 d | % 4
+
+ % Verse
+
+ d4 b ( d ) g8 a16 g | % 5
+ b4. ( a16 g ) g4 g | % 6
+ fs4 fs8 fs g4 a | % 7
+ g2. d4 | % 8
+ e4. e8 g4 fs8 e | % 9
+ d4. ( g8 ) g4 a | % 10
+ b4 b8 b a4 a | % 11
+ g1 | % 12
+
+ % Chorus
+
+ b4 b b8 a g4 | % 13
+ d'4 d d8 c b4 | % 14
+ a4 a a4. b8 | % 15
+ c4 b a2 | % 16
+ b4 b b8 a g4 | % 17
+ d'4 d d8 c b4 | % 18
+ a4 b8 ( c ) b4 a | % 19
+ g4 fs | % 20
+
+ g1 | % 21
+ r2 r4 r8 d | % 22
+
+ g1 | % 23
+
+ % Chorus (redux)
b4 b b8 a g4 | % 24
d'4 d d8 c b4 | % 25
b4 b b8 a g4 | % 28
d'4 d d8 c b4 | % 29
a4 b8 ( c ) b4 a | % 30
- g2 fs \bar "||" % 31
+ g2 fs | % 31
% Outro
g1 | % 32
R1 | % 33
- r1^\fermata \bar "|." % 34
+ r1^\fermata | % 34
}
+
LeadVoxText = \lyricmode
{
I stand a -- _ mazed in the pre- __ _ _ sence
%
% Chord names
%
-
Chords = \chordmode
{
-%Bah, can't we set this globally?
-% \popChords
-
% Intro
- \repeat volta 2
- {
- g2 s16 a4..:m11 | % 1
- c2:sus2 s16 d8.:sus4 d4 | % 2
- g2 s16 a4..:m11 | % 3
- c2:sus2 s16 d8.:sus4 d4 | % 4
- }
+ g2 s16 a4..:m11 | % 1
+ c2:sus2 s16 d8.:sus4 d4 | % 2
+ g2 s16 a4..:m11 | % 3
+ c2:sus2 s16 d8.:sus4 d4 | % 4
- \repeat volta 3
- {
- % Verse
+ % Verse
- g2 a:m11 | % 5
- g2/b e:m7 | % 6
- d2 c:sus2 | % 7
- g1 | % 8
- c2:sus2 a:m11 | % 9
- g2 e:m7 | % 10
- g2/d d | % 11
- g2 d4:sus4 d | % 12
+ g2 a:m11 | % 5
+ g2/b e:m7 | % 6
+ d2 c:sus2 | % 7
+ g1 | % 8
+ c2:sus2 a:m11 | % 9
+ g2 e:m7 | % 10
+ g2/d d | % 11
+ g2 d4:sus4 d | % 12
- % Chorus
+ % Chorus
- g2 a:m11 | % 13
- g2/b e:m7 | % 14
- a1:m7 | % 15
- d2:sus4 d | % 16
- g2 a:m11 | % 17
- g2/b e:m7 | % 18
- a2:m7 g4/b c:sus2 | % 19
- \time 2/4 g4/d d \time 4/4 | % 20
- }
- \alternative
- {
- {
- g2 a:m11 | % 21
- c2:sus2 d4:sus4 d | % 22
- }
- {
- g2 d4:sus4 d | % 23
- }
- }
+ g2 a:m11 | % 13
+ g2/b e:m7 | % 14
+ a1:m7 | % 15
+ d2:sus4 d | % 16
+ g2 a:m11 | % 17
+ g2/b e:m7 | % 18
+ a2:m7 g4/b c:sus2 | % 19
+ g4/d d | % 20
+
+ g2 a:m11 | % 21
+ c2:sus2 d4:sus4 d | % 22
+
+ g2 d4:sus4 d | % 23
% Chorus (redux)
%
% 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...
-
StaffC = \relative c
{
-% \set Voice.autoBeaming = ##f
-% \set Staff.instrument = #"Rhythm"
- \override Staff.TimeSignature #'style = #'()
- \time 4/4
+ \numericTimeSignature
\override NoteHead #'style = #'slash
+ \teeny
% Intro
- \repeat volta 2
- {
- c4 c r16 c c c c4 | % 1
- c4 c r16 c8. c4 | % 2
- c4 c r16 c c c c4 | % 3
- c4 c r16 c8. c4 | % 4
- }
+ c4 c r16 c c c c4 | % 1
+ c4 c r16 c8. c4 | % 2
+ c4 c r16 c c c c4 | % 3
+ c4 c r16 c8. c4 | % 4
- \repeat volta 3
- {
- % Verse
+ % Verse
- c4 c c c | % 5
- c4 c c c | % 6
- c4 c c c | % 7
- c4 c c c | % 8
- c4 c c c | % 9
- c4 c c c | % 10
- c4 c c c | % 11
- c4 c c c \bar "||" % 12
-\break
+ c4 c c c | % 5
+ c4 c c c | % 6
+ c4 c c c | % 7
+ c4 c c c | % 8
+ c4 c c c | % 9
+ c4 c c c | % 10
+ c4 c c c | % 11
+ c4 c c c | % 12
+%\break
- % Chorus
+ % Chorus
- c4 c c c | % 13
- c4 c c c | % 14
- c4 c c c | % 15
- c4 c c c | % 16
- c4 c c c | % 17
- c4 c c c | % 18
- c4 c c c | % 19
- \time 2/4 c4 c \time 4/4 | % 20
- }
- \alternative
- {
- {
- c4 c c c | % 21
- c4 c c c | % 22
- }
- {
- c4 c c c \bar "||" % 23
- }
- }
+ c4 c c c | % 13
+ c4 c c c | % 14
+ c4 c c c | % 15
+ c4 c c c | % 16
+ c4 c c c | % 17
+ c4 c c c | % 18
+ c4 c c c | % 19
+ c4 c | % 20
+
+ c4 c c c | % 21
+ c4 c c c | % 22
+
+ c4 c c c | % 23
% Chorus (redux)
c4 c c c | % 28
c4 c c c | % 29
c4 c c c | % 30
- c4 c c c \bar "||" % 31
+ c4 c c c | % 31
% Outro
c4 c r16 c c c c4 | % 32
c4 c r16 c8. c4 | % 33
- c1^\fermata \bar "|." % 34
+ c1^\fermata | % 34
}
\score
{
<<
+ \Global % The "roadmap" that everything else depends on
+
+ \context Staff
<<
- \new Staff = leadStaff { << \new Voice = "lead" \LeadVox >> }
+ \new Voice = "lead" \LeadVox
\new Lyrics \lyricsto "lead" \LeadVoxText
\new Lyrics \lyricsto "lead" \LeadVoxTextB
\new Lyrics \lyricsto "lead" \LeadVoxTextC
>>
- \new ChoirStaff = "Rhythm"
+ \new ChoirStaff
<<
- \new ChordNames = "chords" \Chords
- \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
+ \new ChordNames \Chords
+ \new RhythmicStaff << \StaffC \Dynamics >>
>>
\set Score.skipBars = ##t
{
#(define fonts (make-pango-font-tree
"Times New Roman"
- "DomCasual BT"
+ "LilyJAZZText"
"Luxi Mono"
(/ staffSize 20)))
% To find out what's eating the space at the top...
% annotate-spacing = ##t
-%let's try this: [It works! Huzzah!]
- obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
}
+