03-circus/parts/stick.ly

   1 stickA = \relative c'' {
   2   g8 gis-. g-. gis-. | a-. gis16 g8.-. gis8-. |
   3   r gis g gis        | e4 r8 g~               |
   4
   5   g  gis-. g-. gis-. | a-. gis16 g8.-. gis8-. |
   6   g gis g gis        |
   7
   8   <fis ais>8 r r <fis ais> ~ | <fis ais>2 |
   9   <fis ais>8 r r <fis ais> ~ | <fis ais>2 |
  10 }
  11
  12 stickHalfTimeFeel = \relative c' {
  13   \time 2/4
  14   b8 d r b16 d         |
  15   fis8-. r8 r4         |
  16   r8 b,16 d fis g fis8 |
  17   \time 3/4
  18   e16 d cis b d cis c b
  19   \tuplet 3/2 { fis8 g b } |
  20   \time 2/4
  21   ais8 r8. g16 a ais d4 r8*5
  22   d,4 dis eis fis r8 |
  23 }
  24
  25 stickWeird = \relative c' {
  26   \repeat volta 2 {
  27     \time 5/4 {g4. fis16 g cis8 d r g, fis cis |}
  28     \time 9/8 {cis'4. b16 fis a8 b2 | }
  29   } \alternative {
  30     {r2 r8 b8 a g fis  |}
  31     {r2 r8 b cis d fis |}
  32   }
  33 }
  34
  35 %% TODO
  36 stickWeirdLeft = \relative c, {
  37   \repeat volta 2 {
  38     \time 5/4 { r2. r2 |}
  39     \time 9/8 { r1 r8 | }
  40   } \alternative {
  41     { r1 r8 |}
  42     { r1 r8 |}
  43   }
  44 }
  45
  46 stickDance = \relative c' {
  47   \time 5/4
  48   g'4. fis8 e4 r2
  49   fis4. e16 d b4
  50   %% TODO
  51   \tuplet 3/2 { f8 b d }
  52   fis4
  53
  54   \time 3/4
  55   e2. | d8 cis ais4 r4
  56 }
  57
  58 %% TODO
  59 stickDanceLeft = \relative c, {
  60   \time 5/4 { r2. r2 | r2. r2 | }
  61   \time 3/4 { r2. | r2. | }
  62 }
  63
  64
  65 stickBeautyLeft = \relative c, {
  66   \repeat unfold 3 {
  67     \time 4/4
  68     b8\sustainOn fis' cis' d8 ~ d2 |
  69     \time 3/4
  70     g,8\sustainOff d' b'
  71     a, e' cis' |
  72   }
  73
  74   \time 4/4
  75   <b, d'>4.-> <a cis'> <a cis'>8-> <g b'>8 ~ |
  76   \time 6/8
  77   <g b'>4. r8 g8 fis |
  78   \time 9/8
  79   e2 r4 d8 r cis |
  80
  81   \repeat volta 2 {
  82     \time 7/8
  83     b4\sustainOn d'8 ~ d2 |
  84     \time 3/4
  85     g,8\sustainOff d' b'
  86     a, e' cis' |
  87
  88     \repeat unfold 2 {
  89       \time 4/4
  90       b,,8\sustainOn fis' cis' d8 ~ d2 |
  91       \time 3/4
  92       g,8\sustainOff d' b'
  93       a, e' cis' |
  94     }
  95
  96     \time 4/4
  97     <b, d'>4.-> <a cis'> <a cis'>8-> <g b'>8 ~ |
  98   } \alternative {
  99     {
 100       \relative c, {
 101         \time 6/8
 102         <g' b'>4. r8 g8 fis |
 103         \time 9/8
 104         e2 r4 d8 r cis |
 105       }
 106     }
 107     {
 108       \relative c, {
 109         \time 6/8
 110         <g' b'>4. r8 g8 fis |
 111       }
 112     }
 113   }
 114 }
 115
 116 stickBeautyRight = \relative c' {
 117   \repeat unfold 3 {
 118     \time 4/4 { R1 | }
 119     \time 3/4 { R2. | }
 120   }
 121   \time 4/4 { R1 |}
 122   \time 6/8 R8*6 |
 123   \time 9/8 R8*9 |
 124
 125   \repeat volta 2 {
 126     \time 7/8 { R8*7 | }
 127     \time 3/4 { R2. | }
 128
 129     \repeat unfold 2 {
 130       \time 4/4 { R1 | }
 131       \time 3/4 { R2. | }
 132     }
 133     \time 4/4 { R1 |}
 134   } \alternative {
 135     { \time 6/8 R8*6 |
 136       \time 9/8 R8*9 | }
 137     { \time 6/8 { R8*6 |} }
 138   }
 139 }
 140
 141
 142 stickBeforeArpeggioLeft = \relative c, {
 143   \time 3/4
 144   e2. ~ | e2. ~ | e2. ~ | e2. |
 145 }
 146
 147 stickArpeggioLeft = \relative c, {
 148   e8\sustainOn b' g' ~ g4. |
 149   e,8 b' g' ~ g4. |
 150   e,4. g'4. | r2. |
 151
 152   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 153   d,8 a' fis' ~ fis4.
 154   d,2. ~ d2.
 155
 156   %% repeat, but with more pathos!
 157   e8\sustainOn b' g' ~ g4. |
 158   e,8 b' g' ~ g4. |
 159   e,8 b' g' ~ g4. |
 160   e,8 b' g' ~ g4. |
 161
 162   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 163   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 164   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 165   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 166 }
 167
 168 stickBeforeArpeggioRight = \relative c' {
 169   \time 3/4
 170   r2. ~ | r2. ~ | r2. ~ | r2. |
 171 }
 172
 173 stickArpeggioRight = \relative c' {
 174   \time 3/4
 175   r4.\sustainOn d,8 b' fis
 176   r4.\sustainOff\sustainOn d8 b' fis
 177   d4 b' fis ~ | fis2.
 178
 179   r4.\sustainOff\sustainOn d8 b' fis
 180   r4.\sustainOff\sustainOn d8 b' fis
 181   r2. r2.
 182
 183   %% repeat, but with more pathos!
 184   r4.\sustainOn d8 b' fis
 185   r4.\sustainOff\sustainOn d8 b' fis
 186   r4.\sustainOff\sustainOn d8 b' fis
 187   r4.\sustainOff\sustainOn d8 b' fis
 188
 189   r4.\sustainOff\sustainOn d8 b' fis
 190   r4.\sustainOff\sustainOn d8 b' fis
 191   r4.\sustainOff\sustainOn d8 b' fis
 192   r4.\sustainOff\sustainOn d8 b' fis
 193 }
 194
 195 stickArpeggioLeftHigher = \relative c, {
 196   \time 3/4
 197   e8\sustainOn b' g' ~ g4.
 198   e,8 b' g' ~ g4.
 199   e,8 b' g' ~ g4.
 200   e,8 b' g' ~ g4.
 201
 202   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 203   d,8 a' fis' ~ fis4.
 204   d,8 a' fis' ~ fis4.
 205   d,8 a' fis' ~ fis4.\sustainOff
 206 }
 207
 208 stickArpeggioRightHigher = \relative c' {
 209   \time 3/4
 210   r4.\sustainOff\sustainOn d,8 b' fis
 211   r4.\sustainOff\sustainOn d8 b' fis
 212   r4.\sustainOff\sustainOn d8 b' fis
 213   r4.\sustainOff\sustainOn d8 b' fis
 214
 215   r4.\sustainOff\sustainOn d8 b' fis
 216   r4.\sustainOff\sustainOn d8 b' fis
 217   r4.\sustainOff\sustainOn d8 b' fis
 218   r4.\sustainOff\sustainOn d8 b' fis\sustainOff
 219 }
 220
 221 stickArpeggioRightLonger = \relative c' {
 222   \time 3/4
 223   r4.\sustainOn d,8 b' fis
 224   r4.\sustainOff\sustainOn d8 b' fis
 225   d4 b' fis ~ | fis2.
 226
 227   r4.\sustainOff\sustainOn d8 b' fis
 228   r4.\sustainOff\sustainOn d8 b' fis
 229   r2. r2. r2.
 230
 231   %% repeat, but with more pathos!
 232   r4.\sustainOn d8 b' fis
 233   r4.\sustainOff\sustainOn d8 b' fis
 234   r4.\sustainOff\sustainOn d8 b' fis
 235   r4.\sustainOff\sustainOn d8 b' fis
 236
 237   r4.\sustainOff\sustainOn d8 b' fis
 238   r4.\sustainOff\sustainOn d8 b' fis
 239   r4.\sustainOff\sustainOn d8 b' fis
 240   r4.\sustainOff\sustainOn d8 b' fis
 241 }
 242
 243 stickArpeggioLeftLonger = \relative c, {
 244   e8\sustainOn b' g' ~ g4. |
 245   e,8 b' g' ~ g4. |
 246   e,4. g'4. | r2. |
 247
 248   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 249   d,8 a' fis' ~ fis4.
 250   d,2. ~ d2. ~ d2.
 251
 252   %% repeat, but with more pathos!
 253   e8\sustainOn b' g' ~ g4. |
 254   e,8 b' g' ~ g4. |
 255   e,8 b' g' ~ g4. |
 256   e,8 b' g' ~ g4. |
 257
 258   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 259   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 260   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 261   d,8\sustainOff\sustainOn a' fis' ~ fis4.
 262 }
 263
 264
 265 stickDramaLeft = \relative c, {
 266   \key b \minor
 267   \time 3/4
 268   \repeat unfold 2 {
 269     <e b' g'>2 r4
 270     <e b' g'>2 r4
 271     <e b' g'>2 r4
 272     <e b' g'>2 r4
 273     <b fis' d'>2 r4
 274     b8 fis' cis' d4. ~ | d2. ~ | d2. |
 275   }
 276   <a e' cis'>2.\arpeggio ~ | <a e' cis'>2. ~ | <a e' cis'>2. ~ | <a e' cis'>2. |
 277   <e b' gis'>2.\arpeggio ~ | <e b' gis'>2. ~ | <e b' gis'>2. ~ | <e b' gis'>2. |
 278 }
 279 stickDramaRight = \relative c' {
 280   \key cis \minor
 281   \time 3/4
 282   \repeat unfold 2 {
 283     cis2 b4 | cis2 b4 | cis2 b4 | cis4 d cis |
 284     b fis2 ~ | fis2. ~ | fis2. ~ | fis2. |
 285   }
 286   cis'2. ~ cis2. ~ cis2. b2 a4
 287   gis2. ~ gis2. ~ gis2. ~ gis2.
 288 }
 289
 290 stickFinalLeft = \relative c, {
 291   \time 5/4
 292   d8\sustainOn a' fis'1
 293   fis,8\sustainOff\sustainOn cis' a'1
 294   e,8\sustainOff\sustainOn b' gis'1
 295   r8\sustainOff r d,1
 296 }
 297
 298 %% TODO
 299 stickFinalRight = \transpose g d \relative c' {
 300   \time 5/4
 301   g'4.\sustainOff fis8 e4 cis16 e fis8 g4 |
 302   fis4. e16 d b4
 303   \tuplet 3/2 { fis8 b d }
 304   fis4 |
 305
 306   e2.   ~ e2   |
 307   d8 cis bes1 |
 308 }
 309
 310 stick = \new PianoStaff <<
 311   \set PianoStaff.midiInstrument = #"clav"
 312   \set PianoStaff.pedalSustainStyle = #'bracket
 313
 314   \new Staff \relative c'  {
 315     \key cis \minor
 316     \clef "treble_8"
 317
 318     %% intro
 319     \time 2/4
 320     \relative c'' { R2 | r4 r8 g ~ | }
 321     \repeat volta 2 \stickA
 322     \alternative {
 323       { r2 | }
 324       { r2 | R2*3 }
 325     }
 326
 327     %% solo
 328     \relative c' {
 329       \time 2/4
 330       r4. fis16 e |
 331       dis cis b ais  e' cis b ais  |
 332       dis e dis cis  b ais b ais |
 333       \time 3/4
 334       gis2 r8 gis8 |
 335       \time 2/4
 336       \tuplet 3/2 { ais8 b c } e4 | a,4. r8 |
 337       c'4 c16 b ais g | fis f c e dis4 | r4. a'8 |
 338
 339       \time 2/4
 340       e'8 r4 a,16 gis |
 341       r8 fis'16 e r8 a,16 gis |
 342       r8 r16 fis'16 e fis e r16 |
 343       \time 3/4
 344       r8 a,16 gis fis e
 345       dis    r \tuplet 3/2 { r8 c, cis } |
 346       \time 2/4
 347       \tuplet 3/2 { g' gis a } \tuplet 3/2 { c cis dis ~ } |
 348       dis4 r8 ais16 b |
 349       c16 r8 g'16 cis,8 r8 |
 350       e,16 gis b e gis b gis e |
 351       b gis e4 f8 |
 352     }
 353
 354     %% spooky
 355     \key fis \minor
 356     \repeat volta 2 {
 357       \time 2/4
 358       <fis, fis'>4. <cis' cis'>8 ~ |
 359       <cis cis'>2 ~ | <cis cis'>2 ~ |
 360       \time 3/4
 361       <cis cis'>4 <d d'>4 <cis cis'>4 |
 362       \time 2/4
 363       <cis cis'>4. <b b'>8 ~ | <b b'>2 ~ | <b b'>2 |
 364       <a a'>4 <gis gis'>4 ~ | <gis gis'>2 |
 365     }
 366
 367     %% Half time feel
 368     \key b \minor
 369     \repeat volta 2 {
 370       \repeat volta 2 \stickHalfTimeFeel
 371       \stickWeird
 372       \stickDance
 373     }
 374
 375     %% Beauty
 376     \stickBeautyRight
 377
 378     %% Arpeggio
 379     \tempo 4 = 170
 380     \key e \minor
 381     \stickBeforeArpeggioRight
 382
 383     \stickArpeggioRight
 384     \key fis \minor
 385     \transpose c d { \stickArpeggioRightHigher }
 386     \stickDramaRight
 387
 388     \stickArpeggioRightLonger
 389     \key fis \minor
 390     \transpose c d { \stickArpeggioRightHigher }
 391     \stickDramaRight
 392   }
 393
 394   %% staff for left hand side
 395   \new Staff \relative c  {
 396     \key cis \minor
 397     \clef "bass_8"
 398
 399     %% intro
 400     \time 2/4 { R2 | R2 |}
 401     %% TODO: empty
 402     \repeat volta 2 { R2*11 | }
 403     \alternative {
 404       { R2 | }
 405       { R2*4 }
 406     }
 407
 408     %% Solo
 409     \repeat unfold 2 {
 410       \time 2/4 R2*3
 411       \time 3/4 R2.
 412       \time 2/4 R2*5
 413     }
 414
 415     %% Spooky
 416     \key fis \minor
 417     \repeat volta 2 {
 418       \time 2/4 R2*3
 419       \time 3/4 R2.
 420       \time 2/4 R2*5
 421     }
 422
 423     %% Half time feel
 424     \key b \minor
 425     \repeat volta 2 {
 426       \repeat volta 2 {
 427         \time 2/4 { R2*3 }
 428         \time 3/4 { R2.  }
 429         \time 2/4 { R2*5 }
 430       }
 431       \stickWeirdLeft
 432       \stickDanceLeft
 433     }
 434
 435     %% Beauty
 436     \stickBeautyLeft
 437
 438     %% Arpeggio
 439     \key e \minor
 440     \stickBeforeArpeggioLeft
 441
 442     \stickArpeggioLeft
 443     \key fis \minor
 444     \transpose c d { \stickArpeggioLeftHigher }
 445     \stickDramaLeft
 446
 447     \stickArpeggioLeftLonger
 448     \key fis \minor
 449     \transpose c d { \stickArpeggioLeftHigher }
 450     \stickDramaLeft
 451   }
 452 >>