do d1 $ sometimesBy "0 0.01!3 0 0.05!3" (0.125 ~>) $ whenmod 8 6 (degradeBy "0 . 0.9 1") $ ply 4 $ s "kick:5" # gain 0.5 # release 0.6 # lpf (slow 2 $ range 20 5000 perlin) d2 -- Snares noise etire $ whenmod 8 7 rev $ fast 2 $ s "~ s*<1!3 <2 [2 4]>>" # s "glitch:7" # speed (range 0.5 1 perlin) # lpf 4000 # gain 0.7 # pan (slow 4 $ "<0.3 0.25> <0.3 0.35>") d3 $ every 5 (sometimes degrade) $ every 4 (often (fast 2)) $ every 3 (sometimes (ply 2)) $ sometimesBy "0 0.5" ((# s "hc:1") . (|- gain 0.1)) $ s "hh*8" # gain 0.75 # cut 3 d4 -- MULTIBASSE $ superimpose ( -- bassline (+| note ("[0 7](<3!3 4>,8)" - 24)) . (|* gain 1.3) . (|- pan 0.1) . (# voice 0.1) -- (# crush (slow 8 $ range 5 8 perlin)) ) $ superimpose ( -- folie aigue electrique -- (stut 8 0.5 (1/16)) . ply "<2 4!2 8!2 16!4 32!8>" . (|+ note "<c6'maj f6'min c6'min f6'maj>") . (|* gain 0.5) ) $ note ("<0 2 0 5 8 5 2 0>/4") |- note 12 # s "supersquare" # voice (slow 16 $ range 0.05 2 perlin) # gain 0.45 # pan 0.6