X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=he-who-began-a-good-work-in-you.ly;h=47e36cbc24c2a21eb11e62834ace72cd5b0dec37;hb=bd3b595932c04f7eb329df944c474f89bce236af;hp=817908cef5770a9a87cbe7dcb28f54cda75bc369;hpb=6f8ca2d1ddc26dc34f0be9b733d6ef860005c06d;p=music diff --git a/he-who-began-a-good-work-in-you.ly b/he-who-began-a-good-work-in-you.ly index 817908c..47e36cb 100644 --- a/he-who-began-a-good-work-in-you.ly +++ b/he-who-began-a-good-work-in-you.ly @@ -19,42 +19,104 @@ staffSize = #16 % -% Lead vocal +% Song's structure % - -LeadXvoxA = \relative c' +Global = { -% \set Voice.autoBeaming = ##f - \set Staff.instrumentName = #"Lead vox" \clef G \key a \major + \numericTimeSignature \time 4/4 -\override Score.SpacingSpanner #'average-spacing-wishes = ##f - -% \set Score.markFormatter = #format-mark-box-letters \repeat volta 2 { - R1^"Moderately, not too slow" | % 1 - R1 | % 2 + s1^"Moderately, not too slow" | % 1 + s1 | % 2 } \alternative { { - R1 | % 3 - R1 | % 4 + s1*2 | % 3-4 } { - R1 | % 5 - R1 \bar "||" % 6 + s1*2 \bar "||" % 5-6 } } % Chorus -%\mark \markup { \override #'(font-family . sans) { \box { A } } } -\once \override Score.RehearsalMark #'self-alignment-X = #left -\mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" } + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { \override #'(font-family . sans) { \box { A } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" } + + s1*12 | % 7-18 + + s2... \once \override Score.RehearsalMark #'self-alignment-X = #right + \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" } s16 | % 19 + + s1 \bar "||" % 20 + + % Interlude + + s1*4 \bar"||" % 21-24 + + % Verse + + \mark \markup { \override #'(font-family . sans) { \box { B } } } + + s1*15 | % 25-39 + R1 + \once \override Score.RehearsalMark #'self-alignment-X = #right + \mark "D.S. al Coda" + \bar "||" % 40 +% \break + + % Coda (chorus again) + +\stopStaff s1 \startStaff +% s1 +\set Score.currentBarNumber = #41 + + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { { \musicglyph #"scripts.coda" } "Coda" } + + s1 \bar "||" % 43 + + \mark \markup { \override #'(font-family . sans) { \box { C } } } + + s1*14 | % 42-55 + + % Ending + + \repeat volta 2 + { + s1*2 | % 56-57 + } + \alternative + { + { + s1*2 | % 58-59 + } + { + s1 | % 60 + } + } + + s1 \bar "|." % 61 +} + + +% +% Lead vocal +% +LeadXvoxA = \relative c' +{ + \clef G + + % Intro + + R1*6 | % 1-6 + + % Chorus \stemUp a'4. gs8 ~ gs4 r8 e | % 7 fs [ gs ] a [ b ~ ] b gs4 e8 ~ | % 8 @@ -69,10 +131,6 @@ LeadXvoxA = \relative c' d [ cs ] \stemUp b [ a ] \stemDown cs [ b ~ ] b4 | % 17 r2 r8 b cs [ d ~ ] | % 18 d [ cs ] \stemUp b [ a ~ ] a [ b ] \stemDown cs [ d ~ ] | % 19 -%\mark \markup { \musicglyph #"scripts.coda" } | % 19 -\once \override Score.RehearsalMark #'self-alignment-X = #right -\mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" } - d [ cs ] \stemUp b [ a ] a [ b ] gs [ a ~ ] \bar "||" % 20 % Interlude @@ -80,12 +138,10 @@ LeadXvoxA = \relative c' a2 r | % 21 R1 | % 22 R1 | % 23 - r2. r8 cs,16 [ d ] \bar"||" % 24 + r2. r8 cs,16 [ d ] | % 24 % Verse -\mark \markup { \override #'(font-family . sans) { \box { B } } } - e8 [ e ] e [ e ~ ] e [ d ] cs4 | % 25 e8 [ fs ] gs [ a ~ ] a [ gs ] e [ d ~ ] | % 26 d4 r r8 e fs [ b, ] ~ | % 27 @@ -101,25 +157,13 @@ LeadXvoxA = \relative c' gs8 [ gs ] gs [ gs ~ ] gs fs4 e8 | % 37 \times 2/3 { gs4 gs gs } \times 2/3 { gs a \stemDown b } | % 38 \stemUp a1 | % 39 - R1 -\once \override Score.RehearsalMark #'self-alignment-X = #right -\mark "D.S. al Coda" - \bar "||" % 40 -% \break + R1 | % 40 % Coda (chorus again) -%\stopStaff s1 \startStaff -s1 -\set Score.currentBarNumber = #41 - -\once \override Score.RehearsalMark #'self-alignment-X = #left -\mark \markup { { \musicglyph #"scripts.coda" } "Coda" } - - d8 \repeatTie [ cs ] \stemUp b [ a ] a [ b ] gs4 \bar "||" \mark \default % 43 - -\mark \markup { \override #'(font-family . sans) { \box { C } } } + s1 % Blank bar for coda + d8 \repeatTie [ cs ] \stemUp b [ a ] a [ b ] gs4 | % 41 \stemUp a4. gs8 ~ gs4 r8 e | % 42 fs [ gs ] a [ b ~ ] b gs4 e8 ~ | % 43 e2 r | % 44 @@ -133,88 +177,69 @@ s1 d [ cs ] \stemUp b [ a ] \stemDown cs [ b ~ ] b4 | % 52 r2 r8 b cs [ d ~ ] | % 53 d [ cs ] \stemUp b [ a ~ ] a [ b ] \stemDown cs [ d ~ ] | % 54 -% d [ cs ] \stemUp b [ a ] a [ b ] gs [ a ~ ] \bar "|:" % 55 d [ cs ] \stemUp b [ a ] a [ b ] gs4 | % 55 % Ending - \repeat volta 2 - { - a2 r | % 56 - R1 | % 57 - } - \alternative - { - { - R1 | % 58 - R1 | % 59 - } - { - R1 | % 60 - } - } + a2 r | % 56 + R1 | % 57 + + R1 | % 58 + R1 | % 59 - r1^\fermata \bar "|." % 61 + R1 | % 60 + + r1^\fermata | % 61 } + LeadXvoxATextA = \lyricmode { - He who _ be- gan a good work _ in you _ - He who _ be- gan a good work _ in you _ - _ Will be fai- _ thful to com- plete it _ - Will be fai- _ thful to com- plete it _ - He who start- _ ed the work _ will be fai- - _ thful to com- plete it in you _ - - If the trou- ble you're fac- _ ing is - slow- ly re- pla- _ cing your hope _ with des- pair _ - And the pro- cess is long _ and you're - lo- sing your songs _ in the night _ - You can be sure _ that the Lord has his hand _ on you - Safe and se- cure _ He will ne- ver a- band- _ on you - You are his trea- _ sure And - He finds His plea- sure in you - - _ thful to com- plete it in - - He who _ be- gan a good work _ in you _ - He who _ be- gan a good work _ in you _ - _ Will be fai- _ thful to com- plete it _ - Will be fai- _ thful to com- plete it _ - He who start- _ ed the work _ will be fai- - _ thful to com- plete it in you _ + He who _ be- gan a good work _ in you _ + He who _ be- gan a good work _ in you _ + _ Will be fai- _ thful to com- plete it _ + Will be fai- _ thful to com- plete it _ + He who start- _ ed the work _ will be fai- + _ thful to com- plete it in you _ + + If the trou- ble you're fac- _ ing is + slow- ly re- pla- _ cing your hope _ with des- pair _ + And the pro- cess is long _ and you're + lo- sing your songs _ in the night _ + You can be sure _ that the Lord has his hand _ on you + Safe and se- cure _ He will ne- ver a- band- _ on you + You are his trea- _ sure And + He finds His plea- sure in you + + _ thful to com- plete it in + + He who _ be- gan a good work _ in you _ + He who _ be- gan a good work _ in you _ + _ Will be fai- _ thful to com- plete it _ + Will be fai- _ thful to com- plete it _ + He who start- _ ed the work _ will be fai- + _ thful to com- plete it in you _ } % % Background vocals % - BgXvoxA = \relative c' { -% \set Voice.autoBeaming = ##f - \set Staff.instrumentName = #"BG vox" \clef G - \key a \major - \time 4/4 + \numericTimeSignature - \repeat volta 2 - { - R1 | % 1 - R1 | % 2 - } - \alternative - { - { - R1 | % 3 - R1 | % 4 - } - { - R1 | % 5 - R1 | % 6 - } - } - \bar "||" + % Intro + + R1 | % 1 + R1 | % 2 + + R1 | % 3 + R1 | % 4 + + R1 | % 5 + R1 | % 6 % Chorus @@ -275,9 +300,8 @@ BgXvoxA = \relative c' % Coda (chorus again) \stopStaff s1 \startStaff -\set Score.currentBarNumber = #41 - R1 \bar "||" % 41 + R1 | % 41 R1 | % 42 R1 | % 43 @@ -296,25 +320,18 @@ BgXvoxA = \relative c' % Ending - \repeat volta 2 - { - R1 | % 56 - R1 | % 57 - } - \alternative - { - { - R1 | % 58 - R1 | % 59 - } - { - R1 | % 60 - } - } + R1 | % 56 + R1 | % 57 - r1^\fermata \bar "|." % 61 + R1 | % 58 + R1 | % 59 + + R1 | % 60 + + r1^\fermata | % 61 } + BgXvoxATextA = \lyricmode { %\set associatedVoice = foo @@ -330,171 +347,96 @@ BgXvoxATextA = \lyricmode % % Instrumental lines % - RhythmB = \relative c' { -% \set Voice.autoBeaming = ##f -% \set Staff.instrumentName = #"Rhythm" \clef G - \key a \major - \time 4/4 - - \repeat volta 2 - { - \stemDown a'8 [ b cs b ~ ] b [ e ~ ] e4 | - d8 [ e cs b ~ ] b2 | % 4 - } - \alternative - { - { - a8 [ b cs b ~ ] b [ e cs a ~ ] | - \stemUp a1 | - } - { - \stemDown a8 [ b cs b ~ ] b [ e cs a ~ ] | - \stemUp a1 | - } - } - \bar "||" + \tiny + + % Intro + + \stemDown a'8 [ b cs b ~ ] b [ e ~ ] e4 | % 1 + d8 [ e cs b ~ ] b2 | % 2 + + a8 [ b cs b ~ ] b [ e cs a ~ ] | % 3 + \stemUp a1 | % 4 + + \stemDown a8 [ b cs b ~ ] b [ e cs a ~ ] | % 5 + \stemUp a1 | % 6 % Chorus - R1 | % 9 - R1 | - R1 | % 11 - R1 | - R1 | % 13 - R1 | - R1 | % 15 - R1 | - R1 | % 17 - R1 | - R1 | % 19 - R1 | - R1 | % 21 - R1 | + s1*14 | % 7-20 % Interlude - \stemDown a8 [ b cs b ~ ] b [ e ~ ] e4 | - d8 [ e cs b ~ ] b2 | % 24 - a8 [ b cs b ~ ] b [ e cs a ~ ] | - \stemUp a1 | % 26 + \stemDown a8 [ b cs b ~ ] b [ e ~ ] e4 | % 21 + d8 [ e cs b ~ ] b2 | % 22 + a8 [ b cs b ~ ] b [ e cs a ~ ] | % 23 + \stemUp a1 | % 24 % Verse - R1 | - R1 | - R1 | % 29 - R1 | - R1 | % 31 - R1 | - R1 | % 33 - R1 | - R1 | % 35 - R1 | - R1 | % 37 - R1 | - R1 | % 39 - R1 | - R1 | % 41 - R1 | + s1*16 | % 25-40 % Coda (chorus again) -\stopStaff s1 \startStaff -\set Score.currentBarNumber = #41 + s1 % Blank bar for coda - R1 \bar "||" % 43 - R1 | - R1 | % 45 - R1 | - R1 | % 47 - R1 | - R1 | % 49 - R1 | - R1 | % 51 - R1 | - R1 | % 53 - R1 | - R1 | % 55 - R1 | - R1 | % 57 + s1*15 | % 41-55 % Ending - \repeat volta 2 - { - \stemDown a8 [ b cs b ~ ] b [ e ~ ] e4 | - d8 [ e cs b ~ ] b2 | % 4 - } - \alternative - { - { - a8 [ b cs b ~ ] b [ e cs a ~ ] | - \stemUp a1 | - } - { - \stemDown a8 [ b cs b ~ ] b [ e cs a ~ ] | - } - } + \stemDown a8 [ b cs b ~ ] b [ e ~ ] e4 | % 56 + d8 [ e cs b ~ ] b2 | % 57 + + a8 [ b cs b ~ ] b [ e cs a ~ ] | % 58 + \stemUp a1 | % 59 - \stemUp a1^\fermata \bar "|." + \stemDown a8 [ b cs b ~ ] b [ e cs a ~ ] | % 60 + + \stemUp a1^\fermata | % 61 } % % Chord names % - Chords = \chordmode { -%Bah, can't we set this globally? -%\set chordNameExceptions = #popChords -%\set chordRootNamer = #chord-name->pop-markup + % Intro -% \popChords + a4. cs4.:m7 s4 | % 1 + d4. e4.:sus4 e4 | % 2 - \repeat volta 2 - { - a4. cs4.:m7 s4 | - d4. e4.:sus4 e4 | % 4 - } - \alternative - { - { - a4. cs2:m7 d8 | - s2 d/e | - } - { - fs4.:m7 e2 d8 | - s2 d/e | - } - } + a4. cs2:m7 d8 | % 3 + s2 d/e | % 4 + + fs4.:m7 e2 d8 | % 5 + s2 d/e | % 6 % Chorus - a4. e4./gs s4 | - d4./fs e4./gs s8 cs8:m7 | % 10 - s1 | - b2:m7 d/e | % 12 - a4. e/gs s4 | - d4./fs e2/gs cs8:sus4.7 | % 14 - s2. s8 cs:7 | - s1 | % 16 - b1:m7 | - e4.:sus4 e s4 | % 18 - b1:m7 | - e4.:sus4 e s8 d8 | % 20 - s4. a2/cs b8:m7 | - s2 d4/e e | % 22 + a4. e4./gs s4 | % 7 + d4./fs e4./gs s8 cs8:m7 | % 8 + s1 | % 9 + b2:m7 d/e | % 10 + a4. e/gs s4 | % 11 + d4./fs e2/gs cs8:sus4.7 | % 12 + s2. s8 cs:7 | % 13 + s1 | % 14 + b1:m7 | % 15 + e4.:sus4 e s4 | % 16 + b1:m7 | % 17 + e4.:sus4 e s8 d8 | % 18 + s4. a2/cs b8:m7 | % 19 + s2 d4/e e | % 20 % Interlude - a4. cs4.:m7 s4 | - d4. e4.:sus4 e4 | % 24 - fs4.:m7 e2 d8 | - s2 d/e | % 26 + a4. cs4.:m7 s4 | % 21 + d4. e4.:sus4 e4 | % 22 + fs4.:m7 e2 d8 | % 23 + s2 d/e | % 24 % Verse @@ -522,7 +464,8 @@ Chords = \chordmode % Coda (chorus again) -s1 | +s1 % Blank bar for coda + b2:m7 d4/e e | % 43 a4. e4./gs s4 | d4./fs e4./gs s8 cs8:m7 | % 45 @@ -543,21 +486,14 @@ s1 | % Ending - \repeat volta 2 - { - a4. cs4.:m7 s4 | - d4. e4.:sus4 e4 | % 59 - } - \alternative - { - { - a4. cs2:m7 d8 | - s2 d/e | - } - { - fs4.:m7 e2 d8 | - } - } + + a4. cs4.:m7 s4 | + d4. e4.:sus4 e4 | % 59 + + a4. cs2:m7 d8 | + s2 d/e | + + fs4.:m7 e2 d8 | s1 | } @@ -566,35 +502,22 @@ s1 | % % Chord rhythms % - -% Use a RhythmicStaff on the chords instead of this? -% It almost works, but not quite. Doesn't collapse chords to single notes... - StaffC = \relative c { -% \set Voice.autoBeaming = ##f -% \set Staff.instrumentName = #"Rhythm" - \time 4/4 - + \numericTimeSignature \override NoteHead #'style = #'slash + \teeny - \repeat volta 2 - { - \stemDown c'4. c8 ~ c4 c | %1 - c4. c8 ~ c4 c | % 2 - } - \alternative - { - { - c4. c8 ~ c4. c8 ~ | % 3 - c4 c c c | % 4 - } - { - c4. c8 ~ c4. c8 ~ | % 5 - c4 c c c | % 6 - } - } - \bar "||" + % Intro + + \stemDown c'4. c8 ~ c4 c | %1 + c4. c8 ~ c4 c | % 2 + + c4. c8 ~ c4. c8 ~ | % 3 + c4 c c c | % 4 + + c4. c8 ~ c4. c8 ~ | % 5 + c4 c c c | % 6 % Chorus @@ -644,9 +567,8 @@ StaffC = \relative c % Coda (chorus again) \stopStaff s1 \startStaff -\set Score.currentBarNumber = #41 - c4 c c c \bar "||" % 41 + c4 c c c | % 41 c4. c8 ~ c4 c | % 42 c4. c8-> c4 r8 c8 ~ | % 43 c4 c c c | % 44 @@ -665,58 +587,64 @@ StaffC = \relative c % Ending - \repeat volta 2 - { - \stemDown c4. c8 ~ c4 c | % 56 - c4. c8 ~ c4 c | % 57 - } - \alternative - { - { - c4. c8 ~ c4. c8 ~ | % 58 - c4 c c c | % 59 - } - { - c4._\markup { \italic { rit. } } c8 ~ c4. c8 ~ | % 60 - } - } - c1 ^\fermata \bar "|." % 61 + \stemDown c4. c8 ~ c4 c | % 56 + c4. c8 ~ c4 c | % 57 + + c4. c8 ~ c4. c8 ~ | % 58 + c4 c c c | % 59 + + c4._\markup { \italic { rit. } } c8 ~ c4. c8 ~ | % 60 + + c1 ^\fermata | % 61 } \score { << - \new ChoirStaff = "Vox" + \Global % The "roadmap" that everything else depends on + + \context Staff << - \new Staff = LeadVox { \new Voice = "lead" \LeadXvoxA } + \new Voice = "lead" \LeadXvoxA \new Lyrics \lyricsto "lead" \LeadXvoxATextA - \new Staff = BgVox { \new Voice = "bg" \BgXvoxA } + \new Voice \RhythmB + >> + + \new Staff + << + \new Voice = "bg" \BgXvoxA \new Lyrics \lyricsto "bg" \BgXvoxATextA >> - \new ChoirStaff = "Rhythm" + \new ChoirStaff << - \new Staff = "riff" \RhythmB - \new ChordNames = "chords" \Chords - \new RhythmicStaff = "chordRhythm" \StaffC + \new ChordNames \Chords + \new RhythmicStaff \StaffC >> \set Score.skipBars = ##t \set Score.melismaBusyProperties = #'() >> - \layout { -% ragged-last-bottom = ##t - ragged-last = ##t - } } \paper { - #(define fonts (make-pango-font-tree - "Times New Roman" - "DomCasual BT" - "Luxi Mono" - (/ staffSize 20))) + #(define fonts (make-pango-font-tree + "Times New Roman" + "JazzText" + "Luxi Mono" + (/ staffSize 20))) + +% Don't 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 } +