summaryrefslogtreecommitdiff
path: root/03-circus/parts
diff options
context:
space:
mode:
authorrekado <rekado@elephly.net>2015-10-17 23:02:30 +0200
committerrekado <rekado@elephly.net>2015-10-17 23:03:35 +0200
commit6f414f6c217be03ca7b4c38f60a82e7207ec31b3 (patch)
tree87e0050ffa53f50bb009e4c2a0356bbdbc179003 /03-circus/parts
parent80148e88aa75914e7a81009097ff6dbb400b5c49 (diff)
circus: keyboard: use variables
Diffstat (limited to '03-circus/parts')
-rw-r--r--03-circus/parts/keyboard.ly44
1 files changed, 28 insertions, 16 deletions
diff --git a/03-circus/parts/keyboard.ly b/03-circus/parts/keyboard.ly
index 8fe5a0f..4a7e588 100644
--- a/03-circus/parts/keyboard.ly
+++ b/03-circus/parts/keyboard.ly
@@ -1,19 +1,35 @@
+keyboardIntroUpper = \relative c' {
+ <cis e g> ~ <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 |
+ r2 |
+}
+
+keyboardIntroLower = \relative c {
+ cis4-. gis-. cis-. gis-.
+ cis-. gis-. cis-. r8 cis ~
+ cis4 gis-. cis-. gis-.
+ cis-. gis-.
+ dis8 r r d ~ d2 |
+ dis8 r r d ~ d2 |
+ r2 |
+}
+
keyboard = \new PianoStaff <<
\new Staff \relative c' {
\set Staff.midiInstrument = #"accordion"
\time 2/4
\key cis \minor
r4 r8 <cis e g> ~ |
- <cis e g> ~ <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 |
+ \keyboardIntroUpper
+ \keyboardIntroUpper
}
\new Staff \relative c {
@@ -21,11 +37,7 @@ keyboard = \new PianoStaff <<
\clef bass
\key cis \minor
r2 |
- cis4-. gis-. cis-. gis-.
- cis-. gis-. cis-. r8 cis ~
- cis4 gis-. cis-. gis-.
- cis-. gis-.
- dis8 r r d ~ d2
- dis8 r r d ~ d2
+ \keyboardIntroLower
+ \keyboardIntroLower
}
>>