initial lilypond files

This commit is contained in:
tmont 2013-11-30 01:24:05 -08:00
commit 99343e80b8
5 changed files with 1239 additions and 0 deletions

2
.gitignore vendored Normal file
View File

@ -0,0 +1,2 @@
in-your-memory.midi
running-from-the-gypsies.midi

458
in-your-memory.ly Normal file
View File

@ -0,0 +1,458 @@
\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 |
\transpose b fs \flowingFifths |
gs1 |
\transpose b cs' \flowingFifths |
as4. b cs4 |
fs,8 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 es'>1 ~ |
\transpose b as \flowingFifths |
<es 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
<ef, c'>4 <ef c'>8 <ef c'> ~ <ef c'> <ef bf'> <ef af>4 |
\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 |
<aff aff'>8 <bf bf'> <df df'> <ff ff'> <df df'> <ff ff'> <aff aff'>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>2 r |
\key b \major <b,, b'>8 fs'' b fs' b fs b, fs |
r8 <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 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 ~ |
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)
}
}
}

BIN
in-your-memory.pdf Normal file

Binary file not shown.

779
running-from-the-gypsies.ly Normal file
View File

@ -0,0 +1,779 @@
\version "2.14.2"
\language "english"
\header {
title = "Running from the Gypsies"
composer = "Tommy Montgomery"
copyright = "2013"
}
defaultTimeAndStyle = {
\numericTimeSignature
\time 3/4
\set Timing.beamExceptions = #'()
\set Timing.baseMoment = #(ly:make-moment 1 8)
\set Timing.beatStructure = #'(2 2 2)
\set Staff.printKeyCancellation = ##f
\override TupletBracket #'bracket-visibility = #'if-no-beam
}
global = {
\key ef \minor
\defaultTimeAndStyle
}
simpleAFlatMinorInterludeR = {
r8 <ef, af>-. r8 <af ff'>-. r8 <g ef'>-. r8 <e df'>-. |
r8 <ef? af>-. r8 <af ff'>-. r8 <g ef'>-. r8 <e df'>-. |
\defaultTimeAndStyle
<af ef'?>2. |
}
simpleAFlatMinorInterludeL = {
af,8 <ef' af> af, <ef' cf'> af, <ef' bf'> af, <e' g> |
af, <ef'? af> af, <ef' cf'> af, <ef' bf'> af, <e' g> |
\defaultTimeAndStyle
af, <ef'? af> af, <ef' af> af, <ef' af> |
}
defaultEFlatMinorSubjectR = {
r8 gf-. \times 2/3 { f16 gf f } ef8 f <bf, bf'>-. |
r8 gf'-. \times 2/3 { f16 gf f } ef8 f <cf cf'>-. |
r8 gf'-. \times 2/3 { f16 gf f } ef8 f <bf, bf'>-. |
<df df'>-. <cf cf'>-. <bf bf'>-. <af af'>-. <g g'>( <af af'>-.) |
\time 4/4
<bf bf'>1 |
}
defaultAFlatMinorInterludeR = {
r8 <cf ef af> r8 <ff af ff'> r8 <ef g ef'> r8 <df ff df'> |
r8 <cf ef af> r8 <ff af ff'> r8 <ef g ef'> r8 <df ff df'> |
\defaultTimeAndStyle
<ef af ef'>2. |
}
flowingSectionL = {
\scaleDurations #'(2 . 3) {
\repeat unfold 2 {
cs,4 gs'8 cs cs gs' cs gs cs, cs gs4
}
\repeat unfold 2 {
bs,4 gs'8 bs bs gs' bs gs bs, bs gs4
}
\repeat unfold 2 {
fs4 cs'8 fs fs cs' fs cs fs, fs cs4
}
\repeat unfold 2 {
es,4 cs'8 es es cs' es cs es, es cs4
}
\repeat unfold 2 {
e,?4 cs'8 e? e cs' e? cs e, e cs4
}
\repeat unfold 2 {
e,4 b'8 e e b' e b e, e b4
}
ds,4 b'8 ds ds b' ds b ds, ds b4 |
\repeat unfold 2 {
d,4 b'8 d d b' d b d, d b4 |
}
cs,4 gs'8 cs cs gs' cs gs cs, cs gs4 |
% f# minor
\repeat unfold 2 {
fs4 cs'8 fs fs cs' fs cs fs, fs cs4
}
\repeat unfold 2 {
es,4 cs'8 es es cs' es cs es, es cs4
}
\repeat unfold 2 {
b4 fs'8 b b fs' b fs b, b fs4
}
\repeat unfold 2 {
as,4 fs'8 as as fs' as fs as, as fs4
}
a,?4 fs'8 a? a fs' a? fs a, a fs4 |
a,4 fs'8 a a fs' a fs a, a fs4 |
\repeat unfold 2 {
a,4 e'8 a a e' a e a, a e4
}
gs,4 e'8 gs gs e' gs e gs, gs e4 |
g,4 e'8 g g e' g e g, g e4 |
}
}
right = \relative c'' {
\global
\override DynamicLineSpanner #'staff-padding = #2.0
\override DynamicLineSpanner #'Y-extent = #'(-1.5 . 1.5)
<cf cf'>2.\f->\fermata |
<bf bf'>2.->\fermata |
<ef, ef'>2.~ |
q2. |
% simple subject
r8\mp gf-. gf16( f ef8) f( bf-.) |
r8 gf-. gf16( f ef8) f( cf'-.) |
r8 gf-. gf16( f ef8) f bf-. |
df-. cf-. bf-. af-. gf( af-.) |
\time 4/4
bf1 |
\simpleAFlatMinorInterludeR
r2.\f |
% more complex subject
r2. |
r2. |
\relative c''' {
\defaultEFlatMinorSubjectR
\defaultAFlatMinorInterludeR
r2. |
r2. |
r2. |
}
r8 cf-. \times 2/3 { bf16 cf bf } af8 bf <f f'>-. |
r8 cf'-. \times 2/3 { bf16 cf bf } af8 bf <gf gf'>-. |
r8 cf-. \times 2/3 { bf16 cf bf } af8 bf <f f'>-. |
<af af'>-. <gf gf'>-. <f f'>-. <ef ef'>-. <d d'>( <ef ef'>-.) |
\time 4/4
<f f'>1
r8 <gf bf ef> r8 <cf ef cf'> r8 <bf d bf'> r8 <af cf af'> |
r8 <gf bf ef> r8 <cf ef cf'> r8 <bf d bf'> r8 <af cf af'> |
<bf ef bf'>1
% eflat minor interlude
\time 6/4
r4 <gf, bf ef>8 <af bf f'> q <gf bf ef> q <af bf f'> q <gf bf gf'> <af bf f'>4 |
\change Staff = "left"
\override Stem #'direction = #UP
r16 d, f af
\change Staff = "right"
d d f af d d f af
\ottava #1
d d f af d4
\ottava #0
\revert Stem #'direction
r4 |
r4 <gf,,,, bf ef>8 <af bf f'> q <gf bf ef> q <af bf f'> q <gf bf gf'> <af cf af'>4 |
\change Staff = "left"
\override Stem #'direction = #UP
r16 d, f af
\change Staff = "right"
d d f af d d f af
\ottava #1
d d f af d4
\ottava #0
\revert Stem #'direction
r4 |
r4 <cf,,, ef af>8 <df ef bf'> q <cf ef af> q <df ef bf'> q <cf ef cf'> <df ef bf'>4 |
\change Staff = "left"
\override Stem #'direction = #UP
r16 g,
\change Staff = "right"
bf df g g bf df g g bf df
\ottava #1
g g bf df g4
\ottava #0
\revert Stem #'direction
r4 |
\time 5/4
r4 <cf,,,, ef af>8 <df ef bf'> q <cf ef af> q <df ef bf'> q <cf ef cf'> |
\time 6/4
<df ff df'>4 <cf ef cf'> q <bf df bf'> <gs b gs'> <fss as fss'> |
\key cs \minor
\defaultTimeAndStyle
<gs b gs'>2. ~ |
q2. |
% g# minor subject
r8 b'-. \times 2/3 { as16 b as } gs8 as <ds, ds'>-. |
r8 b'-. \times 2/3 { as16 b as } gs8 as <e e'>-. |
r8 b'-. \times 2/3 { as16 b as } gs8 as <ds, ds'>-. |
<fs fs'>-. <es es'>-. <ds ds'>-. <cs cs'>-. <bs bs'>( <cs cs'>-.) |
\time 4/4
<ds ds'>1
\defaultTimeAndStyle
% c# minor subject
r8 e'-. \times 2/3 { ds16 e ds } cs8 ds <gs, gs'>-. |
r8 e'-. \times 2/3 { ds16 e ds } cs8 ds <a a'>-. |
r8 e'-. \times 2/3 { ds16 e ds } cs8 ds <gs, gs'>-. |
<b b'>-. <a a'>-. <gs gs'>-. <fs fs'>-. <es es'>( <fs fs'>-.) |
\time 4/4
<gs gs'>1 |
% f# minor interlude
\repeat unfold 2 {
r8 <a cs fs> r8 <d fs d'> r8 <cs es cs'> r8 <b d b'> |
}
<cs fs cs'>1 |
<bs fs' gs bs>1\arpeggio |
% c# minor interlude
\scaleDurations #'(2 . 3) {
r8 e,,-> gs e' e gs e' gs, e e gs, e |
\repeat unfold 2 {
r8 ds-> gs ds' ds gs ds' gs, ds ds gs, ds |
}
r8 fs-> gs fs' fs gs fs' gs, fs fs gs, fs |
r8 a-> cs a' a cs a' cs, a a cs, a |
\repeat unfold 2 {
r8 gs-> cs gs' gs cs gs' cs, gs gs cs, gs |
}
r8 b-> cs b' b cs b' cs, b b cs, b |
r8 a-> cs a' a cs a' cs, a a cs, a |
r8 gs-> cs gs' gs cs gs' cs, gs gs cs, gs |
r8 gs-> b gs' gs b gs' b, gs gs b, gs |
\repeat unfold 3 {
r8 fs-> b fs' fs b fs' b, fs fs b, fs |
}
r8 es-> b' es es b' es b es, es b es, |
r8 gs-> b gs' gs b gs' b, gs gs b, gs-> |
% f# minor
r8 a-> cs a' a cs a' cs, a a cs, a |
\repeat unfold 2 {
r8 gs-> cs gs' gs cs gs' cs, gs gs cs, gs |
}
r8 b-> cs b' b cs b' cs, b b cs, b |
r8 d-> fs d' d fs d' fs, d d fs, d |
\repeat unfold 2 {
r8 cs-> fs cs' cs fs cs' fs, cs cs fs, cs |
}
r8 e-> fs e' e fs e' fs, e e fs, e |
r8 d-> fs d' d fs d' fs, d d fs, d |
r8 cs-> fs cs' cs fs cs' fs, cs cs fs, cs |
r8 cs-> e cs' cs e cs' e, cs cs e, cs |
\repeat unfold 3 {
r8 b-> e b' b e b' e, b b e, b |
}
}
r16 as e' g as as e' g as4 <as, e' g> |
\defaultTimeAndStyle
\key ef \minor
<cf ef~ cf'>2. |
<bf ef bf'>2. |
<ef,, ef'>2. ~ |
q2. |
r8 <gf gf'>-. q16( <f f'> <ef ef'>8) <f f'> <bf bf'>-. |
r8 <gf gf'>-. q16( <f f'> <ef ef'>8) <f f'> <cf' cf'>-. |
r8 <gf gf'>-. q16( <f f'> <ef ef'>8) <f f'> <bf bf'>-. |
<df df'>-. <cf cf'>-. <bf bf'>-. <af af'>-. <gf gf'>( <af af'>-.) |
\time 4/4
<bf bf'>1 |
\relative c'' {
\simpleAFlatMinorInterludeR
}
r16 <af af'>16-.[ r16 <gf gf'>16-. r16 <g g'>16-. r16 <f f'>16-. r16 <e e'>16-. r16 <d d'>16-.] |
\time 4/4
<ef ef'>1 |
r1 |
\defaultTimeAndStyle
\relative c''' {
\defaultEFlatMinorSubjectR
}
r8 <cf' ef af> r8 <ff af ff'> r8 <ef g ef'> r8 <df ff df'> |
r8 <cf' ef af> r8 <ff af ff'> r8 <ef g ef'> r8 <df ff df'> |
<ef af ef'>1 |
\time 6/4
r4 <cf, ef af>8 <df ef bf'> q <cf ef af> q <df ef bf'> q <cf ef cf'> <df ef bf'>4 |
\change Staff = "left"
\override Stem #'direction = #UP
r16 g,
\change Staff = "right"
bf df g g bf df g g bf df
\ottava #1
g g bf df g4
\ottava #0
\revert Stem #'direction
r4 |
r4 <cf,,,, ef af>8 <df ef bf'> q <cf ef af> q <df ef bf'> q <cf ef cf'> <df e df'>4 |
\change Staff = "left"
\override Stem #'direction = #UP
r16 g,
\change Staff = "right"
bf df g g bf df g g bf df
\ottava #1
g g bf df g4
\ottava #0
\revert Stem #'direction
r4 |
r4 <ff,,, af df>8 <gf af ef'> q <ff af df> q <gf af ef'> q <ff af ff'> <gf af ef'>4 |
\change Staff = "left"
\override Stem #'direction = #UP
r16 c,, ef gf
\change Staff = "right"
c c ef gf c c ef gf
\ottava #1
c c ef gf c4
\ottava #0
\revert Stem #'direction
r4 |
\time 5/4
r4 <ff,,, af df>8 <gf af ef'> q <ff af df> q <gf af ef'> q <ff af ff'> |
\time 6/4
<gf bff gf'>4 <ff af ff'> q <ef gf ef'> <df ff df'>\fermata <c ef c'>\fermata |
\time 4/4
\key cs \minor
% c# minor interlude again
\scaleDurations #'(2 . 3) {
r8 e, gs e' e gs e'-> gs, e e gs, e |
\repeat unfold 2 {
r8 ds gs ds' ds gs ds'-> gs, ds ds gs, ds |
}
r8 fs gs fs' fs gs fs'-> gs, fs fs gs, fs |
r8 a cs a' a cs a'-> cs, a a cs, a |
\repeat unfold 2 {
r8 gs cs gs' gs cs gs'-> cs, gs gs cs, gs |
}
r8 b cs b' b cs b'-> cs, b b cs, b |
r8 a cs a' a cs a'-> cs, a a cs, a |
r8 gs cs gs' gs cs gs'-> cs, gs gs cs, gs |
r8 gs b gs' gs b gs'-> b, gs gs b, gs |
\repeat unfold 3 {
r8 fs b fs' fs b fs'-> b, fs fs b, fs |
}
r8 es b' es es b' es-> b es, es b es, |
r8 es cs' es es cs'
}
\times 4/7 { es16 es, cs' es es cs' es }
\ottava #1
\set Staff.ottavation = #"8"
cs'4 |
\ottava #0
\scaleDurations #'(2 . 3) {
% f# minor
r8 a,,, cs a' a cs a'-> cs, a a cs, a |
\repeat unfold 2 {
r8 gs cs gs' gs cs gs'-> cs, gs gs cs, gs |
}
r8 b cs b' b cs b'-> cs, b b cs, b |
}
r16 d fs b d d fs b d b fs d d b fs d |
r cs fs b cs cs fs b cs b fs cs cs b fs cs |
r cs fs as cs cs fs as cs as fs cs cs as fs cs |
r e fs as e' e fs as e' as, fs e e as, fs e |
r d fs a d d fs a d a fs d d a fs d |
r cs fs a cs cs fs a cs a fs cs cs a fs cs |
r cs e a cs cs e a cs a e cs cs a e cs |
r b e a b b e a b a e b b a e b |
\scaleDurations #'(2 . 3) {
\repeat unfold 2 {
r8 b e b' b e b'-> e, b b e, b |
}
r8 bf e bf' bf e bf'-> e, bf bf e, bf |
r8 cs g' cs cs g' cs-> g cs, cs g cs, |
\key d \minor
r f a f' f a f' a, f f a, f |
r e a e' e a e' a, e e a, e |
r e g e' e g e' g, e e g, e |
\repeat unfold 2 {
r d g d' d g d' g, d d g, d |
}
r cs g' cs cs g' cs g cs, cs g cs, |
r d f d' d f d' f, d d f, d |
r af b af' af b af'-> b, af af b, af |
\key ef \minor
r gf bf gf' gf bf gf'-> bf, gf gf bf, gf |
\repeat unfold 2 {
r f bf f' f bf f'-> bf, f f bf, f |
}
r af bf af' af bf af'-> bf, af af bf, af |
r cf ef cf' cf ef cf'-> ef, cf cf ef, cf |
\repeat unfold 2 {
r bf ef bf' bf ef bf'-> ef, bf bf ef, bf |
}
r df ef df' df ef df'-> ef, df df ef, df |
r cf ef cf' cf ef cf'-> ef, cf cf ef, cf |
r bf ef bf' bf ef bf'-> ef, bf bf ef, bf |
r bf df bf' bf df bf'-> df, bf bf df, bf |
\repeat unfold 3 {
r af df af' af df af'-> df, af af df, af |
}
}
r16 g df' e g g df' e g4 <g, df' e> |
\defaultTimeAndStyle
<cf ef~ cf'>2. |
<bf ef bf'>2. |
<ef, af ef'>2. |
<f, af ef'~>2. |
<ef bf' ef>2.\laissezVibrer |
r16 f cf' d r16 f cf' d r16 f d cf |
r16 f, cf' d r16 f cf' d r16 f d cf |
r16 f, cf' d
\ottava #1
r16 f cf' d r4 \bar "|."
}
left = \relative c' {
\global
<af af,>2.\fermata |
<gf gf,>2.\fermata |
ef,8 ef' ef, ef' ef, ef' |
ef,8 ef' ef, ef' ef, ef' |
% simple subject
ef,8 ef' ef, ef' ef, ef' |
ef, ef' ef, ef' ef, ef' |
ef, ef' ef, ef' ef, ef' |
ef, ef' ef, ef' ef, ef' |
\time 4/4
ef, ef' ef, ef' ef, ef' ef, ef' |
\simpleAFlatMinorInterludeL
af,16 af' gf, gf' g, g' f, f' e, e' d, d' |
% more complex subject
ef,?8 ef'? bf, ef' ef, ef' |
bf, ef' ef, ef' bf, ef' |
ef, ef' bf, ef' ef, ef' |
bf, ef' ef, ef' bf, ef' |
ef, ef' bf, ef' ef, ef' |
bf, ef' ef, ef' bf, ef' |
\time 4/4
ef, ef' bf, ef' ef, ef' bf, ef' |
af, <ef' af> ef, <ef' cf'> af, <ef' bf'> ef, <bff' aff'>-> |
af <ef' af?> ef, <ef' cf'> af, <ef' bf'> ef, <bff' aff'>-> |
\defaultTimeAndStyle
af <ef' af> af, <ef' af> af, <ef' af> |
af,16 af' g, g' gf, gf' f, f' e, e' ef, ef' |
d,8 d' bf, d' d, d' |
bf, d' d, d' bf, d' |
% bflat subject
d, d' bf, d' d, d' |
bf, d' d, d' bf, d' |
d, d' bf, d' d, d' |
bf, d' d, d' bf, d' |
\time 4/4
d, d' bf, d' d, d' bf, d' |
ef, <bf' ef> bf, <bf' gf'> ef, <bf' f'> bf, <ff' eff'>-> |
ef <bf' ef?> bf, <bf' gf'> ef, <bf' f'> bf, <ff' eff'>-> |
ef <bf' ef?> bf, <bf' ef> ef, <bf' ef> bf, <bf' ef> |
% eflat minor interlude
\time 6/4
<<
\relative c, {
s4 <ef bf' ef>8 <d bf' d> q <ef bf' ef> q <d bf' d> q <ef bf' ef> <d bf' d>4 |
s4 r16 d' af' bf
\change Staff = "right"
\override Stem #'direction = #DOWN
d d af' bf d d af' bf d4
s4 |
\change Staff = "left"
\revert Stem #'direction
s4 <ef,,,, bf' ef>8 <d bf' d> q <ef bf' ef> q <d bf' d> q <ef bf' ef> <d f d'>4 |
\override Stem #'direction = #UP
s4 r16 d' af' cf
\change Staff = "right"
\override Stem #'direction = #DOWN
d d af' cf d d af' cf d4 s4|
\change Staff = "left"
\revert Stem #'direction
% aflat minor
s4 <af,,, ef' af>8 <g ef' g> q <af ef' af> q <g ef' g> q <af ef' af> <g ef' g>4 |
\override Stem #'direction = #DOWN
s4 r16 g'
\change Staff = "right"
df' ef g g df' ef g g df' ef g4 s4 |
\change Staff = "left"
\revert Stem #'direction
\time 5/4
s4 <af,,,, ef' af>8 <g ef' g> q <af ef' af> q <g ef' g> q <af ef' af> |
\time 6/4
<df, df'>4 <gf, gf'> <af af'>4. <fs fs'>16( <e e'>) ds'4. ds8 |
}
\\
{
<ef,, ef'>1. |
bf'1 ~ bf4 <bf bf'> |
<ef, ef'>1. |
bf'1 ~ bf4 <bf bf'> |
<af af'>1. |
ef'1 ~ ef4 <ef, ef'> |
<af af'>1 s4 |
s1 ds,2 |
}
>>
\key cs \minor
\defaultTimeAndStyle
gs'8 <ds' gs> ds, <ds' gs> gs, <ds' gs> |
ds, <ds' gs> gs, <ds' gs> ds, <ds' gs> |
\repeat unfold 2 {
gs, <ds' gs> ds, <ds' gs> gs, <ds' gs> |
ds, <ds' gs> gs, <ds' gs> ds, <ds' gs> |
}
\time 4/4
gs, <ds' gs> ds, <ds' gs> gs, <ds' gs> ds, <ds' gs> |
\defaultTimeAndStyle
% c# minor subject
\repeat unfold 2 {
cs, <gs' cs> gs, <gs' cs> cs, <gs' cs> |
gs, <gs' cs> cs, <gs' cs> gs, <gs' cs> |
}
\time 4/4
cs, <gs' cs> gs, <gs' cs> cs, <gs' cs> gs, <gs' cs> |
% f# minor interlude
\repeat unfold 2 {
fs <cs' fs> cs, <cs' a'> fs, <cs' gs'> cs, <g' f'>-> |
}
fs <cs' fs> cs, <cs' fs> a <cs fs> fs, <cs' fs> |
gs16 ds' gs ds fs, ds' gs ds e, cs' gs' cs, \times 4/6 { ds, gs bs fs' bs, gs } |
% c# minor subject2
\flowingSectionL
g,8 e'16 g16 g8 e'16 g16 ~ g4 <g, e'>4 |
\defaultTimeAndStyle
\key ef \minor
<af, af'>2. |
<gf gf'>2. |
<ef, ef'>4. ef'8 ef, ef' |
ef, ef' ef, ef' ef, ef' |
% low, eflat minor subject
\repeat unfold 4 {
ef, ef' ef, ef' ef, ef' |
}
\time 4/4
ef, ef' ef, ef' ef, ef' ef, ef' |
\relative c' {
\simpleAFlatMinorInterludeL
}
<af af'>16-.[ r16 <gf gf'>16-. r16 <g g'>16-. r16 <f f'>16-. r16 <e e'>16-. r16 <d d'>16-.] r16 |
\time 4/4
\repeat unfold 2 {
ef8 ef' bf, bf' ef,, ef' bf bf' |
}
\defaultTimeAndStyle
ef, ef' bf, bf' ef,, ef' |
bf bf' ef, ef' bf, bf' |
ef,, ef' bf bf' ef, ef' |
bf, bf' ef,, ef' bf bf' |
\time 4/4
ef, ef' bf, bf' ef,, ef' bf bf' |
<af, af'>8 q <cf cf'> q <bf bf'> q <bff bff'> q |
<af' af'>8 q <cf cf'> q <bf bf'> q <bff bff'> q |
af-> <ef' af> ef,-> <ef' af> cf,-> <ef' af> bf,-> <ef' af> |
\time 6/4
<<
\relative c {
s4 <af ef' af>8 <g ef' g> q <af ef' af> q <g ef' g> q <af ef' af> <g ef' g>4 |
\override Stem #'direction = #DOWN
s4 r16 g'
\change Staff = "right"
df' ef g g df' ef g g df' ef g4 s4 |
\change Staff = "left"
\override Stem #'direction = #UP
s4 <af,,,, ef' af>8 <g ef' g> q <af ef' af> q <g ef' g> q <af ef' af> <g bf g'>4 |
\override Stem #'direction = #DOWN
s4 r16 g'
\change Staff = "right"
df' e g g df' e g g df' e g4 s4 |
\change Staff = "left"
\override Stem #'direction = #UP
s4 <df,,, af' df>8 <c af' c> q <df af' df> q <c af' c> q <df af' df> <c af' c>4 |
s4 r16 c gf' af
\override Stem #'direction = #DOWN
\change Staff = "right"
c c gf' af c c gf' af c4 s4 |
\change Staff = "left"
\time 5/4
\override Stem #'direction = #UP
s4 <df,,, af' df>8 <c af' c> q <df af' df> q <c af' c> q <df af' df> |
}
\\
\relative c, {
<af af'>1. |
ef'1 ~ ef4 <ef, ef'> |
<af af'>1. |
ef'1 ~ ef4 <ef, ef'> |
<df df'>1. |
<af' af'>1 ~ q4 q |
<df, df'>1 ~ q4 |
}
>>
\time 6/4
<gf, gf'>4 <cf, cf'> <df df'>4.( <cf cf'>16 <bff bff'> <af af'>2\fermata)
\time 4/4
\key cs \minor
% 2nd c# minor interlude
\relative c {
\flowingSectionL
}
\scaleDurations #'(2 . 3) {
g'4 e'8 g g e' g e g, g e4 |
bf4 e8 bf' bf e bf' e, bf bf e,4 |
\key d \minor
d4
\clef treble
a'8 d d a' d a d, d a4 |
\clef bass
cs,4
\clef treble
a'8 cs cs a' cs a cs, cs a4 |
\clef bass
c,?4
\clef treble
g'8 c? c g' c? g c, c g4 |
\clef bass
b,4
\clef treble
g'8 b b g' b g b, b g4 |
\clef bass
bf,?4
\clef treble
g'8 bf? bf g' bf? g bf, bf g4 |
\clef bass
a,4 e'8 a a e' a e a, a e4 |
bf4
\clef treble
f'8 bf bf f' bf f bf, bf f4 |
\clef bass
f,4 d'8 f f d' f d f, f d4 |
\key ef \minor
\repeat unfold 2 {
ef,4 bf'8 ef ef bf' ef bf ef, ef bf4 |
}
\repeat unfold 2 {
d,4 bf'8 d d bf' d bf d, d bf4 |
}
\repeat unfold 2 {
af4 ef'8 af af ef' af ef af, af ef4 |
}
\repeat unfold 2 {
g,4 ef'8 g g ef' g ef g, g ef4 |
}
gf,?4 ef'8 gf? gf ef' gf? ef gf, gf ef4 |
gf,4 ef'8 gf gf ef' gf ef gf, gf ef4 |
\repeat unfold 2 {
gf,4 df'8 gf gf df' gf df gf, gf df4 |
}
f,4 df'8 f f df' f df f, f df4 |
ff,4 df'8 ff ff df' ff df ff, ff df4 |
}
e,8 df'16 e e8 df'16 e ~ e4 e, |
\defaultTimeAndStyle
<af, af'>2. |
<gf gf'>2. |
<f df' f>2. |
<cf cf'>2. |
<ef, ef'>2.\laissezVibrer |
ef''4 bf' ef |
\clef treble
bf' ef bf' |
\ottava #1
ef bf' ef\fermata |
}
\score {
\new PianoStaff \with {
instrumentName = "Piano"
} <<
\new Staff = "right" \with {
midiInstrument = "acoustic grand"
} \right
\new Staff = "left" \with {
midiInstrument = "acoustic grand"
} { \clef bass \left }
>>
\layout {
\context {
\PianoStaff
}
}
\midi {
\context {
\Score
tempoWholesPerMinute = #(ly:make-moment 116 4)
}
}
}

Binary file not shown.