From: Shamus Hammons Date: Sat, 19 Aug 2017 00:01:37 +0000 (-0500) Subject: Added various charts. X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=music;a=commitdiff_plain;h=d4413d5e258a1387025e91e1b5a805cb7c7723e6 Added various charts. Added Chopin prelude Opus 28 #20, Here I Am To Worship, Wait By The Water, Linus and Lucy, Word Of God Speak. The latter had been added, but didn't have any of the song in it, so that's been fixed. --- diff --git a/blessed-assurance.ly b/blessed-assurance.ly index 0054755..8613b6d 100644 --- a/blessed-assurance.ly +++ b/blessed-assurance.ly @@ -628,7 +628,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -641,6 +641,6 @@ 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) +%let's try this: [It works! Huzzah!][nope :-P] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/blessed-be-your-name.ly b/blessed-be-your-name.ly index 0250643..d913ea1 100644 --- a/blessed-be-your-name.ly +++ b/blessed-be-your-name.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)) @@ -505,16 +505,16 @@ Dynamics = { << << -% \new Staff = leadStaff { \new Voice = "lead" \LeadVox } - \new Staff = leadStaff { \new Voice = "lead" \transpose b a \LeadVox } + \new Staff = leadStaff { \new Voice = "lead" \LeadVox } +% \new Staff = leadStaff { \new Voice = "lead" \transpose b a \LeadVox } \new Lyrics \lyricsto "lead" \LeadVoxText \new Lyrics \lyricsto "lead" \LeadVoxTextB >> \new ChoirStaff = "Rhythm" << -% \new ChordNames = "chords" \Chords - \new ChordNames = "chords" \transpose b a \Chords + \new ChordNames = "chords" \Chords +% \new ChordNames = "chords" \transpose b a \Chords \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >> >> @@ -535,7 +535,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) diff --git a/chopin-prelude-op28-no20.ly b/chopin-prelude-op28-no20.ly new file mode 100644 index 0000000..e4db142 --- /dev/null +++ b/chopin-prelude-op28-no20.ly @@ -0,0 +1,221 @@ +\version "2.16.0" + +\header { + enteredby = "Magnus Lewis-Smith" + maintainer = "Magnus Lewis-Smith" + maintainerEmail = "mlewissmith (at) users.sourceforge.net" + copyright = "Public Domain" + filename = "chopin.prelude.op28.no20.ly" + title = "Prelude" + subtitle = "'Funeral March'" + opus = "Op. 28, No. 20" + composer = "Frederic Chopin (1810-1849)" + style = "Classical" + source = "Edition Peters" + lastupdated = "20 Sep 2004" + + mutopiainstrument = "Piano" + mutopiatitle = "Prelude: Op. 28, No. 20" + mutopiacomposer = "ChopinFF" + mutopiaopus = "Op. 28" + mutopiastyle = "Romantic" + mutopiadate = "1838/39" + + footer = "Mutopia-2011/06/19-472" + tagline = \markup { \override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7) \box \center-column { \small \line { Sheet music from \with-url #"http://www.MutopiaProject.org" \line { \teeny www. \hspace #-1.0 MutopiaProject \hspace #-1.0 \teeny .org \hspace #0.5 } • \hspace #0.5 \italic Free to download, with the \italic freedom to distribute, modify and perform. } \line { \small \line { Typeset using \with-url #"http://www.LilyPond.org" \line { \teeny www. \hspace #-1.0 LilyPond \hspace #-1.0 \teeny .org } by \maintainer \hspace #-1.0 . \hspace #0.5 Reference: \footer } } \line { \teeny \line { This sheet music has been placed in the public domain by the typesetter, for details see: \hspace #-0.5 \with-url #"http://creativecommons.org/licenses/publicdomain" http://creativecommons.org/licenses/publicdomain } } } } +} + + + % "PRELUDE Op28 No20" + % Frederic Chopin + % + % Please see "header.ly" for more information + +\include "english.ly" + +\paper { + %{ comment out for mutopiaproject } + %#(set-paper-size "letter") + %bottom-margin = 13 + %annotate-spacing = ##t + %indent = #0 + %ragged-right = ##t + %{ %} + page-count = 1 + #(layout-set-staff-size 20) + between-system-space = 5 + between-system-padding = 1 + ragged-bottom = ##t + ragged-last-bottom = ##f +} +\pointAndClickOff + + +shortStem = \once \override Stem #'length-fraction = #(magstep -4) + +barRest = { s1 } + + +playRH = \relative g { + \clef bass + \key c \minor + \time 4/4 + \tempo 4 = 42 + \set Score.tempoHideNote = ##t + % 1 - 4 + \once\override PhrasingSlur #'height-limit = #5 + \once\override TextScript #'extra-offset = #'( -4 . 1.5 ) + 4\(^\markup{\bold\large Largo} << { \shortStem 8. \shortStem 16 } \\ + { 4 } >> \) | + \once\override PhrasingSlur #'height-limit = #5 + 4\( << { \shortStem 8. \shortStem 16 } \\ + { 4 } >> 4\) | + \once\override PhrasingSlur #'height-limit = #4 + % \once\override PhrasingSlur #'attachment = #'(head . stem) + 4\( << { \shortStem g'8. \shortStem f16 } \\ + { 4 } >> 4 | + 4 + \clef treble + << { b'8. a16 } \\ + { 4 } >> 4\) | + + % 5 - 8 + 4\( << { 4 } \\ + \once\override NoteColumn #'force-hshift = #1.5 + { af'8. fs16 } >> 4 | + 4 8. 16 4 | + 4 << { \stemDown 4 } \\ + { \stemUp g'8. f16 } >> 4^\markup{\italic riten.} | + \clef bass + 4 << { \shortStem ef'8. \shortStem d16 } \\ + { 4 } >> 4\) | + + % 9 - 12 + \clef treble + \once\override TextScript #'extra-offset = #'(0 . 0.5) + 4^\markup{\italic "a tempo"}\( << { 4 } \\ + \once \override NoteColumn #'force-hshift = #1.5 + { af'8. fs16 } >> 4 | + 4 8. 16 4 | + 4 << { \stemDown 4^\markup{\italic riten.} } \\ + { \stemUp g'8. f16 } >> 4 | + \clef bass + 4 << { \shortStem ef'8. \shortStem d16 } \\ + { 4 } >> 4\) | + + %13 + \clef treble + 1->\fermata +} + +playDyn = { + % 1 - 4 + s4\ff s s s | + \barRest | + s4\< s s s | + s4 s s\! s | + % 5 - 8 + s4\p s s s | + \barRest | + \barRest | + \barRest | + % 9 - 12 + s4\pp s s s | + \barRest | + \crescTextCresc + \override DynamicLineSpanner #'staff-padding = #5 + s4 s s\< s | + s s s s\! | + + % 13 + \barRest | +} + +playLH = \relative c, { + \clef bass + \key c \minor + \time 4/4 + % 1 + 4\sustainOn + \sustainOff\sustainOn + \sustainOff\sustainOn + \sustainOff\sustainOn | + % 2 + \sustainOff\sustainOn + \override TextScript #'extra-offset = #'(0.5 . -0.5) + \sustainOff_\markup{\italic simile} + \revert TextScript #'extra-offset + + | + % 3 - 4 + | + | + + % 5 - 8 + \( | + | + | + \) | + + % 9 - 12 + \( | + | + | + \override Staff.PianoPedalBracket #'shorten-pair = #'(0 . -5.0) + \)\sustainOn | + + % 13 + 1->\sustainOff\fermata +} + + + +scoreAll = { + \new PianoStaff { + %JRA-commented line below + % \override PianoStaff.VerticalAlignment #'forced-distance = #13 % gap between staves -- default 12 + %JRA- + \set PianoStaff.midiInstrument = "acoustic grand" + %% \accidentalStyle "piano" + << + \context Staff = "rh" { + %% \override Staff.TextScript #'staff-padding = #2 + \override Staff.DynamicLineSpanner #'staff-padding = #3.5 % (forced-distance - 6) / 2 + %% \override Staff.Hairpin #'minimum-length = #3 + << + \playRH + \playDyn + >> + \bar "|." + } + \context Staff = "lh" { + \set Staff.pedalSustainStyle = #'bracket + %% \override Staff.PianoPedalBracket #'shorten-pair = #'(0 . -1.0) + \playLH + \bar "|." + } + >> + } +} + + +\score +{ + + { + \scoreAll + } + \layout {} + \midi { + %% Remove the dynamics from the midi output + \context { + \Voice + \remove "Dynamic_performer" + %\remove "Span_dynamic_performer" + } + } +} + + + + diff --git a/christmas-time-is-here.ly b/christmas-time-is-here.ly index a5fef12..4bf0101 100644 --- a/christmas-time-is-here.ly +++ b/christmas-time-is-here.ly @@ -7,13 +7,15 @@ staffSize = #18 #(set-global-staff-size staffSize) #(ly:set-option (quote no-point-and-click)) +%{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %} + \header { - title = "Christmas Time Is Here" + title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Christmas Time Is Here" } %% subtitle = "Second Movement" - composer = "V. Guaraldi" - arranger = "arr. S. Hammons" - meter = "Largo" + composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "V. Guaraldi" } + arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" } + meter = \markup { \override #'(font-family . sans) \fontsize #1.3 "Largo" } } %paperOFF = { \set Score.skipTypesetting = ##t } @@ -236,3 +238,26 @@ scoreAll = } %} } + + +\paper +{ + #(define fonts (make-pango-font-tree + "Times New Roman" + "JazzText" + "Luxi Mono" + (/ staffSize 20))) + +% 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 +%let's try this: [It works! Huzzah!] [not no more it don't] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) +} + diff --git a/come-thou-fount-of-every-blessing.ly b/come-thou-fount-of-every-blessing.ly index 0efaed9..771b053 100644 --- a/come-thou-fount-of-every-blessing.ly +++ b/come-thou-fount-of-every-blessing.ly @@ -3,7 +3,7 @@ \include "english.ly" % Good sizes are 16, 18, & 20 -staffSize = #18 +staffSize = #24 #(set-default-paper-size "letter") #(set-global-staff-size staffSize) #(ly:set-option (quote no-point-and-click)) @@ -364,7 +364,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) diff --git a/covers/don't-touch-me.ly b/covers/don't-touch-me.ly index c48df1d..23c6018 100644 --- a/covers/don't-touch-me.ly +++ b/covers/don't-touch-me.ly @@ -330,7 +330,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -343,6 +343,6 @@ 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) +%let's try this: [It works! Huzzah!][Nope!] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/covers/i-want-to-tell-you.ly b/covers/i-want-to-tell-you.ly index f5fc353..987ecce 100644 --- a/covers/i-want-to-tell-you.ly +++ b/covers/i-want-to-tell-you.ly @@ -474,7 +474,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -487,6 +487,6 @@ 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) +%let's try this: [It works! Huzzah!][not any more...] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/creation-song.ly b/creation-song.ly index 4804a05..058afd7 100644 --- a/creation-song.ly +++ b/creation-song.ly @@ -332,9 +332,6 @@ Riffs = \relative c'' % Chords = \chordmode { -%Bah, can't we set this globally? -% \popChords - % Intro g1.:sus2 | % 1 diff --git a/god-of-wonders.ly b/god-of-wonders.ly index c981850..5bcb1af 100644 --- a/god-of-wonders.ly +++ b/god-of-wonders.ly @@ -244,8 +244,8 @@ Riffs = \relative c' % Intro/midtro \repeat "percent" 2 { - 4 8 16 ~ 8 16 | % - 4 8 16 ~ 8 16 | % + 4 8 16 ~ 8 16 | % + 4 8 16 ~ 8 16 | % } %{ % Intro @@ -511,7 +511,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -524,6 +524,6 @@ 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) +%let's try this: [It works! Huzzah!][Nope... :-/] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/he-leadeth-me.ly b/he-leadeth-me.ly index 67e1b99..cab6f86 100644 --- a/he-leadeth-me.ly +++ b/he-leadeth-me.ly @@ -526,7 +526,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) diff --git a/here-i-am-to-worship.ly b/here-i-am-to-worship.ly new file mode 100644 index 0000000..1a75d04 --- /dev/null +++ b/here-i-am-to-worship.ly @@ -0,0 +1,541 @@ +\version "2.19.48" +\include "pop-chords.ly" +\include "english.ly" + +% Good sizes are 16, 18, & 20 +staffSize = #20 +#(set-default-paper-size "letter") +#(set-global-staff-size staffSize) +#(ly:set-option (quote no-point-and-click)) + +%{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %} + +\header +{ +%Let's bump up the title size and switch to the chord font. :-) + + title = \markup { \override #'(font-family . sans) \fontsize #3.5 "Here I Am To Worship" } + composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "T. Hughes" } + arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" } + tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version)) +} + +% Useful tweak abbreviations (hn = harmony note) + +hn = #(define-music-function (parser location arg) (ly:music?) +;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font + + (set! (ly:music-property arg 'tweaks) + (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg) + +% +% Song's structure +% + +Global = +{ + \key a \major + % \override Staff.TimeSignature #'style = #'() + \time 4/4 + + % Intro + +% \once \override TextScript #'padding = #2.0 +% s1*0^\markup { \large \italic { Piano only } } + \partial 4*2 s2 | % 0 + s1*5 \bar "||" % 1-5 + + \repeat volta 2 + { + % Verse + + \mark \markup { \override #'(font-family . sans) { \box { A } } } + s1*9 \bar "||" % 6-14 + + % Chorus + +% \mark \markup { \override #'(font-family . sans) { \box { B } } } +\once \override Score.RehearsalMark #'self-alignment-X = #left +\mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" } + s1*7 | % 15-21 + } + \alternative + { + { +\once \override Score.RehearsalMark #'self-alignment-X = #right +\once \override Score.RehearsalMark #'break-visibility = #begin-of-line-invisible +\mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" } + s1*2 | % 22-23 + } + { + s1 | % 24 + } + } + + \repeat volta 2 + { + \mark \markup { \override #'(font-family . sans) { \box { C } } } + s1*3 | % 25-27 + } + \alternative + { + { + s1 | % 28 + } + { + s1 | % 29 + } + } + + s1 | % 30 + + \once \override Score.RehearsalMark #'self-alignment-X = #right + \mark \markup { \italic { D.S. al Coda } } + + % blank measure between last measure and coda + \stopStaff s1 \startStaff + \set Score.currentBarNumber = #31 + + % Coda + + \once \override Score.RehearsalMark #'self-alignment-X = #left + \mark \markup { { \musicglyph #"scripts.coda" } "Coda" } + s1 \bar "||" % 31 + + \mark \markup { \override #'(font-family . sans) { \box { D } } } + s1*8 \bar "||" % 32-39 + + \mark \markup { \override #'(font-family . sans) { \box { E } } } + s1*8 \bar "|." % 40-47 +} + + +% +% Lead vocal +% + +LeadVox = \relative c'' +{ + \clef G + \override Score.SpacingSpanner #'average-spacing-wishes = ##f + + % Intro + + s2 | % 0 + s1 | % 1 + s1 | % 2 + s1 | % 3 + s1 | % 4 + s1 | % 5 + + % Verse + + 4 8 4 8 | % 6 + 4 8 e 4 | % 7 + 4 8 4 8 ~ | % 8 + 8 ~ 2 r4 | % 9 + 4 8 4 8 | % 10 + 4 8 e 4 | % 11 + 4 8 4 8 ~ | % 12 + 8 ~ 2 r4 | % 13 + r4 r8. cs16 8 | % 14 + + % Chorus + + 4 8 | % 15 + 4 8 | % 16 + 4 8 4 8 ~ | % 17 + 4 r8 cs16 8 | % 18 + 4 8 | % 19 + 4 8 | % 20 + 4 8 4 8 ~ | % 21 + + 2 s | % 22 + s1 | % 23 + + 2-\repeatTie r8 b gs' fs ~ | % 24 + + % Bridge + + fs4 8 ~ 4 8 ~ | % 25 + 8 4 8 ~ 4 8 8 ~ | % 26 + 4 8 ~ 4 8 ~ | % 27 + + a8 gs4 fs8 ~ fs b, | % 28 + + 8-\repeatTie 4 8 ~ 2 ~ | % 29 + + 4 r8. cs16 8 | % 30 + + s1 % blank bar for coda + + % Coda + + 4.-\repeatTie ~ 16 cs 8 | % 31 + + 4 8 | % 32 + 4 8 | % 33 + 4 8 4 8 ~ | % 34 + 4. cs16 8 | % 35 + 4 8 | % 36 + 4 8 | % 37 + 4 8 4 8 ~ | % 38 + 2 r8 b gs' fs ~ | % 39 + + fs4 fs8 gs ~ gs4 b8 a ~ | % 40 + a8 gs4 fs8 ~ fs4 e8 fs ~ | % 41 + fs4 fs8 gs ~ gs4 b8 a ~ | % 42 + a8 gs4 fs8 ~ fs8 e ~ e4 ~ | % 43 + e1 | % 44 + s1 | % 45 + s1 | % 46 + s1 | % 47 +} + + +LeadVoxTextA = \lyricmode +{ + Light of the world, you stepped down in -- to dark -- _ ness, + O -- pened my eyes, let me _ see, _ + Beau -- ty that made this _ heart _ a -- dore _ you, + Hope of a life spent with _ you. _ + + So here I am to wor -- ship, + here I am to bow down, + here I am to say that you’re my God, _ + And you’re al -- to -- geth -- er love -- ly, + al -- to -- geth -- er wor -- thy, + al -- to -- geth -- er won -- der -- ful to me. _ _ + + And I’ll ne -- _ ver know _ + how much _ it cost _ + to see _ my sin _ u -- pon _ that cross _ + + And I’ll ne + _ that cross. _ _ + + So here I am to + + _ _ So here I am to wor -- ship, + here I am to bow down, + here I am to say that you’re my God, _ + and you’re al -- to -- geth -- er love -- ly, + al -- to -- geth -- er wor -- thy, + al -- to -- geth -- er won -- der -- ful to me, _ + + And I’ll ne -- _ ver know _ + how much _ it cost _ + to see _ my sin _ u -- pon _ that cross _ _ _ _ +} + + +LeadVoxTextB = \lyricmode +{ + King of all days, oh so high -- ly ex -- al -- _ ted, + glo -- rious in hea -- ven a -- _ bove, _ + Hum -- bly you came to the Earth you cre -- a -- _ ted, + all for love’s sake be -- came _ poor. _ +} + + +Riffs = \relative c'' +{ + \tiny + a8 gs gs fs | % 0 + gs4 gs a8 gs fs e | % 1 + fs4 fs a8 gs gs fs | % 2 + gs4 gs gs8 b4 e,8 ~ | % 3 + e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 4 + e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 5 + + s1*16 | % 6-21 + + r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 22 + e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 23 + + s1*7 | % 24-30 + + s1 % blank bar for Coda + + s1*13 | % 31-43 + + r16 a b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 44 + e a, b e ~ e b e gs ~ gs b, e b' ~ b8 b,16 e ~ | % 45 + e16 a, b e ~ e b e gs ~ gs b, e b' ~ b8 b, | % 46 + 1-\fermata | % 47 + \normalsize +} + + +% +% Chord names +% + +Chords = \chordmode +{ + % Intro + + s2 | % 0 + e1 | % 1 + b1/ds | % 2 + cs2:m cs:m/b | % 3 + a1:sus2 | % 4 + s1 | % 5 + + % Verse + + e2 b4:sus4 b | % 6 + fs2:m a | % 7 + e2 b4:sus4 b | % 8 + a1:sus2 | % 9 + e2 b4:sus4 b | % 10 + fs2:m a | % 11 + e2 b4:sus4 b | % 12 + a1:sus2 | % 13 + a1:sus2 | % 14 + + % Chorus + + e1 | % 15 + b1/ds | % 16 + cs2:m cs:m/b | % 17 + a1:sus2 | % 18 + e1 | % 19 + b1 | % 20 + e1/gs | % 21 + + a1:sus2 | % 22 + s1 | % 23 + + a1:sus2 | % 24 + + % Bridge + + b2/ds e | % 25 + a1:sus2 | % 26 + b2 cs:m | % 27 + + a1:sus2 | % 28 + + a1:sus2 | % 29 + b1:sus4 | % 30 + + % Coda + + s1 % blank + + a1:sus2 | % 31 + e1 | % 32 + b1/ds | % 33 + cs2:m cs:m/b | % 34 + a1:sus2 | % 35 + e1 | % 36 + b1 | % 37 + e1/gs | % 38 + a1:sus2 | % 39 + + b2/ds e | % 40 + a1:sus2 | % 41 + b2 cs:m | % 42 + a1:sus2 | % 43 + a1:sus2 | % 44 + s1 | % 45 + s1 | % 46 + a1:sus2 | % 47 +} + + +% +% 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... + +Rhythm = \relative c +{ + \override NoteHead #'style = #'slash + \teeny + + % Intro + + s2 | % 0 + c1 | % 1 + c1 | % 2 + c2 c | % 3 + c1 | % 4 + c1 | % 5 + + % Verse + + 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 + c4 c c c | % 13 + c1 | % 14 + + % Chorus + + 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 c c | % 20 + c4 c c c | % 21 + + c1 | % 22 + c1 | % 23 + + c4 c c c | % 24 + + % Bridge + + 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 + + % Coda + + % blank measure between last measure and coda +%hm. Shouldn't need /startStaff /stopStaff... !!! FIX !!! + \stopStaff s1 \startStaff + + c4 c c c | % 31 + c4 c c c | % 32 + c4 c c c | % 33 + c4 c c c | % 34 + c4 c c c | % 35 + c4 c c c | % 36 + c4 c c c | % 37 + c4 c c c | % 38 + c4 c c c | % 39 + + c2 c | % 40 + c2 c | % 41 + c2 c | % 42 + c2 c4 c | % 43 + c1 | % 44 + c1 | % 45 + c1 | % 46 + c1^\fermata | % 47 +} + + +Dynamics = +{ +%{ + s1*12 | % 1-12 + s4_\markup { \italic { Add bass, pad } } s2. | % 13 + s1*7 | % 14-20 + s4_\markup { \italic { Add perc, Ac. gtrs. } } s2. | % 21 + s1*28 | % 22-49 + s4_\markup { \italic { Piano only, like intro } } s2. | % 50 + s1*2 | % 51-52 + s4_\markup { \italic { Full band } } s2. | % 53 +%} + s2_\mf | % 0 + s1*3 | % 1-3 + s4_\markup { \italic { add cymbal colors } } s2. | % 5 + s2 s16 s \> s4 s16 s \! | % 5 + + % Verse + + s4_\markup { \italic { Unison 1st X } } s2. | % 6 + s1*8 | % 7-14 + + % Chorus + + s4_\markup { \italic { snare on D.S. } } s2. | % 15 + s1*9 | % 16-24 + + % Bridge + + s4_\markup { \italic { Unison 1st X } } s2. | % 25 + s1*4 | % 26-29 + s4.. s16_\markup { \italic { big fill } } \< s4. s8-\f | % 30 + + s1 % blank bar for coda + + % Coda + + s2 s8 \< s4 s8 \! | % 31 + s4_\ff s2. | % 32 + s1*6 | % 33-38 + s2 s8 \> s4 s8-\mp | % 39 + + s4_\markup { \italic { floating } } s2. | % 40 +} + + +\score +{ +%{ + << + << +% \new Staff = leadStaff { \new Voice = "lead" \LeadVox } + \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> } + \new Lyrics \lyricsto "lead" \LeadVoxText + >> + + \new ChoirStaff = "Rhythm" + << + \new ChordNames = "chords" \Chords + \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >> + >> + + \set Score.skipBars = ##t + \set Score.melismaBusyProperties = #'() + >> +%} + << + \set Score.skipBars = ##t + \set Score.melismaBusyProperties = #'() + + \new Staff + << + \Global % The "roadmap" that everything else depends on + \new Voice = "lead" \LeadVox + \new Voice \Riffs + \new Lyrics \lyricsto "lead" \LeadVoxTextA + \new Lyrics \lyricsto "lead" \LeadVoxTextB + >> + +% \new Staff + << + \new ChordNames \Chords + \new RhythmicStaff << \Rhythm \Dynamics >> + >> + >> +} + + +\paper +{ + #(define fonts (make-pango-font-tree + "Times New Roman" + "JazzText" + "Luxi Mono" + (/ staffSize 20))) + +% 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 +%let's try this: [It works! Huzzah!][nope... :-/] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) +} + diff --git a/holy-is-the-lord.ly b/holy-is-the-lord.ly index 14d62fb..0efa0c6 100644 --- a/holy-is-the-lord.ly +++ b/holy-is-the-lord.ly @@ -187,18 +187,18 @@ Chords = \chordmode % B section - g1:5.9 | % 17 + g1:3.5.9 | % 17 s2 fs:m7 | % 18 - g2.:5.9 fs4:m7 | % 19 + g2.:3.5.9 fs4:m7 | % 19 e2:m7 a/cs | % 20 d4:sus4 d a/d d | % 21 d2/fs g | % 22 d1/a | % 23 a2 fs:m7 | % 24 - g1:5.9 | % 25 + g1:3.5.9 | % 25 s2 fs:m7 | % 26 - g2.:5.9 fs4:m7 | % 27 + g2.:3.5.9 fs4:m7 | % 27 e2:m7 a/cs | % 28 d4:sus4 d a/d d | % 29 d2/fs g | % 30 @@ -314,7 +314,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -327,6 +327,6 @@ 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) +%let's try this: [It works! Huzzah!][nope] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/i-could-sing-of-your-love-forever.ly b/i-could-sing-of-your-love-forever.ly index 33e78dd..92b79b4 100644 --- a/i-could-sing-of-your-love-forever.ly +++ b/i-could-sing-of-your-love-forever.ly @@ -417,7 +417,7 @@ StaffC = \relative c { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) } diff --git a/i-have-decided-to-follow-jesus.ly b/i-have-decided-to-follow-jesus.ly index f3fa2e1..666e833 100644 --- a/i-have-decided-to-follow-jesus.ly +++ b/i-have-decided-to-follow-jesus.ly @@ -15,7 +15,7 @@ staffSize = #20 arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Roger Freeland" } tagline = $(string-append "Engraved by JLH and Lilypond " (lilypond-version)) % Let's try a chord dictionary - subtitle = \markup { \center-column { C9 \fret-diagram-terse #"x;3;2;3;3;x;" } " " \center-column { "B7#9" \fret-diagram-terse #"x;2;1;2;3;x;" } " " \center-column { Bbmaj7 \fret-diagram-terse #"x;1;3;2;3;x;" } " " \center-column { A7sus4 \fret-diagram-terse #"x;o;2;o;3;x;" } " " \center-column { "F#7#5" \fret-diagram-terse #"2;x;2;3;3;x;" } " " \center-column { "Ab7b5" \fret-diagram-terse #"4;5;4;5;x;x;" } " " \center-column { "A13" \fret-diagram-terse #"x;o;2;o;2;2;" } " " \center-column { "C#m11" \fret-diagram-terse #"x;4;4;4;5;4;" } " " \center-column { "F#7#9" \fret-diagram-terse #"2;4;2;3;2;5;" } } + subtitle = \markup { \override #'(font-family . sans) { \center-column { C9 \fret-diagram-terse #"x;3;2;3;3;x;" } " " \center-column { "B7#9" \fret-diagram-terse #"x;2;1;2;3;x;" } " " \center-column { { "B" \chordFlat "maj7" } \fret-diagram-terse #"x;1;3;2;3;x;" } " " \center-column { A7sus4 \fret-diagram-terse #"x;o;2;o;3;x;" } " " \center-column { "F#7#5" \fret-diagram-terse #"2;x;2;3;3;x;" } " " \center-column { "Ab7b5" \fret-diagram-terse #"4;5;4;5;x;x;" } " " \center-column { "A13" \fret-diagram-terse #"x;o;2;o;2;2;" } " " \center-column { "C#m11" \fret-diagram-terse #"x;4;4;4;5;4;" } " " \center-column { "F#7#9" \fret-diagram-terse #"2;4;2;3;2;5;" } } } } @@ -23,7 +23,7 @@ staffSize = #20 % Song's structure % -Global = +Global = { \key d \major \override Staff.TimeSignature #'style = #'() @@ -341,7 +341,7 @@ Rhythm = \relative c } -Dynamics = +Dynamics = { s1_\markup { \small \italic { Ac. guitar } } | % 1 s1 | % 2 @@ -416,7 +416,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -429,6 +429,6 @@ 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) +%let's try this: [It works! Huzzah!][Nope...] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/i-will-never-be.ly b/i-will-never-be.ly index fb6e511..e86d489 100644 --- a/i-will-never-be.ly +++ b/i-will-never-be.ly @@ -143,7 +143,7 @@ LeadVoxText = \lyricmode I can ne -- ver re -- turn, _ I’ve closed the door; _ I will walk the path, _ I’ll run the race, _ And I will ne -- ver _ be the same a -- again. _ - + same a -- gain. _ Fall like fire, _ soak _ like rain, _ @@ -160,12 +160,12 @@ LeadVoxText = \lyricmode I can ne -- ver re -- turn, _ I’ve closed the door; _ I will walk the path, _ I’ll run the race, _ And I will ne -- ver _ be the same a -- again. _ - + I will ne -- ver be _ the same a -- gain, _ I can ne -- ver re -- turn, _ I’ve closed the door; _ I will walk the path, _ I’ll run the race, _ And I will ne -- ver _ be the same a -- again. _ - + And I will ne -- ver _ be the same a -- again. _ And I will ne -- ver _ be the same a -- again. _ } @@ -446,7 +446,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -459,6 +459,6 @@ 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) +%let's try this: [It works! Huzzah!][nope] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/in-christ-alone.ly b/in-christ-alone.ly index e386812..b736100 100644 --- a/in-christ-alone.ly +++ b/in-christ-alone.ly @@ -245,14 +245,6 @@ Dynamics = \set Score.skipBars = ##t \set Score.melismaBusyProperties = #'() -% \new Staff - << - \new ChordNames \Chords -%Capo 4 edition -% \new ChordNames \transpose b g \Chords - \new RhythmicStaff << \Rhythm \Dynamics >> - >> - \new Staff << \Global % The "roadmap" that everything else depends on @@ -262,6 +254,14 @@ Dynamics = \new Lyrics \lyricsto "lead" \LeadVoxTextB \new Lyrics \lyricsto "lead" \LeadVoxTextC \new Lyrics \lyricsto "lead" \LeadVoxTextD + +% \new Staff + << + \new ChordNames \Chords +%Capo 4 edition +% \new ChordNames \transpose b g \Chords + \new RhythmicStaff << \Rhythm \Dynamics >> + >> >> >> } @@ -271,7 +271,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -284,6 +284,6 @@ 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) +%let's try this: [It works! Huzzah!][nope, it does not] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/jesus-all-for-jesus.ly b/jesus-all-for-jesus.ly index fe8605a..071a37f 100644 --- a/jesus-all-for-jesus.ly +++ b/jesus-all-for-jesus.ly @@ -3,7 +3,7 @@ \include "english.ly" % Good sizes are 16, 18, & 20 -staffSize = #18 +staffSize = #24 #(set-default-paper-size "letter") #(set-global-staff-size staffSize) #(ly:set-option (quote no-point-and-click)) @@ -595,7 +595,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) } diff --git a/linus-and-lucy.ly b/linus-and-lucy.ly index 1905681..970094e 100644 --- a/linus-and-lucy.ly +++ b/linus-and-lucy.ly @@ -292,7 +292,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) diff --git a/nothing-but-the-blood.ly b/nothing-but-the-blood.ly index 33b62b0..e771867 100644 --- a/nothing-but-the-blood.ly +++ b/nothing-but-the-blood.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)) @@ -254,9 +254,6 @@ LeadVoxTextAltC = \lyricmode Chords = \chordmode { -%Bah, can't we set this globally? -% \popChords - % Intro/midtro f4./a bf2:sus2 s8 | % 1 @@ -431,7 +428,7 @@ StaffC = \relative c { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) } diff --git a/pop-chords-test.ly b/pop-chords-test.ly index 9d1c1f8..cd4eaf7 100644 --- a/pop-chords-test.ly +++ b/pop-chords-test.ly @@ -56,7 +56,7 @@ Chords = \chordmode c:7.9 % Dominant ninth c:m7.9 % Minor ninth c:maj9 % Major ninth - c:5.9 % Add nine + c:3.5.9 % Add nine c:6.9 % Six/nine c:m6.9 % Minor six/nine c:m7+9 % Minor major 9 @@ -69,8 +69,8 @@ Chords = \chordmode c:11 % Dominant eleventh c:m11 % Minor eleventh c:maj11 % Major eleventh - c:5.11 % Add eleven - c:m5.11 % Minor add eleven + c:3.5.11 % Add eleven + c:3-.5.11 % Minor add eleven c:m7.11 % Minor seventh add eleven % Thirteenths @@ -78,7 +78,8 @@ Chords = \chordmode c:13 % Dominant thirteenth c:m7.9.13 % Minor thirteenth c:maj13 % Major thirteenth - c:5.13 % Add thirteen + c:3.5.13 % Add thirteen (really a 6th chord) + c:3-.5.13 % Minor add thirteen (really a minor 6th chord) c:13.9- % Dominant thirteen/b9 % Misc add chords @@ -108,7 +109,7 @@ Chords = \chordmode { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) } diff --git a/pop-chords.ly b/pop-chords.ly index 24587c8..b88b212 100644 --- a/pop-chords.ly +++ b/pop-chords.ly @@ -75,6 +75,7 @@ popChordsMusic = -\markup { "m13" } -\markup { "maj13" } -\markup { "add13" } + -\markup { "m add13" } -\markup { "13" \chordFlat "9" } % Misc add chords diff --git a/wait-by-the-water.ly b/wait-by-the-water.ly index f041c43..9028c8c 100644 --- a/wait-by-the-water.ly +++ b/wait-by-the-water.ly @@ -363,6 +363,6 @@ 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) +%let's try this: [It works! Huzzah!][nope] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } diff --git a/word-of-god-speak.ly b/word-of-god-speak.ly index 746c369..408046f 100644 --- a/word-of-god-speak.ly +++ b/word-of-god-speak.ly @@ -3,7 +3,7 @@ \include "english.ly" % Good sizes are 16, 18, & 20 -staffSize = #18 +staffSize = #16 #(set-default-paper-size "letter") #(set-global-staff-size staffSize) #(ly:set-option (quote no-point-and-click)) @@ -30,12 +30,49 @@ hn = #(define-music-function (parser location arg) (ly:music?) % Song's structure % -Global = +Global = { - \clef G \key c \major \override Staff.TimeSignature #'style = #'() \time 4/4 + + % Intro + + \once \override TextScript #'padding = #2.0 + s1*0^\markup { \large \italic { Piano only } } + + s1*4 \bar "||" % 1-4 + + % Verse + + \mark \markup { \override #'(font-family . sans) { \box { A } } } + s1*8 \bar "||" % 5-12 + + % Chorus + + \mark \markup { \override #'(font-family . sans) { \box { B } } } + s1*8 \bar "||" % 13-20 + + % Midtro + + \mark \markup { \override #'(font-family . sans) { \box { B2 } } } + s1*4 \bar "||" % 21-24 + + % Verse + + \mark \markup { \override #'(font-family . sans) { \box { C } } } + s1*8 \bar "||" % 25-32 + + % Chorus + + \mark \markup { \override #'(font-family . sans) { \box { D } } } + s1*8 \bar "||" % 33-40 + + \mark \markup { \override #'(font-family . sans) { \box { E } } } + s1*9 \bar "||" % 41-49 + + \mark \markup { \override #'(font-family . sans) { \box { F } } } + s1*4 \bar "|." % 96-100 } @@ -43,7 +80,7 @@ Global = % Lead vocal % -LeadVox = \relative c'' +LeadVox = \relative c' { % \set Voice.autoBeaming = ##f % \set Staff.instrumentName = #"Lead vox" @@ -53,126 +90,123 @@ LeadVox = \relative c'' \time 4/4 \override Score.SpacingSpanner #'average-spacing-wishes = ##f - -%{ % Intro - s1 | % 1 - s1 | % 2 - s1 | % 3 - s1 | % 4 - s1 | % 5 - s1 | % 6 - s1 | % 7 - \voiceTwo r2 r4 g \oneVoice | % 8 + r1 | % 1 + r1 | % 2 + r1 | % 3 + r4 r8. c16 e8 g a g ~ | % 4 - \repeat volta 2 - { - % Verse + % Verse -\mark \markup { \override #'(font-family . sans) { \box { A } } } + g2 ~ g8 e16 g a4 ~ | % 5 + a16 g g8 ~ g4 r g8 g16 g | % 6 + c,16 c8. c4 r c16 d8. ~ | % 7 + d8 c ~ c8. c16 e8 g a g ~ | % 8 - e4. d8 c4 g' | % 9 - a4 f f a | % 10 - g4. e8 e4 d8 ( c ) | % 11 - e4 e d g | % 12 - e4. d8 c4 g' | % 13 - a4 f c' b8 ( a ) | % 14 - g4 e e8 ( d ) c ( d ) | % 15 - e4. d8 c4 \bar "||" % 16 + g2 ~ g8. e16 a4 ~ | % 9 + a16 g g8 ~ g2 g8 g16 g ~ | % 10 + g2 r8. g16 c d8 d16 ~ | % 11 + d2 8 16 ~ 8 ~ | % 12 - % Chorus + % Chorus -\mark \markup { \override #'(font-family . sans) { \box { B } } } - - 4 | % 17 - 4 8 ( ) 4 | % 18 - 4 8 ( ) ( ) | % 19 - 4 | % 20 - 4 | % 21 - 4 8 ( ) 4 | % 22 - 4 << { \voiceOne 8 ( ) c ( d ) } \context Voice = "v2" { \voiceTwo \tiny a4 a8 b \normalsize } \oneVoice >> | % 23 - \time 2/4 4 \time 4/4 | % 24 - \voiceTwo c1 \oneVoice | % 25 - s1 | % 26 - } - \alternative - { - { - s1 | % 27 - \voiceTwo r2 r4 g' \oneVoice | % 28 - } - { - s1 | % 29 - } - } + 4 r8 16 8 ~ | % 13 + 4 r 8 ~ | % 14 + 8 16 ~ 2 8 ~ | % 15 + 8 16 r8. 16 <\hn g c \hn e>8 <\hn a d \hn f> <\hn c e \hn g> <\hn c e \hn g> ~ | % 16 - s1 | % 30 - s1 | % 31 - s1 | % 32 - \voiceTwo r2 r4 \oneVoice \bar "||" % 33 + <\hn c e \hn g>4 r8.16 <\hn c e \hn g>8 <\hn a d \hn f> <\hn g c \hn e> <\hn c d \hn g> ~ | % 17 + <\hn c d \hn g>4 r <\hn b d \hn g>8 <\hn b d \hn g> <\hn c e \hn g> <\hn bf d \hn g> ~ | % 18 + <\hn bf d \hn g>8 <\hn bf c \hn f>16 <\hn bf c \hn f> ~ <\hn bf c \hn f>4 r8 <\hn a d \hn g> ~ | % 19 + <\hn a d \hn g>8 <\hn a c \hn f>16 <\hn a c \hn f> ~ <\hn a c \hn f>4 8 16 ~ 8 ~ | % 20 - \key d \major + % Midtro + + 4 r r2 | % 21 + r1 | % 22 + r1 | % 23 + r4 r8. <\hn g c>16 <\hn c e>8 <\hn e g> <\hn f a> <\hn e g> ~ | % 24 % Verse -\mark \markup { \override #'(font-family . sans) { \box { C } } } + <\hn e g>4 r r8 <\hn c e>16 <\hn e g> <\hn f a>4 ~ | % 25 + <\hn f a>16 <\hn e g> <\hn e g>8 ~ <\hn e g>4 r8. g16 g8 g16 g ~ | % 26 + g16 c,8. r4 r8. c16 c8 d16 c16 ~ | % 27 + c4 r <\hn c e>8 <\hn e g> <\hn f a> <\hn e g> ~ | % 28 - 4. 8 4 | % 34 - 4 | % 35 - 4. 8 4 8 ( ) | % 36 - 4 | % 37 - 4. 8 4 | % 38 - 4 8 ( ) | % 39 - 4 << { \voiceOne 8 ( ) d ( e ) } \context Voice = "v2" { \voiceTwo \tiny b4 b8 cs \normalsize } \oneVoice >> | % 40 - 4. 8 4 \bar "||" % 41 + <\hn e g>4 r r8 <\hn c e>16 <\hn e g> <\hn f a>4 ~ | % 29 + <\hn f a>16 <\hn e g> <\hn e g>8 ~ <\hn e g>4 r8. g16 g8 g16 g ~ | % 30 + g16 g r8 r4 r <\hn g, c \hn f>16 <\hn c d \hn g>8 <\hn c d \hn g>16 ~ | % 31 + <\hn c d \hn g>4 r <\hn g c \hn e>8 <\hn a d \hn f>16 <\hn c e \hn g> ~ <\hn c e \hn g>8 <\hn c e \hn g> ~ | % 32 % Chorus -\mark \markup { \override #'(font-family . sans) { \box { D } } } - - 4 | % 42 - 4 8 ( ) 4 | % 43 - 4 8 ( ) ( ) | % 44 - 4 | % 45 - 4 | % 46 - 4 8 ( ) 4 | % 47 - 4 << { \voiceOne 8 ( ) d ( ) } \context Voice = "v2" { \voiceTwo \tiny b4 b8 a \normalsize } \oneVoice >> | % 48 - 2 \bar "||" % 49 - - % Outro - -\mark \markup { \override #'(font-family . sans) { \box { E } } } - - \voiceTwo d1 \oneVoice | % 50 - s1 | % 51 - s1 | % 52 - s1 | % 53 - s1 | % 54 - s1 | % 55 - s1 | % 56 - s1 | % 57 - s1 \bar "|." % 58 -%} + <\hn c e \hn g>4 r8 <\hn g c>16 <\hn g c> <\hn c e \hn g>8 <\hn a d \hn f> <\hn g c \hn e> <\hn c d \hn g> ~ | % 33 + <\hn c d \hn g>2 <\hn b d \hn g>8 <\hn b d \hn g> <\hn c e \hn g> <\hn bf d \hn g> ~ | % 34 + <\hn bf d \hn g>8 <\hn bf c \hn f>16 <\hn bf c \hn f> ~ <\hn bf c \hn f>2 8 <\hn a d \hn g> ~ | % 35 + <\hn a d \hn g>8 <\hn a c \hn f>16 <\hn a c \hn f> r8. 16 <\hn g c \hn e>8 <\hn a d \hn f> <\hn c e \hn g> <\hn c e \hn g> ~ | % 36 + + <\hn c e \hn g>4 r8.16 <\hn c e \hn g>8 <\hn a d \hn f> <\hn g c \hn e> <\hn c d \hn g> ~ | % 37 + <\hn c d \hn g>4 r <\hn b d \hn g>8 <\hn b d \hn g> <\hn c e \hn g> <\hn bf d \hn g> ~ | % 38 + <\hn bf d \hn g>8 <\hn bf c \hn f>16 <\hn bf c \hn f> ~ <\hn bf c \hn f>4 r8 <\hn a d \hn g> ~ | % 39 + <\hn a d \hn g>8 <\hn a c \hn f>16 <\hn a c \hn f> ~ <\hn a c \hn f>4 <\hn g f' \hn g>8 <\hn a e' \hn a>16 <\hn c d \hn g \hn c> ~ <\hn c c \hn g' \hn c>8 <\hn c e \hn g \hn c> ~ | % 40 + + <\hn c e \hn g \hn c>4 r8 <\hn g c \hn e \hn g>16 <\hn g c \hn e \hn g> <\hn c \hn e g \hn c>8 <\hn a \hn d f \hn a> <\hn g \hn c e \hn g> <\hn g \hn c e \hn g> ~ | % 41 + <\hn g \hn c d \hn g>4 r <\hn g \hn b d \hn g>8 <\hn g \hn b d \hn g> <\hn a \hn c e \hn g> <\hn bf d \hn g> ~ | % 42 + <\hn bf d \hn g>8 <\hn bf c \hn f>16 <\hn bf c \hn f> ~ <\hn bf c \hn f>4 r 8 <\hn a d \hn g> ~ | % 43 + <\hn a d \hn g>8 <\hn a c \hn f>16 <\hn a c \hn f> r8. 16 <\hn g c \hn e \hn g>8 <\hn a d \hn f \hn a> <\hn c e \hn g \hn c> <\hn c e \hn g \hn c> ~ | % 44 + + <\hn c e \hn g \hn c>4 r8. 16 <\hn c \hn e g \hn c>8 <\hn a \hn d f \hn a> <\hn g \hn c e \hn g> <\hn g \hn c e \hn g> ~ | % 45 + <\hn g \hn c d \hn g>4 r <\hn g \hn b d \hn g>8 <\hn g \hn b d \hn g> <\hn a \hn c e \hn g> <\hn bf d \hn g> ~ | % 46 + <\hn bf d \hn g>8 <\hn bf c \hn f>16 <\hn bf c \hn f> ~ <\hn bf c \hn f>4 r8 <\hn a d \hn g> ~ | % 47 + <\hn a d \hn g>8 <\hn a c \hn f>16 <\hn a c \hn f> ~ <\hn a c \hn f>2 r4 | % 48 + r4 r8. c16 e8 g a g ~ | % 49 + + % End + + g2 r8 e16 g a4 ~ | % 50 + a16 g g8 ~ g4 r g8 g16 g | % 51 + c,16 c8. c4 r c16 d8. ~ | % 52 + d8 c ~ c2.-\fermata | % 53 } LeadVoxText = \lyricmode { - I'm find- ing my- self at a loss for words - and the fun- ny thing is, it's o- kay - The last thing I need is too be heard - but to hear what you might say - - Word of God speak, would you pour down like rain, - wash- ing my eyes to see your ma- jes- ty - To be still and know that you're in this place, - please let me stay and rest in your ho- li- ness - Word of God speak. + I'm find -- ing my -- self _ _ at a loss _ for words _ + and the fun -- ny thing is, it's o -- _ kay _ + The last thing I need _ _ is to _ be heard _ + but to hear _ what you might say _ + + Word of God _ speak, _ would you pour down like rain, _ + wash -- ing my eyes _ to see _ your ma -- _ jes -- ty + To be still and know _ that you're in this place, _ + please let me stay _ and rest _ in your ho -- _ li -- ness _ + Word of God _ speak. _ + + I'm find -- in' my -- self _ in the midst _ of you _ + be -- yond the mu -- _ sic, be -- yond the noise, _ + all that I need _ is to be _ with you, _ + and in the qui -- _ et, hear your voice, _ + + Word of God _ speak, _ would you pour down like rain, _ + wash -- ing my eyes _ to see _ your ma -- _ jes -- ty + To be still and know _ that you're in this place, _ + please let me stay _ and rest _ in your ho -- _ li -- ness _ + + Word of God _ speak, _ would you pour down like rain, _ + wash -- ing my eyes _ to see _ your ma -- _ jes -- ty + To be still and know _ that you're in this place, _ + please let me stay _ and rest _ in your ho -- _ li -- ness _ + + I'm find -- ing my -- self _ at a loss _ for words _ + and the fun -- ny thing is, it's o -- _ kay _ } Riffs = \relative c'' { +%{ \clef G \key c \major \override Staff.TimeSignature #'style = #'() @@ -267,6 +301,7 @@ Riffs = \relative c'' d8 a16 e' ~ e d8 cs16 ~ cs8. d16 ~ d16 cs8. ~ | % 57 1^\fermata | % 59 \normalsize +%} } @@ -276,95 +311,85 @@ Riffs = \relative c'' Chords = \chordmode { -%Bah, can't we set this globally? -% \popChords - % Intro - c2:sus2/a c:sus2/f | % 1 - g1:sus4 | % 2 - c2:sus2/a c:sus2/f | % 3 - g1:sus4 | % 4 - c2:sus2/a c:sus2/f | % 5 - g1:sus4 | % 6 - c2:sus2/e c:sus2/f | % 7 - g1:sus4 | % 8 + c2. c4:sus4 | % 1 + c2. c4:sus2 | % 2 + c2./f c4:sus4/f | % 3 + c2./f c4:sus2/f | % 4 - \repeat volta 2 - { - % Verse + % Verse - c2 c/e | % 9 - f2 d:m7 | % 10 - c2/g a:m7 | % 11 - c2/f g4:sus4 g | % 12 - c2 c/e | % 13 - f2 fs:dim | % 14 - c2/g a:m7 | % 15 - c4/g g c g:sus4.7 \bar "||" % 16 + c2. c4:sus4 | % 5 + c2. c4:sus2 | % 6 + c2./f c4:sus4/f | % 7 + c2./f c4:sus2/f | % 8 - % Chorus + c2. c4:sus4 | % 9 + c2. c4:sus2 | % 10 + c2./f c4:sus4/f | % 11 + c1/f | % 12 - c2 g | % 17 - f4 e8:m7 d:m7 c4 f | % 18 - c2/g a:m7 | % 19 - d2:9 g4:sus4.7 g:7 | % 20 - c2 g | % 21 - f4 e8:m7 d:m7 c4 f | % 22 - c2/e a:m7 | % 23 - \time 2/4 c4/f g \time 4/4 | % 24 - c2:sus2/a c:sus2/f | % 25 - g1:sus4 | % 26 - } - \alternative - { - { - c2:sus2/e c:sus2/f | % 27 - g1:sus4 | % 28 - } - { - c2:sus2/e c:sus2/ef | % 29 - } - } + % Chorus - bf1:sus2/d | % 30 - df1:maj7 | % 31 - f1/g | % 32 - g2/a a4 a:sus4.7 \bar "||" % 33 + c1 | % 13 + g2:sus4 g4 a:m11 | % 14 + bf1:sus2 | % 15 + f2 c/f | % 16 - % Verse + c1 | % 17 + g2:sus4 g4 a:m11 | % 18 + bf1:sus2 | % 19 + f1 | % 20 - d2 d/fs | % 34 - g2 e:m7 | % 35 - d2/a b:m7 | % 36 - d2/a a | % 37 - d4. e8:m7 d2/fs | % 38 - g2 gs:dim | % 39 - d2/a b:m7 | % 40 - d4/a a d d:sus4.7 \bar "||" % 41 + % Midtro - % Chorus + c2. c4:sus4 | % 21 + c2. c4:sus2 | % 22 + c2./f c4:sus4/f | % 23 + c2./f c4:sus2/f | % 24 - d2 a | % 42 - g4 fs8:m7 e:m7 d4 g | % 43 - d2/a b:m7 | % 44 - e2:9 a4:sus4.7 a:7 | % 45 - d2/a a | % 46 - g4 fs8:m7 e:m7 d4 g | % 47 - d2/fs b:m7 | % 48 - d2/g a \bar "||" % 49 + % Verse - % Outro + c2. c4:sus4 | % 25 + c2. c4:sus2 | % 26 + c2./f c4:sus4/f | % 27 + c2./f c4:sus2/f | % 28 + + c2. c4:sus4 | % 29 + c2. c4:sus2 | % 30 + c2./f c4:sus4/f | % 31 + c1 | % 32 - d2:sus2 g:6.9 | % 50 - a1:sus4 | % 51 - d2:sus2/b g:6.9 | % 52 - a1:sus4 | % 53 - d2:sus2 g:6.9 | % 54 - a1:sus4 | % 55 - d2:sus2/fs g:6.9 | % 56 - a1:sus4 | % 57 - d1 | % 58 + % Chorus + + c1 | % 33 + g2:sus4 g4 a:m11 | % 34 + bf1:sus2 | % 35 + f2 c/f | % 36 + + c1 | % 37 + g2:sus4 g4 a:m11 | % 38 + bf1:sus2 | % 39 + f1 | % 40 + + c1 | % 41 + g2:sus4 g4 a:m11 | % 42 + bf1:sus2 | % 43 + f2 c/f | % 44 + + c1 | % 45 + g2:sus4 g4 a:m11 | % 46 + bf1:sus2 | % 47 + f1 | % 48 + f1:sus2 | % 49 + + % End + + c2. c4:sus4 | % 50 + c2. c4:sus2 | % 51 + c2./f c4:sus4/f | % 52 + f1:sus2 | % 53 } @@ -390,103 +415,91 @@ Rhythm = \relative c c4 c c c | % 2 c4 c c c | % 3 c4 c c c | % 4 + + % Verse + c4 c c c | % 5 c4 c c c | % 6 c4 c c c | % 7 - c1 | % 8 + c4 c c c | % 8 - \repeat volta 2 - { - % Verse + c4 c c c | % 9 + c4 c c c | % 10 + c4 c c c | % 11 + c4 c c c | % 12 - c4 c c c | % 9 - c4 c c c | % 10 - c4 c c c | % 11 - c4 c c c | % 12 - c4 c c c | % 13 - c4 c c c | % 14 - c4 c c c | % 15 - c4 c c c-> \bar "||" % 16 + % 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 c8 c c4 c | % 18 - c4 c c c | % 19 - c4 c c c | % 20 - c4 c c c | % 21 - c4 c8 c c4 c | % 22 - c4 c c c | % 23 - \time 2/4 c4 c \time 4/4 | % 24 - c4 c c c | % 25 - c4 c c c | % 26 - } - \alternative - { - { - c4 c c c | % 27 - c4 c c c | % 28 - } - { - c4 c c c | % 29 - } - } + c4 c c c | % 17 + c4 c c c | % 18 + c4 c c c | % 19 + c4 c c c | % 20 + + % Midtro + + c4 c c c | % 21 + c4 c c c | % 22 + c4 c c c | % 23 + c4 c c c | % 24 + + % Verse + + 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 c \bar "||" % 33 - % Verse + % Chorus + c4 c c c | % 33 c4 c c c | % 34 c4 c c c | % 35 c4 c c c | % 36 + c4 c c c | % 37 - c4. c8 c4 c | % 38 + c4 c c c | % 38 c4 c c c | % 39 c4 c c c | % 40 - c4 c c c-> \bar "||" % 41 - - % Chorus + c4 c c c | % 41 c4 c c c | % 42 - c4 c8 c c4 c | % 43 + c4 c c c | % 43 c4 c c c | % 44 c4 c c c | % 45 c4 c c c | % 46 - c4 c8 c c4 c | % 47 + c4 c c c | % 47 c4 c c c | % 48 - c2 c \bar "||" % 49 + c1^\fermata | % 49 % Outro c4 c c c | % 50 c4 c c c | % 51 c4 c c c | % 52 - c4 c c c | % 53 - c4 c c c | % 54 - c4 c c c | % 55 - c4 c c c | % 56 - c4 c c c | % 57 - c1^\fermata \bar "|." % 58 + c1^\fermata | % 53 } Dynamics = { -%{ - s4_\mf s2. | % 1 - s1*22 | % 2-23 - s4 s \> | % 24 - s4 \! s2. | % 25 - s1*2 | % 26-27 - s4 \< s s \! s | % 28 - s1*4 | % 29-32 - s4 \< s s \! s | % 33 - s1*23 | % 34-56 - s2 s2_\markup { \italic { rit. } } | % 57 -%} + s1*12 | % 1-12 + s4_\markup { \italic { Add bass, pad } } s2. | % 13 + s1*7 | % 14-20 + s4_\markup { \italic { Add perc, Ac. gtrs. } } s2. | % 21 + s1*28 | % 22-49 + s4_\markup { \italic { Piano only, like intro } } s2. | % 50 + s1*2 | % 51-52 + s4_\markup { \italic { Full band } } s2. | % 53 } @@ -514,12 +527,6 @@ Dynamics = \set Score.skipBars = ##t \set Score.melismaBusyProperties = #'() -% \new Staff - << - \new ChordNames \Chords - \new RhythmicStaff << \Rhythm \Dynamics >> - >> - \new Staff << \Global @@ -527,6 +534,12 @@ Dynamics = \new Voice \Riffs \new Lyrics \lyricsto "lead" \LeadVoxText >> + +% \new Staff + << + \new ChordNames \Chords + \new RhythmicStaff << \Rhythm \Dynamics >> + >> >> } @@ -535,7 +548,7 @@ Dynamics = { #(define fonts (make-pango-font-tree "Times New Roman" - "DomCasual BT" + "JazzText" "Luxi Mono" (/ staffSize 20))) @@ -548,6 +561,7 @@ 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) +%let's try this: [It works! Huzzah!][nope... :-/] +% obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space) } +