X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=open-the-eyes-of-my-heart.ly;h=47d37da52e837906a399e7cfe994e043e4b1c1d0;hb=bd3b595932c04f7eb329df944c474f89bce236af;hp=04c9ea69ee2102fdae1256350b4f9af8d5e43481;hpb=6f8ca2d1ddc26dc34f0be9b733d6ef860005c06d;p=music diff --git a/open-the-eyes-of-my-heart.ly b/open-the-eyes-of-my-heart.ly index 04c9ea6..47d37da 100644 --- a/open-the-eyes-of-my-heart.ly +++ b/open-the-eyes-of-my-heart.ly @@ -1,17 +1,15 @@ -\version "2.16.0" +\version "2.19.0" \include "pop-chords.ly" \include "english.ly" -% Good sizes are 16, 18, & 20 -staffSize = #18 +% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26) +staffSize = #20 #(set-default-paper-size "letter") #(set-global-staff-size staffSize) #(ly:set-option (quote no-point-and-click)) \header { -%Let's bump up the title size and switch to the chord font. :-) - title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Open The Eyes Of My Heart" } % composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" } arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" } @@ -20,50 +18,35 @@ staffSize = #18 % -% Lead vocal +% Song's structure % - -LeadVox = \relative c'' +Global = { - \set Voice.autoBeaming = ##f -% \set Staff.instrument = #"Lead vox" \clef G \key e \major - \override Staff.TimeSignature #'style = #'() + \numericTimeSignature \time 4/4 -\override Score.SpacingSpanner #'average-spacing-wishes = ##f - - \set Score.markFormatter = #format-mark-box-letters % Intro - r1^\markup { Mid-tempo rock } | % 1 - r1 | % 2 - r1 | % 3 - r1 | % 4 + s1^\markup { Mid-tempo rock } | % 1 + s1*3 | % 2-4 % Verse \repeat volta 2 { -\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" } - - gs8 [ b b b ] ~ b [ gs b b ] ~ | % 5 - b8 [ gs ] ~ gs4 r2 | % 6 - gs8 [ b b b ] ~ b [ gs b b ] ~ | % 7 - b4 r \times 2/3 { gs4 fs e } | % 8 - fs4. e8 ~ e2 | % 9 - r2 \times 2/3 { gs4 fs e } | % 10 - fs4. e8 ~ e2 | % 11 + \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*7 | % 5-11 } \alternative { { - r1 | % 12 + s1 | % 12 } { - r4. e8 gs4 b | % 13 + s1 | % 13 } } @@ -71,30 +54,21 @@ LeadVox = \relative c'' \repeat volta 3 { -% \mark #2 -\mark \markup { \override #'(font-family . sans) { \box { B } } } - - b4 b8 [ b ] ~ b4 cs8 [ cs ] ~ | % 14 - cs4 r4 r2 | % 15 - cs8 [ b b b ] cs [ b gs gs ] ~ | % 16 - gs [ fs ] ~ fs4 r2 | % 17 - gs8. [ b16 ] ~ b8 [ b ] b [ gs b cs ] ~ | % 18 - cs4 r8 gs gs4 b | % 19 - cs4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 20 - gs8 [ fs ] ~ fs4 r2 | % 21 + \mark \markup { \override #'(font-family . sans) { \box { B } } } + s1*8 | % 14-21 } \alternative { { - r1 \bar "||" % 22 -\once \override Score.RehearsalMark #'self-alignment-X = #right -\mark \markup { \italic { D.S. } } + s1 \bar "||" % 22 + \once \override Score.RehearsalMark #'self-alignment-X = #right + \mark \markup { \italic { D.S. } } } { - r4. e8 gs4 b | % 23 + s1 | % 23 } { - r1 | % 24 + s1 | % 24 } } @@ -102,20 +76,67 @@ LeadVox = \relative c'' \repeat volta 2 { -% \mark #3 -\mark \markup { \override #'(font-family . sans) { \box { C } } } - - cs4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 25 - gs8 [ fs ] ( e4 ) ~ e2 | % 26 - cs'4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 27 - gs8 [ fs ] ( e4 ) ~ e2 | % 28 - cs'4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 29 - gs8 [ fs ] ( e4 ) \times 2/3 { gs fs e } | % 30 - fs4. e8 ~ e2 ~ | % 31 - e2. r4 | % 32 + \mark \markup { \override #'(font-family . sans) { \box { C } } } + s1*8 | % 25-32 } } + +% +% Lead vocal +% +LeadVox = \relative c'' +{ + \set Voice.autoBeaming = ##f + + % Intro + + r1*4 | % 1-4 + + % Verse + + gs8 [ b b b ] ~ b [ gs b b ] ~ | % 5 + b8 [ gs ] ~ gs4 r2 | % 6 + gs8 [ b b b ] ~ b [ gs b b ] ~ | % 7 + b4 r \times 2/3 { gs4 fs e } | % 8 + fs4. e8 ~ e2 | % 9 + r2 \times 2/3 { gs4 fs e } | % 10 + fs4. e8 ~ e2 | % 11 + + r1 | % 12 + + r4. e8 gs4 b | % 13 + + % Chorus + + b4 b8 [ b ] ~ b4 cs8 [ cs ] ~ | % 14 + cs4 r4 r2 | % 15 + cs8 [ b b b ] cs [ b gs gs ] ~ | % 16 + gs [ fs ] ~ fs4 r2 | % 17 + gs8. [ b16 ] ~ b8 [ b ] b [ gs b cs ] ~ | % 18 + cs4 r8 gs gs4 b | % 19 + cs4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 20 + gs8 [ fs ] ~ fs4 r2 | % 21 + + r1 | % 22 + + r4. e8 gs4 b | % 23 + + r1 | % 24 + + % Outro + + cs4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 25 + gs8 [ fs ] ( e4 ) ~ e2 | % 26 + cs'4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 27 + gs8 [ fs ] ( e4 ) ~ e2 | % 28 + cs'4 b8 [ b ] ~ b4 gs8 [ gs ] ~ | % 29 + gs8 [ fs ] ( e4 ) \times 2/3 { gs fs e } | % 30 + fs4. e8 ~ e2 ~ | % 31 + e2. r4 | % 32 +} + + LeadVoxText = \lyricmode { O -- pen the eyes _ of my heart _ Lord _ @@ -142,15 +163,8 @@ LeadVoxText = \lyricmode % % Chord names % - Chords = \chordmode { -%Bah, can't we set this globally? -% \popChords - - \override Staff.TimeSignature #'style = #'() - \time 4/4 - % Intro e1:sus2 | % 1 @@ -160,82 +174,56 @@ Chords = \chordmode % Verse - \repeat volta 2 - { - e1:sus2 | % 5 - s1 | % 6 - b1:sus2/ds | % 7 - r1 | % 8 - a1:sus2/cs | % 9 - a1 | % 10 - a4.:6/e e8 s2 | % 11 - } - \alternative - { - { - a1/b | % 12 - } - { - e1 | % 13 - } - } + e1:sus2 | % 5 + s1 | % 6 + b1:sus2/ds | % 7 + r1 | % 8 + a1:sus2/cs | % 9 + a1 | % 10 + a4.:6/e e8 s2 | % 11 + + a1/b | % 12 + + e1 | % 13 % Chorus - \repeat volta 3 - { - b1 | % 14 - cs1:m | % 15 - a2.. b8:sus4 | % 16 - s2 b | % 17 - gs1:m | % 18 - cs1:m | % 19 - fs2..:m a8/b | % 20 - s2.. a8/b | % 21 - } - \alternative - { - { - s1 \bar "||" % 22 - } - { - a1/b | % 23 - } - { - a1/b | % 24 - } - } + b1 | % 14 + cs1:m | % 15 + a2.. b8:sus4 | % 16 + s2 b | % 17 + gs1:m | % 18 + cs1:m | % 19 + fs2..:m a8/b | % 20 + s2.. a8/b | % 21 + + s1 | % 22 + + a1/b | % 23 + + a1/b | % 24 % Outro - \repeat volta 2 - { - e1:sus2 | % 25 - s1 | % 26 - b1:sus2/ds | % 27 - s1 | % 28 - a1:sus2/cs | % 29 - fs2:m a/b | % 30 - a4.:6/e e8 s2 | % 31 - a1/b | % 32 - } + e1:sus2 | % 25 + s1 | % 26 + b1:sus2/ds | % 27 + s1 | % 28 + a1:sus2/cs | % 29 + fs2:m a/b | % 30 + a4.:6/e e8 s2 | % 31 + a1/b | % 32 } % % 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 @@ -246,109 +234,88 @@ StaffC = \relative c % Verse - \repeat volta 2 - { - c1-\markup { \dynamic mf \italic { Colors 1st time, sidestick on DS } } | % 5 - c1 | % 6 - c1 | % 7 - c1 | % 8 - c1 | % 9 - c1 | % 10 - c4. c8 ~ c2 | % 11 - } - \alternative - { - { - c1 | % 12 - } - { -% c4-> \f c-> \< r2-\markup { \italic { dr. fill } } \ff | % 13 - << { \voiceOne c4_> c_> r2_\markup { \italic { dr. fill } } } - \new Voice = "v" { \voiceTwo s4 \f s s4. \< s8 \ff } >> + c1-\markup { \dynamic mf \italic { Colors 1st time, sidestick on DS } } | % 5 + c1 | % 6 + c1 | % 7 + c1 | % 8 + c1 | % 9 + c1 | % 10 + c4. c8 ~ c2 | % 11 -%{ - r2 r4 r8 << { \voiceOne ~ } \new Voice = "v" { \voiceTwo fs8 ~ } >> | % 12 - << { \voiceOne 1 ~ } \context Voice = v { \voiceTwo fs2 ~ fs4. f8 ~ } >> | % 13 - << { \voiceOne 2 } \context Voice = v { \voiceTwo f2 } >> \oneVoice r2 | % 14 -%} + c1 | % 12 - } - } + << { \voiceOne c4_> c_> r2_\markup { \italic { dr. fill } } } + \new Voice = "v" { \voiceTwo s4 \f s s4. \< s8 \ff } >> % Chorus - \repeat volta 3 - { - c4._\markup { \italic { Rock 4 } } c8 ~ c2 | % 14 - c4. c8 ~ c2 | % 15 - c4. c8 ~ c4. c8 ~ | % 16 - c2 c4_\markup { \italic { dr. fill } } c | % 17 - c4. c8 ~ c2 | % 18 - c4. c8 ~ c2 | % 19 - c4. c8 ~ c4. c8 ~ | % 20 - c4 c c c8 [ c ] ~ | % 21 - } - \alternative - { - { - c1 | % 22 - } - { - c4_> c_> r2_\markup { \italic { dr. fill } } | % 23 - } - { -% << c1 \\ { s4 \> s2 s4 \! } >> | % 24 - << { \voiceOne c1 } \context Voice = v { \voiceTwo s4 \> s2 s4 \! } >> | % 24 - } - } + c4._\markup { \italic { Rock 4 } } c8 ~ c2 | % 14 + c4. c8 ~ c2 | % 15 + c4. c8 ~ c4. c8 ~ | % 16 + c2 c4_\markup { \italic { dr. fill } } c | % 17 + c4. c8 ~ c2 | % 18 + c4. c8 ~ c2 | % 19 + c4. c8 ~ c4. c8 ~ | % 20 + c4 c c c8 [ c ] ~ | % 21 + + c1 | % 22 + + c4_> c_> r2_\markup { \italic { dr. fill } } | % 23 + + << { \voiceOne c1 } \context Voice = v { \voiceTwo s4 \> s2 s4 \! } >> | % 24 % Outro - \repeat volta 2 - { - c1_\markup { \dynamic mf \italic { Floating } } | % 25 - c1 | % 26 - c1 | % 27 - c1 | % 28 - c1 | % 29 - c2 c | % 30 - c4. c8^\fermata _\markup { \italic { Last time } } ~ c2 | % 31 - c1 | % 32 - } + c1_\markup { \dynamic mf \italic { Floating } } | % 25 + c1 | % 26 + c1 | % 27 + c1 | % 28 + c1 | % 29 + c2 c | % 30 + c4. c8^\fermata _\markup { \italic { Last time } } ~ c2 | % 31 + c1 | % 32 } \score { << -% \new ChoirStaff = "Vox" + \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 ChoirStaff = "Rhythm" + \new ChoirStaff << - \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" + "LilyJAZZText" + "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 } +