summaryrefslogtreecommitdiff
path: root/03-circus/parts/keyboard.ly
blob: 473573acda9b95c2ac2b9e4a1183f501857eabae (about) (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
keyboardIntroUpper = \relative c' {
  <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 |
}

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 |
}

keysIntroEndUpper = \relative c' {
  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>-. |
}

keysIntroEndLower = \relative c {
  cis4-. gis-. | cis-. gis-. |
  cis-.  gis-. | cis-. gis-. |
}

keysSoloUpper = \relative c' {
  \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>-.  |
}

keysSoloLower = \relative c {
  \time 2/4
  cis4-. gis-. | cis-. gis-. |
  cis-.  gis-. |
  \time 3/4
  cis8 r gis gis r gis |
  \time 2/4
  a4-. e-. | a-. e-. | a-. e-. |
  a-. c8 b | r f f r |
}

keysSpookyUpper = \relative c' {
  \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>    |
}

keysSpookyLower = \relative c {
  \time 2/4
  fis2 ~ | fis ~ | fis ~ |
  \time 3/4
  fis2.  |
  \time 2/4
  d2 ~ | d ~ | d ~ | d ~ | d |
}


keyboard = \new PianoStaff <<
  \set PianoStaff.midiInstrument = #"reed organ"
  \new Staff \relative c'  {
    \time 2/4
    \key cis \minor
    r4 r8 <cis e g> ~ |
    \repeat volta 2 \keyboardIntroUpper
    \alternative {
      { r2   | }
      { \keysIntroEndUpper }
    }

    %% Stick solo
    \repeat unfold 2 \keysSoloUpper

    %% Spooky!
    \key fis \minor
    \set PianoStaff.midiInstrument = #"choir aahs"
    \repeat volta 2 \keysSpookyUpper

  }

  \new Staff \relative c {
    \clef bass
    \key cis \minor
    r2 |
    \repeat volta 2 \keyboardIntroLower
    \alternative {
      { r2   | }
      { \keysIntroEndLower }
    }

    \repeat unfold 2 \keysSoloLower

    %% Spooky!
    \key fis \minor
    \repeat volta 2 \keysSpookyLower

  }
>>