X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=stand-in-the-congregation.ly;h=ca94fc5c88ab51d7d60cd739d3934f345a0f48cf;hb=HEAD;hp=13e4d11715409380024ab00eae19353a516d4b83;hpb=7add1480813db617ee22ba3276c5b61649445f50;p=music

diff --git a/stand-in-the-congregation.ly b/stand-in-the-congregation.ly
index 13e4d11..ca94fc5 100644
--- a/stand-in-the-congregation.ly
+++ b/stand-in-the-congregation.ly
@@ -1,8 +1,8 @@
-\version "2.16.0"
+\version "2.19.0"
 \include "pop-chords.ly"
 \include "english.ly"
 
-% Good sizes are 16, 18, & 20
+% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
 staffSize = #18
 #(set-default-paper-size "letter")
 #(set-global-staff-size staffSize)
@@ -21,101 +21,57 @@ staffSize = #18
 
 
 %
-% Lead vocal
+% Song's structure
 %
-
-LeadVox = \relative c'
+Global =
 {
-%	\set Voice.autoBeaming = ##f
-%	\set Staff.instrument = #"Lead vox"
 	\clef G
 	\key ef \major
-	\override Staff.TimeSignature #'style = #'()
+	\numericTimeSignature
 	\time 4/4
-\override Score.SpacingSpanner #'average-spacing-wishes = ##f
 
 	\repeat volta 2
 	{
 		% Intro
 
-		r1 |   % 1
-		r1 |   % 2
+		s1*2 |   % 1-2
 	}
 	\alternative
 	{
 		{
-			r1 |   % 3
-			r1 |   % 4
+			s1*2 |   % 3-4
 		}
 		{
-			r1 |   % 5
+			s1 |   % 5
 		}
 	}
-	r2 ef4 f \bar "||"   % 6
+
+	s1 \bar "||"   % 6
 
 	% Verse
 
-\mark \markup { \override #'(font-family . sans) { \box { A } } }
-
-	g4 g8 g g4 f8 f ~ |   % 7
-	f8 ef4 bf8 ef4 f8 ef |   % 8
-	g2 ( f4. ) ef8 ~ |   % 9
-	ef4 r d ef |   % 10
-	f4 f8 f f4 f8 f ~ |   % 11
-	f bf,4 bf8 ef4 f8 ef |   % 12
-	g2 ( f4. ) ef8 ~ |   % 13
-	ef4 r ef f |   % 14
-	g8 g g g ~ g f4 f8 ~ |   % 15
-	f8 ef ~ ef4 ef f |   % 16
-	g2 bf4. af8 ~ |   % 17
-	af2 r4 c |   % 18
-	bf2 ( g4 ef ) |   % 19
-	g2 ( f4. ) ef8 ~ |   % 20
-	ef1 |   % 21
-	r2 ef4 f \bar "||:"   % 22
+	\mark \markup { \override #'(font-family . sans) { \box { A } } }
+	s1*16 \bar ".|:-||"   % 7-22
 
 	\repeat volta 2
 	{
 		% Verse
 
-\mark \markup { \override #'(font-family . sans) { \box { B } } }
-
-		g4 g8 g g4 f8 f ~ |   % 23
-		f8 ef4 bf8 ef4 f8 ef |   % 24
-		g2 ( f4.)  ef8 ~ |   % 25
-		ef4 r d ef |   % 26
-		f4 f8 f f4 f8 f ~ |   % 27
-		f bf,4 bf8 ef4 f8 ef |   % 28
-		g2 ( f4. ) ef8 ~ |   % 29
-		ef4 r ef f |   % 30
-		g8 g g g ~ g f4 f8 ~ |   % 31
-		f8 ef ~ ef4 ef f |   % 32
-		g2 bf4. af8 ~ |   % 33
-		af2 r4 c |   % 34
-		bf2 ( g4 ef ) |   % 35
-		g2 ( f4. ) ef8 ~ |   % 36
-		ef1 |   % 37
-		r2 ef4 bf' \bar "||"   % 38
+		\mark \markup { \override #'(font-family . sans) { \box { B } } }
+		s1*16 \bar "||"   % 23-38
 
 		% Chorus
 
-\mark \markup { \override #'(font-family . sans) { \box { C } } }
-
-		bf2 ( ~ bf8 f4 ) f8 ~  |   % 39
-		f2 ef4 bf' |   % 40
-		bf2 ( ~ bf8 g4 ) g8 ~ |   % 41
-		g2 ef4 bf' |   % 42
-		c2 ( ~ c8 bf4 ) af8 ~ |   % 43
-		af2 f4 c' |   % 44
-		d2 ( c4. ) bf8 ~ |   % 45
+		\mark \markup { \override #'(font-family . sans) { \box { C } } }
+		s1*7 |   % 39-45
 	}
 	\alternative
 	{
 		{
-			bf4 r ef, f |   % 46
+			s1 |   % 46
 		}
 		{
-			bf4 r f g \bar "||"   % 47
+			s1 \bar "||"   % 47
 		}
 	}
 
@@ -123,7 +79,93 @@ LeadVox = \relative c'
 
 	\key f \major
 
-\mark \markup { \override #'(font-family . sans) { \box { D } } }
+	\mark \markup { \override #'(font-family . sans) { \box { D } } }
+	s1*12 |   % 48-59
+
+	\repeat volta 2
+	{
+		s1*4 |   % 60-63
+	}
+
+	s1*5 \bar "|."   % 64-68
+}
+
+
+%
+% Lead vocal
+%
+LeadVox = \relative c'
+{
+	\repeat volta 2
+	{
+		% Intro
+
+		r1*2 |   % 1-2
+	}
+	\alternative
+	{
+		{
+			r1*2 |   % 3-4
+		}
+		{
+			r1 |   % 5
+		}
+	}
+	r2 ef4 f |   % 6
+
+	% Verse
+
+	g4 g8 g g4 f8 f ~ |   % 7
+	f8 ef4 bf8 ef4 f8 ef |   % 8
+	g2 ( f4. ) ef8 ~ |   % 9
+	ef4 r d ef |   % 10
+	f4 f8 f f4 f8 f ~ |   % 11
+	f bf,4 bf8 ef4 f8 ef |   % 12
+	g2 ( f4. ) ef8 ~ |   % 13
+	ef4 r ef f |   % 14
+	g8 g g g ~ g f4 f8 ~ |   % 15
+	f8 ef ~ ef4 ef f |   % 16
+	g2 bf4. af8 ~ |   % 17
+	af2 r4 c |   % 18
+	bf2 ( g4 ef ) |   % 19
+	g2 ( f4. ) ef8 ~ |   % 20
+	ef1 |   % 21
+	r2 ef4 f |   % 22
+
+	% Verse
+
+	g4 g8 g g4 f8 f ~ |   % 23
+	f8 ef4 bf8 ef4 f8 ef |   % 24
+	g2 ( f4.)  ef8 ~ |   % 25
+	ef4 r d ef |   % 26
+	f4 f8 f f4 f8 f ~ |   % 27
+	f bf,4 bf8 ef4 f8 ef |   % 28
+	g2 ( f4. ) ef8 ~ |   % 29
+	ef4 r ef f |   % 30
+	g8 g g g ~ g f4 f8 ~ |   % 31
+	f8 ef ~ ef4 ef f |   % 32
+	g2 bf4. af8 ~ |   % 33
+	af2 r4 c |   % 34
+	bf2 ( g4 ef ) |   % 35
+	g2 ( f4. ) ef8 ~ |   % 36
+	ef1 |   % 37
+	r2 ef4 bf' |   % 38
+
+	% Chorus
+
+	bf2 ( ~ bf8 f4 ) f8 ~  |   % 39
+	f2 ef4 bf' |   % 40
+	bf2 ( ~ bf8 g4 ) g8 ~ |   % 41
+	g2 ef4 bf' |   % 42
+	c2 ( ~ c8 bf4 ) af8 ~ |   % 43
+	af2 f4 c' |   % 44
+	d2 ( c4. ) bf8 ~ |   % 45
+
+	bf4 r ef, f |   % 46
+
+	bf4 r f g |   % 47
+
+	% Verse
 
 	a4 a8 a a4 g8 g ~ |   % 48
 	g8 f4 c8 f4 g8 f |   % 49
@@ -138,21 +180,19 @@ LeadVox = \relative c'
 	a2 c4. bf8 ~ |   % 58
 	bf2 r4 d4 |   % 59
 
-	\repeat volta 2
-	{
-		c2 ( a4 f ) |   % 60
-		a2 ( g4. ) f8 ~ |   % 61
-		f1 |   % 62
-		r2 r4 d' |   % 63
-	}
+	c2 ( a4 f ) |   % 60
+	a2 ( g4. ) f8 ~ |   % 61
+	f1 |   % 62
+	r2 r4 d' |   % 63
 
 	c2 ( a4 f ) |   % 64
 	a2 ( g4. ) f8 ~ |   % 65
 	f1 |   % 66
 	r1 |   % 67
-	r1 \bar "|."   % 68
+	r1 |   % 68
 }
 
+
 LeadVoxText = \lyricmode
 {
 	I will stand in the con -- gre -- ga -- _ tion
@@ -213,31 +253,18 @@ LeadVoxTextB = \lyricmode
 %
 % Chord names
 %
-
 Chords = \chordmode
 {
-% Do we need this anymore???
-%	\override SeparatingGroupSpanner #'padding = #'2.0
-%Bah, can't we set this globally?
-%	\popChords
+	% Intro
 
-	\repeat volta 2
-	{
-		% Intro
+	df2./ef s8 af8/ef |   % 1
+	s1 |   % 2
+
+	ef1 |   % 3
+	s1 |   % 4
+
+	ef2. s8 af8/bf |   % 5
 
-		df2./ef s8 af8/ef |   % 1
-		s1 |   % 2
-	}
-	\alternative
-	{
-		{
-			ef1 |   % 3
-			s1 |   % 4
-		}
-		{
-			ef2. s8 af8/bf |   % 5
-		}
-	}
 	s1 |   % 6
 
 	% Verse
@@ -259,46 +286,38 @@ Chords = \chordmode
 	ef2. s8 af/bf |   % 21
 	s1 |   % 22
 
-	\repeat volta 2
-	{
-		% Verse
-
-		ef1 |   % 23
-		s2 af/ef |   % 24
-		ef1 |   % 25
-		s1 |   % 26
-		bf1 |   % 27
-		s1 |   % 28
-		ef1 |   % 29
-		s2 af/bf |   % 30
-		ef1 |   % 31
-		s1 |   % 32
-		ef2./g s8 af |   % 33
-		s1 |   % 34
-		ef1/bf |   % 35
-		af2/bf bf |   % 36
-		ef2 s8 f4:m7 ef8/g |   % 37
-		s1 |   % 38
-
-		% Chorus
+	% Verse
 
-		bf1 |   % 29
-		s1 |   % 30
-		ef1 |   % 31
-		s1 |   % 32
-		f1:7 |   % 33
-		s1 |   % 34
-		bf2:7 af4./c bf8/d |   % 35
-	}
-	\alternative
-	{
-		{
-			s1 |   % 36
-		}
-		{
-			s2 bf/c |   % 37
-		}
-	}
+	ef1 |   % 23
+	s2 af/ef |   % 24
+	ef1 |   % 25
+	s1 |   % 26
+	bf1 |   % 27
+	s1 |   % 28
+	ef1 |   % 29
+	s2 af/bf |   % 30
+	ef1 |   % 31
+	s1 |   % 32
+	ef2./g s8 af |   % 33
+	s1 |   % 34
+	ef1/bf |   % 35
+	af2/bf bf |   % 36
+	ef2 s8 f4:m7 ef8/g |   % 37
+	s1 |   % 38
+
+	% Chorus
+
+	bf1 |   % 29
+	s1 |   % 30
+	ef1 |   % 31
+	s1 |   % 32
+	f1:7 |   % 33
+	s1 |   % 34
+	bf2:7 af4./c bf8/d |   % 35
+
+	s1 |   % 36
+
+	s2 bf/c |   % 37
 
 	% Verse
 
@@ -315,13 +334,10 @@ Chords = \chordmode
 	f2./a s8 bf |   % 48
 	s1 |   % 49
 
-	\repeat volta 2
-	{
-		f1/c |   % 50
-		bf2/c c |   % 51
-		d2.:m7 s8 bf |   % 52
-		s1 |   % 53
-	}
+	f1/c |   % 50
+	bf2/c c |   % 51
+	d2.:m7 s8 bf |   % 52
+	s1 |   % 53
 
 	f1/c |   % 54
 	bf2/d c/e |   % 55
@@ -335,37 +351,26 @@ Chords = \chordmode
 % 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...
-
 %Slash = { \override NoteHead #'style = #'slash }
 %Cross = { \override NoteHead #'style = #'cross }
 
 StaffC = \relative c
 {
-	\override Staff.TimeSignature #'style = #'()
-	\time 4/4
+	\numericTimeSignature
 	\override NoteHead #'style = #'slash
-
 	\teeny
-	\repeat volta 2
-	{
-		% Intro
 
-		c4 c c r8 c ~ |   % 1
-		c4 c c c |   % 2
-	}
-	\alternative
-	{
-		{
-			c4 c c c |   % 3
-			c4 c c c |   % 4
-		}
-		{
-			c4 c c r8 c ~ |   % 5
-		}
-	}
-	c4 c c c \bar "||"   % 6
+	% Intro
+
+	c4 c c r8 c ~ |   % 1
+	c4 c c c |   % 2
+
+	c4 c c c |   % 3
+	c4 c c c |   % 4
+
+	c4 c c r8 c ~ |   % 5
+
+	c4 c c c |   % 6
 
 	% Verse
 
@@ -384,48 +389,40 @@ StaffC = \relative c
 	c4 c c c |   % 19
 	c4 c c c |   % 20
 	c4 c c r8 c ~ |   % 21
-	c4 c c c \bar "||:"   % 22
+	c4 c c c |   % 22
 
-	\repeat volta 2
-	{
-		% Verse
+	% Verse
 
-		c4 c c c |   % 23
-		c4 c c c |   % 24
-		c4 c c c |   % 25
-		c4 c c c |   % 26
-		c4 c c c |   % 27
-		c4 c c c |   % 28
-		c4 c c c |   % 29
-		c4 c c c |   % 30
-		c4 c c c |   % 31
-		c4 c c c |   % 32
-		c4 c c r8 c ~ |   % 33
-		c4 c c c |   % 34
-		c4 c c c |   % 35
-		c4 c c c |   % 36
-		c4 c r8 c4 c8 ~ |   % 37
-		c4 c c c \bar "||"   % 38
+	c4 c c c |   % 23
+	c4 c c c |   % 24
+	c4 c c c |   % 25
+	c4 c c c |   % 26
+	c4 c c c |   % 27
+	c4 c c c |   % 28
+	c4 c c c |   % 29
+	c4 c c c |   % 30
+	c4 c c c |   % 31
+	c4 c c c |   % 32
+	c4 c c r8 c ~ |   % 33
+	c4 c c c |   % 34
+	c4 c c c |   % 35
+	c4 c c c |   % 36
+	c4 c r8 c4 c8 ~ |   % 37
+	c4 c c c |   % 38
 
-		% Chorus
+	% Chorus
 
-		c4 c c c |   % 29
-		c4 c c c |   % 30
-		c4 c c c |   % 31
-		c4 c c c |   % 32
-		c4 c c c |   % 33
-		c4 c c c |   % 34
-		c4 c c4. c8 ~ |   % 35
-	}
-	\alternative
-	{
-		{
-			c4 c c c |   % 36
-		}
-		{
-			c4 c c c |   % 37
-		}
-	}
+	c4 c c c |   % 29
+	c4 c c c |   % 30
+	c4 c c c |   % 31
+	c4 c c c |   % 32
+	c4 c c c |   % 33
+	c4 c c c |   % 34
+	c4 c c4. c8 ~ |   % 35
+
+	c4 c c c |   % 36
+
+	c4 c c c |   % 37
 
 	% Verse
 
@@ -442,19 +439,16 @@ StaffC = \relative c
 	c4 c c r8 c ~ |   % 48
 	c4 c c c |   % 49
 
-	\repeat volta 2
-	{
-		c4 c c c |   % 50
-		c4 c c c |   % 51
-		c4 c c r8 c ~ |   % 52
-		c4 c c c |   % 53
-	}
+	c4 c c c |   % 50
+	c4 c c c |   % 51
+	c4 c c r8 c ~ |   % 52
+	c4 c c c |   % 53
 
 	c4 c c c |   % 54
 	c2 c |   % 55
 	c4 c c r8 c ~ |   % 56
 	c4 c c c |   % 57
-	c4-^ c-^ r2 \bar "|."   % 58
+	c4-^ c-^ r2 |   % 58
 }
 
 
@@ -483,23 +477,24 @@ Dynamics =
 \score
 {
 	<<
+		\Global		% The "roadmap" that everything else depends on
 		\set Score.skipBars = ##t
 		\set Score.melismaBusyProperties = #'()
 
-%		\new ChoirStaff = "Rhythm"
-		<<
-			\new ChordNames = "chords" \Chords
-% Capo 3 Edition
-%			\new ChordNames = "chords" \transpose ef c \Chords
-			\new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
-		>>
-
-		\new Staff
+		\context Staff
 		<<
 			\new Voice = "lead" \LeadVox
 			\new Lyrics \lyricsto "lead" \LeadVoxText
 			\new Lyrics \lyricsto "lead" \LeadVoxTextB
 		>>
+
+		\new ChoirStaff
+		<<
+			\new ChordNames \Chords
+% Capo 3 Edition
+%			\new ChordNames \transpose ef c \Chords
+			\new RhythmicStaff << \StaffC \Dynamics >>
+		>>
 	>>
 }
 
@@ -508,7 +503,7 @@ Dynamics =
 {
 	#(define fonts (make-pango-font-tree
 		"Times New Roman"
-		"DomCasual BT"
+		"LilyJAZZText"
 		"Luxi Mono"
 		(/ staffSize 20)))
 
@@ -521,6 +516,5 @@ Dynamics =
 
 % 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)
 }
+