X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=i-stand-amazed-in-the-presence.ly;h=5b5b169fe10d1519508e5a034e51d48d6c524021;hb=bd3b595932c04f7eb329df944c474f89bce236af;hp=dbc1f8a148b5fbc1d055a69903c36382d8cc64d0;hpb=6f8ca2d1ddc26dc34f0be9b733d6ef860005c06d;p=music diff --git a/i-stand-amazed-in-the-presence.ly b/i-stand-amazed-in-the-presence.ly index dbc1f8a..5b5b169 100644 --- a/i-stand-amazed-in-the-presence.ly +++ b/i-stand-amazed-in-the-presence.ly @@ -1,4 +1,4 @@ -\version "2.16.0" +\version "2.19.0" \include "pop-chords.ly" \include "english.ly" @@ -13,8 +13,6 @@ staffSize = #23 \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" } @@ -23,71 +21,96 @@ staffSize = #23 % -% 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 @@ -96,15 +119,16 @@ LeadVox = \relative c' 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 @@ -157,56 +181,41 @@ LeadVoxTextC = \lyricmode % % 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) @@ -230,63 +239,46 @@ 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... - 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) @@ -297,13 +289,13 @@ StaffC = \relative c 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 } @@ -321,17 +313,20 @@ Dynamics = \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 @@ -344,7 +339,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "LilyJAZZText" "Luxi Mono" (/ staffSize 20))) @@ -357,6 +352,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) } +