diff options
| -rw-r--r-- | 03-circus/03-circus.ly | 5 | ||||
| -rw-r--r-- | 03-circus/music/chords.ly | 109 |
2 files changed, 113 insertions, 1 deletions
diff --git a/03-circus/03-circus.ly b/03-circus/03-circus.ly index 7b2b20d..c2aa194 100644 --- a/03-circus/03-circus.ly +++ b/03-circus/03-circus.ly @@ -10,6 +10,7 @@ \include "music/keys.ly" \include "music/stick.ly" \include "music/click.ly" +\include "music/chords.ly" \layout { ragged-last = ##t @@ -49,6 +50,8 @@ AllMusic = << } { \stick } >> -AllMusicMIDI = \AllMusic +AllMusicMIDI = #(if (string-null? (getenv "LILYPOND_USE_CHORDS")) + #{ \AllMusic #} + #{ \chordTrack #}) \include "../layouts.ly" diff --git a/03-circus/music/chords.ly b/03-circus/music/chords.ly new file mode 100644 index 0000000..9318a8a --- /dev/null +++ b/03-circus/music/chords.ly @@ -0,0 +1,109 @@ +\include "keys.ly" + +chordTrack = \relative c { + \set PianoStaff.midiInstrument = #"electric piano 1" + %% intro + \time 2/4 + R2 | r4 r8 <cis e g> ~ | + + \repeat volta 2 { + <cis e g>8 ~ <cis e gis>-. r <cis e gis>-. r <cis e gis>-. r <cis e gis>-. + r <cis e gis>-. r <cis e gis>-. r <cis e gis>-. r + + <cis e g>8 ~ + <cis e g>8 ~ <cis e gis>-. + r <cis e gis>-. r <cis e gis>-. r <cis e gis>-. + r <cis e gis>-. r <cis e gis>-. + + <dis fis ais>8 r r <d fis ais>8 ~ <d fis ais>2 | + <dis fis ais>8 r r <d fis ais>8 ~ <d fis ais>2 | + } + \alternative { + { R2 | } + { + R2 | + r8 <cis e gis>-. r <cis e gis>-. | + r <cis e gis>-. r <cis e gis>-. | + r <cis e gis>-. r <cis e gis>-. | + r <cis e gis>-. r <cis e gis>-. | + } + } + + %% solo + \repeat unfold 2 { + \time 2/4 + r8 <cis e gis>-. r <cis e gis>-. | + r <cis e gis>-. r <cis e gis>-. | + r <cis e gis>-. r <cis e gis>-. | + \time 3/4 + r <cis e gis>-. r r <cis e gis>-. r | + \time 2/4 + r8 <c e a>-. r <c e a>-. | + r <c e a>-. r <c e a>-. | + r <c e a>-. r <c e a>-. | + r <c e a>-. r r | + <c e a>-. r r <c e a>-. | + } + + %% spooky + \repeat volta 2 { + \time 2/4 + <cis fis a>2 ~ | <cis fis a> ~ | <cis fis a> ~ | + \time 3/4 + <cis fis a>2. | + \time 2/4 + <d f a>2 ~ | <d f a> ~ | + <d f a> ~ | <d f a> ~ | + <d f a> | + } + + %% half time + \repeat volta 2 { + \repeat volta 2 { + \time 2/4 + r4 <d fis b>8-. r | + r4 <d fis b>8-. r | + r4 <d fis b>8-. r | + \time 3/4 + r4 <d fis b>8-. r <d fis b>-. r | + \time 2/4 + r4 <d g bes>8-. r | + r4 <d g bes>8-. r | + r4 <d g bes>8-. r | + r4 <d g bes>8-. r | + r4 <d g bes>8-. r | + } + + %% weird + \repeat volta 2 { + \time 5/4 { <d g b>4*5 |} + \time 9/8 { <d fis b>8*9 |} + } \alternative { + { <d fis b>8*9 |} + } + + %% dance + \time 5/4 { <d g b>4 r2 r2 | <d fis b>4 r2 r2 | } + \time 3/4 { <d g b>2. | <e ais fis>4 ~ <d ais' fis>4 r4 | } + } + + %% beauty + \keysBeautyLower + + %% before arp + \time 3/4 + e2. ~ | e2. ~ | e2. ~ | e2. | + + \keysArpeggioUpper + \key fis \minor + \transpose c d { \keysArpeggioHigherUpper } + + \keysDramaUpper + \keysDramaEndingUpper + + \keysArpeggioLongerUpper + \key fis \minor + \transpose c d { \keysArpeggioHigherUpper } + \keysDramaUpper + \keysFinalUpper +} |