-- Noisy Snake Hats + Snare -- Illustration [Tom Delanoue](https://unsplash.com/photos/qpaF332Uqj0) do -- setcps 0.5625 resetCycles d1 $ someCyclesBy (slow 16 $ "<0 0.25>") (off "e" id) $ "[jazz,cpu]" # gain (slow 16 $ range 0.8 0.4 isaw) # lpf 2000 # release 0.2 # pan 0.45 # dry 0.9 d2 -- Snares / claps: accel 16/8, djf/64 $ whenmod 16 8 (fast ("2 <4!8 <8!8 [4 . 8 [2|4]]!8>>")) $ superimpose ((# "clap:2") . (|* gain 0.7)) $ "~ snare" # n "[1,2]" -- # gain (slow 32 $ range 0.8 0.5 isaw) # pan 0.3 # djf (slow 64 (cosine + perlin/4)) d3 -- Hats snake-ish $ (|+ pan (slow 10 $ range 0 0.25 saw)) $ juxBy 0.2 (rev . (|* gain 0.85)) $ fast 2 -- $ sometimesBy "0 1" (off "e" id) $ "h . h ~ <h!3 h?> ~ ~ <~!3 h?>" # "808oh" # n "<0 3>" # gain (slow 32 $ range 0.6 0.4 (sine + isaw/4)) d10 -- DELICI0US N0153 $ whenmod 64 48 (juxBy 0.25 (# crush 5)) $ whenmod 8 6 (rarely (loopAt 2)) $ "~ ~ ~ <n!3 [~ n] n [~ n] n [~ n]>" # "psr" # n "<1!8 10!4 11!4 12!7 2>" -- 1 10 11 12 rare 2 # lpf (slow 2 $ range 2000 1000 perlin) # pan (slow 4 $ range 0.2 0.9 perlin) # gain (slow 32 $ range 0.25 0.45 (saw + perlin)) # cut 10