Algorave

Still Miss U (Live Coded Edit) - DJ_Dave, Kitty

impulse [02_10_23]


d8 $ every 5 (density 1.5) $ sound "bass3:2*2? [bass3:8 bass3:5 bass3:8]?"
   |+| gain "1.2"
   |+| shape "0.3"
   |+| speed (every 3 ((*2) &lt;$&gt;) $ every 2 ((/2) &lt;$&gt;) "1.44")

d10 $ every 3 rev $ slow 4 $ (spread' striate "16 32 12" $ sound "[pad:5]")
   |+| speed (superimpose ((*1.5) &lt;$&gt;) $ (superimpose ((*1.01) &lt;$&gt;)) $ ((+1) . (*0.01)) &lt;$&gt; sine1)

d1 $ (every 2 degrade $ stut 2 0.5 (1%3) $ sound "bd [bd bd*4?]")
   |+| speed "[1,1.01,2 3]/2"
   |+| accelerate "-1"

d2 $ slow 2 $ sound "[[bd bd?]*4, future*2]"
   |+| accelerate "2"
   |+| speed "1"
   |+| gain "1.4"
   |+| shape "0.9"

d3 $ jux (iter 4) $ every 2 (slow 2) $ slow 4 $ striate 16 $ sound "[breaks125 breaks165]"
   |+| gain "1.6"
   |+| speed "2"
   |+| accelerate (((*(-16))) &lt;$&gt; (slow 8 $ sine))

d4 $ superimpose (iter 8) $ sound "drum drum:1?"
   |+| shape "0.9"
   |+| gain "1.1"
   |+| accelerate "-1.5"
   |+| speed "1.1"

d6 $ every 3 rev $ slow 4 $ (striate 64 $ sound "atlast")
   |+| shape "0.97"
   |+| speed (superimpose ((*1.5) &lt;$&gt;) $ (superimpose ((*) &lt;$&gt; (((+1) . (* 0.01)) &lt;$&gt; (slow 4 $ saw1)) &lt;*&gt;)) $ ((+1) . (*0.01)) &lt;$&gt; (slow 3 sine1))
   |+| gain "0.75"

d7 $ every 3 rev $ slow 4 $ (striate 64 $ sound "[atlast:1 ! atlast:0 ! atlast:2 ! atlast:2 !]/8")
   |+| shape "0.97"
   |+| speed (superimpose ((*1.5) &lt;$&gt;) $ (superimpose ((*1.01) &lt;$&gt;)) $ ((+1) . (*0.01)) &lt;$&gt; sine1)
   |+| gain "0.9"

d9 $ jux (iter 8) $ striate 16 $ sound "breaks125"
   |+| gain "1.7"


At last

Fall Into Your Spell (Algorave)

Live coding video: https://www.youtube.com/watch?v=sNj-I2pZwX8
Code and samples: https://github.com/lil-data/vroomvroom

LD 🖤

```
do
  let t = "cxvv"
  let build = loopAt 2 $ n "0" # s "cutcxvv"
      drive = loopAt 1 $ n "1" # s "cutcxvv"   
  bpm 180
  let mx = [0,0,0,0]
  p (t++"vx")
    -- . fa 2
    $ drive # glo' (mx!!0) 1 0 # shape 0.4
    -- # ac (-1)
  p (t++"syn") . jux (# ac 0.03)
    $ build # glo' (mx!!1) 1 1
  p (t++"pc") . fa 1
    $ stack [
       -- struct "[t ~] [~ t _ [t? ~]]" $ n 2 # s "bddnb",
       -- jux (# ac 0.2) . struct "[~ t]*4" $ n 20 # s "ch2hh" # shape 0.5,
       -- fa "<1 [1 [1 4]]>" . struct "[~ t]*2" $ n 13 # s "pcmsn",
       -- struct "t*4" $ n 13 # s "pcmcp"
      ] # glo' (mx!!2) 1 2
  p (t++"bs")
    -- . struct "[t ~] [~ t _ [t? ~]]"
    . struct "t*4"
    $ n (sl 4 $ "[0 2]" + 2)
    -- $ n (sl 16 $ "[0 2]!2 [0 1 4 [3 2 1]] [2 2 2 [3 2 1]*2]" + 2)
    # s "cutcxvv" # glo' (mx!!3) 1 3 # rvb "0.3:0.3"
```

Fall Into Your Spell (Algorave)

Switch Angel