music/in-your-memory.ly

463 lines
10 KiB
Plaintext

\version "2.14.2"
\language "english"
\header {
title = "In Your Memory"
composer = "Tommy Montgomery"
copyright = "(c) 2013 Tommy Montgomery"
}
global = {
\key b \major
\time 2/2
\set Staff.printKeyCancellation = ##f
}
flowingFifths = {
\relative c, {
b8 fs' b fs' b fs b, fs
}
}
flowingOctaves = {
\relative c,, {
cs8 cs' cs' gs' cs gs cs, cs,
}
}
\parallelMusic #'(right left) {
\tempo "Moderately" 2 = 72
\global
r1 |
\global
\flowingFifths |
r1 |
\flowingFifths |
ds'1 ~ |
\flowingFifths |
ds8 cs4 e ds b8 ~ |
\flowingFifths |
b1 ~ |
\transpose b gs \flowingFifths |
b8 as4 cs b b8 ~ |
\transpose b gs \flowingFifths |
b1 |
\transpose b fs \flowingFifths |
as1 |
fs,,8 cs' fs cs' fs cs fs, cs ~ |
gs1 |
\transpose b cs' \flowingFifths |
as4. b cs4 |
fs8 cs' as' cs, gs' cs, e, fs' |
% repeat with octaves
ds1 ~ |
\flowingFifths |
ds8 <cs cs'>4 <e e'> <ds ds'> <b b'>8 ~ |
\flowingFifths |
<b b'>1 ~ |
\transpose b gs \flowingFifths |
<b b'>8 <as as'>4 <cs cs'> <b b'> <b b'>8 ~ |
\transpose b gs \flowingFifths |
<b b'>1 |
\transpose b fs \flowingFifths |
\grace { cs16[ b] } <as as'>2 <gs gs'>4. <fs fs'>8 |
\transpose b fs \flowingFifths |
<gs cs gs'>1 ~ |
\flowingOctaves |
<gs cs gs'>2 <fs cs'~ fs>2 |
\flowingOctaves |
<es cs'~ es>1 ~ |
\transpose b as \flowingFifths |
<es cs' es>8 <ds ds'>4 <fs fs'> <es es'> <es es'>8 ~ |
\transpose b as \flowingFifths |
<es es'>1 ~ |
\transpose b gs \flowingFifths |
<es es'>8 <ds ds'>4 <fs fs'> <es es'> <es es'>8 ~ |
\transpose b gs \flowingFifths |
<es es'>2 \grace { fs16[ es] } <ds ds'>2 |
\transpose b fs \flowingFifths |
<cs cs'> <bs bs'> |
\transpose b fs \flowingFifths |
<as as'>4. <bs bs'> <css css'>4 ~ |
as,,8 es' as as es' as as, gs' |
<css css'>8 <ds ds'>4. <es es'>4 <ds ds'> ~ |
as,8 fs' as, es' ds( css) fs( es) |
<ds ds'>1 ~ |
\flowingFifths |
<ds ds'>8 <cs e? cs'>4 <e gs e'?> <ds fs ds'> <ds fs ds'>8 ~ |
\flowingFifths |
<ds fs ds'>1 ~ |
\transpose b gs \flowingFifths |
<ds ds'>8 <cs e cs'>4 <e gs e'> <ds fs ds'> <ds fs ds'>8 ~ |
\transpose b gs \flowingFifths |
<ds fs ds'>2 <cs fs cs'> |
\transpose b fs \flowingFifths |
<b cs b'>2 <as cs as'> |
\transpose b fs \flowingFifths |
<gs cs gs'>1 ~ |
\transpose b cs \flowingFifths |
<gs cs gs'>2 <fs cs' fs> |
\transpose b cs \flowingFifths |
<es cs' es>2 cs |
\ottava #-1
<cs,, cs'>8 gs' <cs, cs'> gs' <cs, cs'> gs' <cs, cs'> gs' |
<<
{ <cs' es>4. <cs es> <cs es>4 }
\\
{ es,4. gs as4 }
>> |
<cs, cs'>8 gs' <cs, cs'> gs' <cs, cs'> gs' <cs, cs'> gs' |
<fs b ds>1 |
<<
{ r8 <ds' fs> <b b'> <ds fs> <b b'> <ds fs> <b b'> <ds fs> }
\\
{ <b, b'>1 }
>> |
<<
{ ds'4. es fs4 }
\\
{ b,4. gs <fs as>4 }
>> |
<b' b'>8 <ds fs> <b b'> <ds fs> <b b'> <ds fs> <b b'> <ds fs> |
<gs cs gs'>1 |
\ottava #0
<<
{ r8 <gs cs> <e e'?> <gs cs> <e e'> <gs cs> <e e'> <gs cs> }
\\
{ <e,? e'?>1 }
>> |
<<
{ gs'4. b cs4 }
\\
{ <gs, cs>4. <b e> <cs gs'>4 }
>> |
<e' e'>8 <gs cs> <e e'> <gs cs> <e e'> <gs cs> <e e'> <gs cs> |
<ds fs as ds>1 |
<<
{ r8 <es as> <css css'> <es as> <css css'> <es as> <css css'> <es as> }
\\
{ <ds, ds'>1 }
>> |
<gs gs'>4. <fs fs'> <es es'>4 |
<css' css'>8 <es as> <css css'> <es as> <css css'> <es as> <css css'> <es as> |
\time 5/4
% now it gets crazy
\key df \major
<ef ef'>8 r8
\change Staff = "left"
\override Stem #'direction = #UP
s16 f,, bf ef s16 f bf
\change Staff = "right"
ef s16 f bf ef s16 f bf ef |
\key df \major
<ef, ef'>8 r8
\override Stem #'direction = #DOWN
gf'16 s8 s16 gf'16 s8 s16
\change Staff = "right"
gf'16 s8 s16 gf'16 s8 s16 |
\revert Stem #'direction
\time 2/2
<af, f'>4 <af f'>8 <af f'> ~ <af f'> <af ef'> <af df>4 |
\revert Stem #'direction
\change Staff = "left"
<af,,,, af'>4
\clef treble
df''8 <af' f'>8 ~ <af f'>8 <af ef' gf> <af df f>4 |
<ef af ef'>4 <ef af ef'>8 <ef af ef'> ~ <ef af ef'> <ef af df> <ef af c>4 |
<c, af' c>4 <df af' df>8 <c af' c> ~ <c af' c> <df af' df> <c af' c>4 |
\time 5/4
<df f bf>4
\change Staff = "left"
\override Stem #'direction = #UP
s16 c,,, f bf s16 c f bf
\change Staff = "right"
s16 c f bf s16 c f bf |
<bf f' bf>4
\clef bass
\override Stem #'direction = #DOWN
df,,16 s8 s16 df'16 s8 s16
\change Staff = "right"
df'16 s8 s16 df'16 s8 s16 |
\revert Stem #'direction
\time 2/2
<<
{ df8( c bf c) ~ c bf af4 }
\\
{ ef4. ef8 ~ ef ef ef4 }
>> |
\revert Stem #'direction
\change Staff = "left"
<af,,, af'>4
\clef treble
af''8 <ef' af>8 ~ <ef af>8 <g bf> <af c>4 |
<bf ef bf'>4 <bf ef bf'>8 <bf ef bf'> ~ <bf ef bf'> <bf ef af> <bf c? g'>4 |
<g, ef' g>4. <af ef' cf'>8\arpeggio ~ <af ef' cf'> <ef bf' ef> <e c'? e>4 |
\time 5/4
<af c f>4
\change Staff = "left"
\override Stem #'direction = #UP
s16 g,, c f s16 g c f
\change Staff = "right"
s16 g c f s16 g c f |
<f c' f>4
\clef bass
\override Stem #'direction = #DOWN
af,16 s8 s16 af'16 s8 s16
\change Staff = "right"
af'16 s8 s16 af'16 s8 s16 |
\revert Stem #'direction
\time 2/2
<gf,? bf gf'?>4 <gf bf gf'>8 <gf bf gf'> ~ <gf bf gf'> <f bf f'> <ef gf bf ef>4 |
\revert Stem #'direction
\change Staff = "left"
<gf,,,,? gf'?>4
\clef treble
<df'' df'>8 <bf' gf' bf>8 ~ <bf gf' bf> <df bf' df> <ef bf' df>4 |
<f af f'>4 <f af f'>8 <f af f'> ~ <f af f'> <ef af ef'> <df f df'>4 |
<df af' df>4 <c af' c>8 <df af' df> ~ <df af' df> <c af' c> <bf f' bf>4 |
<ef gf ef'>4 <ef gf ef'>8 <ef gf ef'> ~ <ef gf ef'> <df gf df'> <cf af' cf>4 |
<cf cf'>8 <bf bf'> <gf gf'> \clef bass <ef ef'> <df df'> <bf bf'> <af af'>4 |
<df ff df'>4 <df ff df'>8 <df ff df'> ~ <df ff df'> <cf ff cf'> <bf ff' bf>4 |
<g g'>8 <bf bf'> <df df'> <ff ff'> <df df'> <ff ff'> <g g'>4 |
\time 5/4
<af ef' af>4
\change Staff = "left"
\override Stem #'direction = #UP
s16 cf,, ef af s16 cf
\change Staff = "right"
ef af s16 cf ef af
\ottava #'1
s16 cf ef af |
\clef bass
<af,, af'>4
\override Stem #'direction = #DOWN
bf'16 s8 s16 bf'16 s8 s16
\change Staff = "right"
bf'16 s8 s16 bf'16 s8 s16 |
\revert Stem #'direction
<bf, ef bf'>4
\ottava #'0
\change Staff = "left"
\override Stem #'direction = #UP
s16 bf,,, ef bf' s16 bf
\change Staff = "right"
ef bf' s16 bf ef bf'
\ottava #'1
s16 bf ef bf' |
\change Staff = "left"
\revert Stem #'direction
<g,,,, g'>4
\override Stem #'direction = #DOWN
af'16 s8 s16 af'16 s8 s16
\change Staff = "right"
af'16 s8 s16 af'16 s8 s16 |
\revert Stem #'direction
<cf, ef cf'>4
\ottava #'0
\change Staff = "left"
\override Stem #'direction = #UP
s16 f,,,, cf' ef s16 f cf'
\change Staff = "right"
ef s16 f cf' ef
\ottava #'1
s16 f cf' ef |
\change Staff = "left"
\revert Stem #'direction
<gf,,,,? gf'?>4
\override Stem #'direction = #DOWN
gf'16 s8 s16 gf'16 s8 s16
\change Staff = "right"
gf'16 s8 s16 gf'16 s8 s16 |
\revert Stem #'direction
<af, df af'>4
\ottava #'0
\change Staff = "left"
\override Stem #'direction = #UP
s16 af,,, df af' s16 af
\change Staff = "right"
df af' s16 af df af'
\ottava #'1
s16 af df af' |
\change Staff = "left"
\revert Stem #'direction
<ff,,,, ff'>4
\override Stem #'direction = #DOWN
gf'16 s8 s16 gf'16 s8 s16
\change Staff = "right"
gf'16 s8 s16 gf'16 s8 s16 |
\time 2/2
\revert Stem #'direction
<bf, d f bf>4 \ottava #'0 r r2 |
\change Staff = "left"
\revert Stem #'direction
<<
{ r8 <f,,,? bf> <d d'> <f bf> <d d'> <f bf> <d d'> <f bf> }
\\
{ <bf,, bf'>1 }
>> |
<af cf d af'>4. <gf bf d gf> <f cf' ef f>4 |
<d' d'>8 <f bf> <d d'> <f bf> <d d'> <f bf> <d d'> <f bf> |
\key b \major <ds fs as ds>1 ~ |
\key b \major <b,, b'>8 fs'' b fs' b fs b, fs |
<ds fs as ds>8 <cs cs'>4 <e e'> <ds ds'> <b b'>8 ~ |
\flowingFifths |
<b b'>1 ~ |
\transpose b gs \flowingFifths |
<b b'>8 <as as'>4 <cs cs'> <b b'> <b b'>8 ~ |
\transpose b gs \flowingFifths |
<b b'>1 |
\transpose b fs \flowingFifths |
\grace { cs16[ b] } <as as'>2 <gs gs'>4. <fs fs'>8 |
\transpose b fs \flowingFifths |
<gs cs gs'>1 ~ |
\flowingOctaves |
<gs cs gs'>2 <fs cs' ~ fs>2 |
\flowingOctaves |
<es cs' es>1 ~ |
\transpose b as \flowingFifths |
<es cs' es>8 <ds fs ds'>4 <fs as fs'> <es as es'> <es as es'>8 ~ |
\transpose b as \flowingFifths |
<es as es'>1 ~ |
\transpose b gs \flowingFifths |
<es as es'>8 <ds fs ds'>4 <fs as fs'> <es as es'> <es as es'>8 ~ |
\transpose b gs \flowingFifths |
<es as es'>2 \grace { fs16[ es] } <ds ds'>2 |
\transpose b fs \flowingFifths |
<cs cs'> \grace { ds16[ cs] } <bs bs'>2 |
\transpose b fs \flowingFifths |
<as as'>4. <bs bs'> <css css'>4 ~ |
as,8 es' as as es' as gs fs |
<css css'>8 <ds ds'>4. <es es'>4 <ds ds'> ~ |
es8 ds css b as gs fs es |
<ds ds'>1 ~ |
\flowingFifths |
<ds ds'>8 <cs e? cs'>4 <e gs e'?> <ds fs ds'> <ds fs ds'>8 ~ |
\flowingFifths |
<ds fs ds'>1 ~ |
\transpose b gs \flowingFifths |
<ds ds'>8 <cs e cs'>4 <e gs e'> <ds fs ds'> <ds fs ds'>8 ~ |
\transpose b gs \flowingFifths |
<ds fs ds'>2 <cs fs cs'> |
\transpose b fs \flowingFifths |
<b cs b'>2 <as cs as'> |
\transpose b fs \flowingFifths |
<gs cs gs'>1 ~ |
e,8 cs' e gs e' gs, e cs |
<gs cs gs'>2 <fs cs' ~ fs> |
e,8 cs' e gs e' gs, e cs ~ |
<es gs cs es>1\fermata |
<cs, cs'>1\fermata \bar "|."
}
\score {
\new PianoStaff \with {
instrumentName = "Piano"
} <<
\new Staff = "right" \with {
midiInstrument = "acoustic grand"
} \relative c' \right
\new Staff = "left" \with {
midiInstrument = "acoustic grand"
} { \clef bass \relative c \left }
>>
\layout { }
\midi {
\context {
\Score
tempoWholesPerMinute = #(ly:make-moment 72 2)
}
}
}