X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=do-you-know.ly;h=25a1361574688c7e7ef881ab048cb6713d57ac37;hb=bd3b595932c04f7eb329df944c474f89bce236af;hp=6ae20a77ef02ed79bf7b86dde34d77366e7bb87d;hpb=6f8ca2d1ddc26dc34f0be9b733d6ef860005c06d;p=music diff --git a/do-you-know.ly b/do-you-know.ly index 6ae20a7..25a1361 100644 --- a/do-you-know.ly +++ b/do-you-know.ly @@ -3,7 +3,7 @@ \include "english.ly" % Good sizes are 16, 18, & 20 -staffSize = #16 +staffSize = #18 #(set-default-paper-size "letter") #(set-global-staff-size staffSize) #(ly:set-option (quote no-point-and-click)) @@ -12,8 +12,6 @@ staffSize = #16 \header { -%Let's bump up the title size and switch to the chord font. :-) - title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Do You Know" } % composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Traditional" } arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" } @@ -22,84 +20,108 @@ staffSize = #16 % -% Lead vocal +% Song's structure % - -LeadVox = \relative c' +Global = { -% \set Voice.autoBeaming = ##f -% \set Staff.instrument = #"Lead vox" - \clef G \key a \major - \override Staff.TimeSignature #'style = #'() + \numericTimeSignature \time 4/4 -\override Score.SpacingSpanner #'average-spacing-wishes = ##f % Intro - R1^\markup { \italic { Light ballad } } | % 1 - R1 | % 2 - R1 | % 3 - r2 r4. cs16 [ d ] | % 4 + s1^\markup { \italic { Light ballad } } | % 1 + s1*3 | % 2-4 \repeat volta 4 { % Verse -\once \override Score.RehearsalMark #'self-alignment-X = #left -\mark \markup { \override #'(font-family . sans) { \box { A } } \small \italic { Solo 3rd time } } + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { \override #'(font-family . sans) { \box { A } } \small \italic { Solo 3rd time } } - e8 [ e e fs ] ~ fs4 fs | % 5 - e4 d cs r8 cs16 [ d ] | % 6 -%\break - e8 [ e e fs ] ~ fs4 fs | % 7 - e4 b' a r8 a16 [ b ] | % 8 - cs2 b4 r8 b16 [ cs ] | % 9 - d4. cs8 cs4 r8 a16 [ gs ] | % 10 - fs8 [ gs a a ] ~ a4 b | % 11 - cs4 gs a2 \bar "||" % 12 + s1*8 \bar "||" % 5-12 % Refrain \time 2/4 + \mark \markup { \musicglyph #"scripts.segno" } -\mark \markup { \musicglyph #"scripts.segno" } - - r4^\markup { \hspace #0.0 \raise #1.0 \italic { end solo } } a8 [ b ] \bar "||" % 13 + s4^\markup { \hspace #0.0 \raise #1.0 \italic { end solo } } s \bar "||" % 13 \time 4/4 -\once \override Score.RehearsalMark #'self-alignment-X = #left -\mark \markup { \override #'(font-family . sans) { \box { B } } \small \italic { No groove on D.S. } } + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { \override #'(font-family . sans) { \box { B } } \small \italic { No groove on D.S. } } - cs2 b4 b8 [ cs ] | % 14 - d2 cs4 r8 e, | % 15 - fs8 [ gs a cs ] ~ cs [ a ] a4 | % 16 - fs8 [ gs a cs ] ~ cs [ a ] a4 | % 17 -%\break - fs8 [ gs a cs ] ~ cs [ a ] a4 | % 18 + s1*5 | % 14-18 } \alternative { { \time 2/4 - b8 [ cs ] gs8. ([ a16 ]) | % 19 + s2 | % 19 \time 4/4 - a2 r | % 20 - r2 r4. cs,16 [ d ] | % 21 + s1*2 | % 20-21 } { - b'8 [ cs ] gs8. ([ a16 ]) a2^\markup { \hspace #1.8 \raise #0.6 { D.S. } } \bar "||" % 22 + s2 s^\markup { \hspace #1.8 \raise #0.6 { D.S. } } \bar "||" % 22 } { - b8 [ cs ] gs8. ([ a16 ]) a2-\fermata \bar "|." | % 23 + s1 \bar "|." % 23 } } } + +% +% Lead vocal +% +LeadVox = \relative c' +{ + \clef G + + % Intro + + R1*3 | % 1-3 + r2 r4. cs16 [ d ] | % 4 + + % Verse + + e8 [ e e fs ] ~ fs4 fs | % 5 + e4 d cs r8 cs16 [ d ] | % 6 +%\break + e8 [ e e fs ] ~ fs4 fs | % 7 + e4 b' a r8 a16 [ b ] | % 8 + cs2 b4 r8 b16 [ cs ] | % 9 + d4. cs8 cs4 r8 a16 [ gs ] | % 10 + fs8 [ gs a a ] ~ a4 b | % 11 + cs4 gs a2 | % 12 + + % Refrain + + r4 a8 [ b ] | % 13 + + cs2 b4 b8 [ cs ] | % 14 + d2 cs4 r8 e, | % 15 + fs8 [ gs a cs ] ~ cs [ a ] a4 | % 16 + fs8 [ gs a cs ] ~ cs [ a ] a4 | % 17 +%\break + fs8 [ gs a cs ] ~ cs [ a ] a4 | % 18 + + b8 [ cs ] gs8. ([ a16 ]) | % 19 + + a2 r | % 20 + r2 r4. cs,16 [ d ] | % 21 + + b'8 [ cs ] gs8. ([ a16 ]) a2 | % 22 + + b8 [ cs ] gs8. ([ a16 ]) a2-\fermata | % 23 +} + LeadVoxText = \lyricmode { Do you know what the blood _ has done for me, @@ -123,14 +145,11 @@ LeadVoxText = \lyricmode % % Riff/rhythm figures % - StaffRiffs = \relative c' { -% \set Voice.autoBeaming = ##f -% \set Staff.instrument = #"Rhythm" \key a \major - \override Staff.TimeSignature #'style = #'() - \time 4/4 + \numericTimeSignature + \time 4/4 % Intro @@ -140,14 +159,13 @@ StaffRiffs = \relative c' 8 [ a, a, ] [ a, a, ] | % 4 \stopStaff - s1*7 | % 5 - 12 - \time 2/4 + s1*8 | % 5-12 + s2 | % 13 - \time 4/4 - s1*6 | % 14 - 18 - \time 2/4 + + s1*5 | % 14-18 + s2 | % 19 - \time 4/4 \startStaff 8 [ a, a, ] [ a, a, ] | % 20 @@ -159,12 +177,8 @@ StaffRiffs = \relative c' % % Chord names % - Chords = \chordmode { -% Bah, can't we set this globally? -% \popChords - % Intro a1:sus2 | % 1 @@ -172,52 +186,35 @@ Chords = \chordmode a1:sus2 | % 3 d2:6.9 e:sus4 | % 4 - \repeat volta 4 - { - % Verse + % Verse - a2 d | % 5 - a4/e e:7 a2 | % 6 - a2 d | % 7 - a4/e f:dim7 fs2:m7 | % 8 - a2/e e | % 9 - b2:m7 fs:m7 | % 10 - b2:m7 a/cs | % 11 - d4:maj7 e a2 \bar "||" % 12 + a2 d | % 5 + a4/e e:7 a2 | % 6 + a2 d | % 7 + a4/e f:dim7 fs2:m7 | % 8 + a2/e e | % 9 + b2:m7 fs:m7 | % 10 + b2:m7 a/cs | % 11 + d4:maj7 e a2 | % 12 - % Refrain + % Refrain - \time 2/4 + e2/gs | % 13 - e2/gs \bar "||" % 13 + fs2:m7 e | % 14 + b2:m7 fs:m7 | % 15 + d4. a8/cs s2 | % 16 + b4.:m7 fs8:m7 s2 | % 17 + d4. a8/cs s2 | % 18 - \time 4/4 + b4:m7 e | % 19 - fs2:m7 e | % 14 - b2:m7 fs:m7 | % 15 - d4. a8/cs s2 | % 16 - b4.:m7 fs8:m7 s2 | % 17 - d4. a8/cs s2 | % 18 - } - \alternative - { - { - \time 2/4 - - b4:m7 e | % 19 + a1:sus2 | % 20 + d2:6.9 e:sus4 | % 21 - \time 4/4 + b4:m7 e a2 | % 22 - a1:sus2 | % 20 - d2:6.9 e:sus4 | % 21 - } - { - b4:m7 e a2 \bar "||" % 22 - } - { - b4:m7 e a2 \bar "|." | % 23 - } - } + b4:m7 e a2 | % 23 } @@ -230,11 +227,9 @@ Chords = \chordmode 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 @@ -243,60 +238,46 @@ StaffC = \relative c c4 c c c | % 3 c4 c c c | % 4 - \repeat volta 4 - { - % 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 + % Verse - % Refrain + 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 - \time 2/4 + % Refrain - c4 c \bar "||" % 13 + c4 c | % 13 - \time 4/4 + c4 c c c | % 14 + c4 c c c | % 15 + c4. c8 ~ c2 | % 16 + c4. c8 ~ c2 | % 17 + c4. c8 ~ c2 | % 18 - c4 c c c | % 14 - c4 c c c | % 15 - c4. c8 ~ c2 | % 16 - c4. c8 ~ c2 | % 17 - c4. c8 ~ c2 | % 18 - } - \alternative - { - { - \time 2/4 + c4 c | % 19 - c4 c | % 19 + c4 c c c | % 20 + c4 c c c | % 21 - \time 4/4 + c4 c c c | % 22 - c4 c c c | % 20 - c4 c c c | % 21 - } - { - c4 c c c \bar "||" % 22 - } - { - c4-\markup { \italic { rit. } } c c2-\fermata \bar "|." | % 23 - } - } + c4-\markup { \italic { rit. } } c c2-\fermata | % 23 } \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 >> @@ -313,51 +294,12 @@ StaffC = \relative c \new ChoirStaff = "Rhythm" << - \new ChordNames = "chords" \Chords - \new RhythmicStaff = "chordRhythm" \StaffC + \new ChordNames \Chords + \new RhythmicStaff \StaffC >> \set Score.melismaBusyProperties = #'() >> - - \layout - { -% \context { \Staff \RemoveEmptyStaves } -% ragged-last-bottom = ##t -% ragged-last = ##t - - \context - { - \Score - \remove "Timing_translator" - \remove "Default_bar_line_engraver" - \remove "Repeat_acknowledge_engraver" - } - \context - { -% \Staff - \Staff \RemoveEmptyStaves - \consists "Timing_translator" - \consists "Default_bar_line_engraver" - \consists "Repeat_acknowledge_engraver" - } - \context - { - \RhythmicStaff - \consists "Timing_translator" - \consists "Default_bar_line_engraver" - \consists "Repeat_acknowledge_engraver" - } -%{ - \context - { - \ChordNames - \consists "Timing_translator" - \consists "Default_bar_line_engraver" - \consists "Repeat_acknowledge_engraver" - } -%} - } } @@ -365,7 +307,18 @@ StaffC = \relative c { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "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 } +