hush

setcps 0.5

solo 1
solo 2

d1 -- vents du haut
$ chunk 4 (rev)
$ rarely (rev)
$ every 16 (# crush 6)
$ s "wind*16" # note (run 8)
# legato 2
# gain 0.5

d2 -- le rythme
$ every' 32 31 (# gain 0.6)
$ every' 32 30 (# gain 0)
$ every' 32 16 (fast 2)
$ every 2 (off 0.125 (# gain 0.5))
$ euclid "<4 3>" 4
$ s "house"
# gain 0.9

d3 -- l'esprit
$ whenmod 16 8 (rev)
$ whenmod 64 8 (
  often (off 0 (|+7)) -- octave
)
$ whenmod 64 16 (
  often (off 0 (|+ chooseBy "0.8 0.2" [10,12])) -- + oct && tierce ou quinte
)
$ whenmod 64 32 (
  sometimes (off 0.125 (|+ chooseBy "0.8 0.2" [10,12])) -- + oct && t || q
)
$ off 0 (# note "0 3 0")
$ off 0.125 (|- 0)
$ s "superpiano(<<1 5> 3>,8)"
# velocity (0.2 + (tri / 4))
# sustain 2
# note (choose [0,3,7])

d4 -- drums du mouvement
$ sometimes (# n (choose [1,5,7])) -- 1,2,5,7
$ often (jux rev)
$ rarely (off 0.5 id)
$ sometimes (off 0.25 id)
$ s "<[dr*3 ~] {dr dr dr dr dr ~ ~ ~}>"
# gain 0.9


d5 -- bourrasque
$ every 16 (jux rev) -- echo
$ every 8 (# gain 0.9)
$ s "space:3"
# speed 0.25
# gain 0.7

unsolo 6
unsolo 5
unsolo

d6 -- TODO: Plus d'harmonie
$ whenmod 8 6 (# gain 0.8)
$ sometimes (hurry 2)
$ every 2 rev
$ s "superhammond*8"
# n "0 3 7"
# gain 0.5
# pan 0.8

solo 6