hush

setcps 0.5

-- Bruit -> clap : tt tt tt tt tt cp
d1 $ degradeBy "0 0.25" $ "noise(5,8,2) cp" # note "[0 .. 7 0]" # gain "1 0.8"

-- Glitchs chaloupés
d2 $ s "glitch(5,8)" # n (irand 8) # gain 0.8

-- Arpèges électriques
d3 $ fast 2 $ note "6 <<2 9> 4>"
  # s "flick"
  # gain 0.25

-- Arpèges mandoline
d4 $ jux rev $ fast 2
$ n (off 0.125 (+|12) $ off (choose [0.125,0.25]) (|+7) "6*2 <<2 9> 4>")
  # s "supermandolin"
  # legato 4
  # gain 0.6

-- Voix binaire
d6 $ degradeBy (rand / 4) $ s "numbers" # n (irand 2) # rev 0.85 # shape 0.7
# gain 0.5

-- Hardcore noise kick
d7 $ fast 4 $ s "<bd if if if*2>" # gain (choose [0.3,0.6])

hush
