diff --git a/savior-like-a-shepherd-lead-us.ly b/savior-like-a-shepherd-lead-us.ly new file mode 100644 index 0000000..6431679 --- /dev/null +++ b/savior-like-a-shepherd-lead-us.ly @@ -0,0 +1,252 @@ +\version "2.24.0" +\language "english" + +\header { + title = "Savior Like a Shepherd Lead Us" + composer = "Tommy Montgomery" + copyright = "(c) 2024 Tommy Montgomery" +} + +global = { + \key d \major + \time 4/4 + \set Staff.printKeyCancellation = ##f + \numericTimeSignature + % \compressFullBarRests + \omit Voice.StringNumber + %\override TupletBracket #'bracket-visibility = #'if-no-beam + \override MultiMeasureRest.expand-limit = #3 +} + +lhD = \relative c { + d4 d, d' d, +} + +\parallelMusic #'(right left) { + \tempo 4 = 94 + + \global R1 | + \global \lhD | + + r2 r4 r8 8 ~ | + \lhD | + + q8 q4 q8 ~ | + \lhD | + + q8 4 8 ~ q 4 8 ~ | + \lhD | + + q8 4 8 ~ | + \lhD | + + q2. r8 8 ~ | + \lhD | + + q8 q4 q8 ~ | + \lhD | + + q8 4 8 ~ q 4 8 ~ | + \lhD | + + q8 4 8 ~ | + \lhD | + + q2. << { 8 q } \\ { \grace d8 ~ d4 ~ } >> | + d8 a fs a d,2 | + + << { 4 2 cs8 b } \\ { d,2 ~ d8 d8 ~ 4 } >> | + g8 d' g a b2 | + + 4 2 8 q | + a8 fs d cs b2 | + + << { 4 } \\ { a,4 b cs d } >> | + a8 e' a e g e a e | + + << { 2 } \\ { e8 a, d e } >> a d e a | + d4 a | + + << { 4 2 8 } \\ { fs8 d4 cs8 d e4. } >> | + 4 | + + << { 4 2\fermata } \\ { f8 d ~ 2 } >> d8 e? | + 4 2\fermata | + + 4 << { 4. e8 } \\ { 4 } >> | + d'8 a' fs'! a, e' e, a a, | + + 2 \change Staff = "left" d,16\rest a d e fs a d e \change Staff = "right" \bar "||" | + d4 a' \stemDown d,2 \stemNeutral | + + << { fs4 fs fs8 e fs g } \\ { fs16 d a d fs d a d fs d e cs fs d g e } >> | + d16 a' d e fs e d a d, a' e' a, d a e' a, | + + << { a4 d a fs } \\ { a16 d, fs a d d d' d, a d g, e fs g e d } >> | + d,8 a' d a' d4 d, | + + << { e4 b' a g } \\ { e16 b e g b d cs b a b e b g b g e } >> | + e,8 b' e fs g4 4 | + + << { fs2 } \\ { fs16 e d a \change Staff = "left" fs e d a } >> \change Staff = "left" \stemUp d16\rest a d e fs a d e \stemNeutral \change Staff = "right" | + 2 \stemDown d4 cs \stemNeutral | + + << { fs4 fs fs8 e fs g } \\ { fs16 d b d fs d b d fs d e cs fs d g e } >> | + b16 fs' b cs d cs b fs b, fs' cs' fs, d' fs, cs' fs, | + + << { a4 d a fs } \\ { a16 d, fs a d d d' d, a b a g fs g fs ds } >> | + 4 \arpeggio | + + \tuplet 6/4 4 { + e16 b e g b e + g b g e b g + fs g a b cs d + e fs g a b cs + } | + e8 b' g'4 8 | + + << { d2. } \\ { d8 a g e fs4 } >> \tuplet 6/4 4 { cs16 d e fs g a } | + 4. a'8 d4 a | + + << { b4 d2 cs8 b } \\ { b16 d, g b d d, e fs g fs e d cs' cs, b' d, } >> | + g16 d' g a b4 g16 fs e d g8 g, | + + << { a'4 fs2 fs8 fs } \\ { a16 a, d e fs d g d a' a, a a d8 d } >> | + d16 e fs g a g fs e d2 | + + << { e4 b' a g } \\ { e16 e e' e, b' b b' b, a a a' a, g g g' g, } >> | + \clef treble a''16 e' g e b e g e cs e g e b e g e | + + \tuplet 6/4 4 { + fs16 g fs e fs e + d e d cs d cs + b cs b a b a + g a g fs g a + } | + 2 \clef bass \tuplet 6/4 4 { g,16 a b cs d e d cs b a g fs } | + + b4 << { 2 \tuplet 3/2 { cs16 d cs } b?8 } \\ { d,4 ~ d8 e4 d8 } >> | + g8 g, g' a bf4 a | + + 4\arpeggio 2\arpeggio\fermata << { d,8 e } \\ { 4 } >> | + 4\arpeggio 4\arpeggio 2\fermata | + + 4 << { g4.\arpeggio e8 } \\ { 4\arpeggio } >> | + 2 4 | + + d2 r4 e8 fs \bar "||" | + 4 a d,2 | + + \key e \minor << { g4 b2 } \\ { e,4 g2 } >> a8 fs | + \key e \minor e'8 b' << { fs'4 g a } \\ { d,8 b d b e a, } >> | + + << { a4 fs2 } \\ { d4 b as } >> as'8 b | + << { b'4 e, fs4 cs8 b } \\ { g8 d' a b fs2 } >> | + + << { cs4 d e fs } \\ { as,2 cs } >> | + 4. 8 ~ q4 | + + << { 4 2 } \\ { b1 } >> | + 4 4 e8 fs | + + 8 d! 8 d 8 d d | + g4 b2 b8 c | + + d a, 4. a'16 b | + d4 f << { e2 } \\ { e4 a, } >> | + + c!4 ~ c16 g c d e4. b16 c | + c! g' c! d e4 ~ e16 g16 e d c4 | + + d4 ~ d16 b d c b4. c16 d | + g,16 d' g a b4 ~ b16 g a b d4 | + + ef4 ~ ef16 c ef f g4. f16 g | + c,16 g' c d ef4 ~ ef16 g ef d c4 | + + 4 | + f,,8 c' f g af c f c | + + 4 \arpeggio \bar "||" | + ef8 c a gf ef c a ef | + + \key df \major 4 q 8 | + \key df \major df8 af' f' af, df,8 af' f' af, | + + 4 | + 8 | + + 4 | + 8 4 8 ~ q 4 8 | + + 4 2 | + df8 af' c gf \tuplet 3/2 4 { f8 c' ef a ef c } | + + 8 bf 8 df | + bf16 ef f af bf, ef f bf bf, ef f bf bf, ef f bf | + + 4 2 4 | + af,16 df ef af ef df af df ef af ef df 8 | + + 2 2 | + 8 4 f, ~ | + + \ottava #1 f''2. \ottava #0 d,,,8 e | + f2. r4 | + + \key d \major 4 4. 8 | + \key d \major 4 << { 2 } \\ { 4 } >> | + + << { d1 } \\ { a4 2 } >> | + 4 2 | + + \change Staff = "left" \stemUp d16 g a d fs, d g a \change Staff = "right" \stemNeutral d g a d fs, d g a | + \stemDown d16 g a d fs, d g a \stemNeutral d g a d fs, d g a | + + \stemUp d16 g a d fs, d g a \ottava #1 d g a 4 \ottava #0 | + \change Staff = "right" \stemDown d16 g a d fs, d g a d g a cs d4 | + + \stemNeutral \clef bass 4 2. | + \change Staff = "left" \stemNeutral 4 2. | + + 1\fermata \bar "|." | + 1\fermata | +} + + +pianoStaff = \new PianoStaff \with { + instrumentName = "Piano" +} << + \new Staff = "right" \with { + \consists "Span_arpeggio_engraver" + midiInstrument = "acoustic grand" + } { \set Staff.connectArpeggios = ##t \relative c' \right } + \new Staff = "left" \with { + \consists "Span_arpeggio_engraver" + midiInstrument = "acoustic grand" + } { \set Staff.connectArpeggios = ##t \clef bass \relative c \left } +>> + +\score { + << + \pianoStaff + >> + \layout { + \context { + \Staff \RemoveEmptyStaves + \override Glissando.minimum-length = #4 + \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods + \override Glissando.thickness = #2 + \override VerticalAxisGroup.remove-first = ##t + } + } +} + +\score { + \unfoldRepeats { + << + \pianoStaff + >> + } + \midi {} +} diff --git a/savior-like-a-shepherd-lead-us.pdf b/savior-like-a-shepherd-lead-us.pdf new file mode 100644 index 0000000..dfb9925 Binary files /dev/null and b/savior-like-a-shepherd-lead-us.pdf differ