Today's Tidal script
-- Evaluate the first block of code first with SHIFT+ENTER let setbpm x = setcps (x/60/4) _add :: Time -> Pattern a -> Pattern a -> Pattern a _add t value pat = slow (pure $ 1+t) $ timeCat [(shift,pat),(1-shift, value)] where shift = 1 / (t + 1) add :: Pattern Time -> Pattern a -> Pattern a -> Pattern a add pt x y = innerJoin $ fmap (\t -> _add t x y) pt -- Then evaluate this line to set BPM, try different speeds! setbpm 160 -- Change the values here to experiment with the various effects all $ timeLoop 4 . (rotL 4) -- Evluate this line on it's own all $ id -- Evaluate the block with CTRL+ENTER d1 $ while "t(4,16)" (|+ krush 1) $ while "[0 | 1]*16" (superimpose (plyWith 4 (|* speed 1.25) . slow 2)) $ layer [id ,\x -> degradeBy (segment 16 perlin) $ slow 2 $ x # speed 0.75 # shape 0.1 ,\x -> add "[0.5 | 0.25]*4" (s "jungbass:1" # speed 0.8 # shape 0.2 # krush 2) $ x # speed "[2 | -2]*8" ] $ s "[drum drum:1 [~ drum] drum:1, drum:3*[[8 | 16]*4]]" # krush 2 -- SHIFT+ENTER the next line to silence all audio hush
Tidal Cycles is back as some people were asking about it and today’s example makes use of some cool syntax, that I am going to walk you through in a future post. Mainly because I need some time to break this example down and to then share some of the secrets behind it.
I'm going back to using NFT.UP to store my demo files on NFT.storage, it's a nice free way to share files of all kinds, audio, image, PDF and maybe even Ableton projects etc. <audio controls> <source src="https://nftstorage.link/ipfs/bafybeib74ezqpy53c3sbye2zld32k3f7tsnwpbzxozko7nlcad2d7flnza" type="audio/mpeg"> Your browser does not support the audio element. </audio>
Finding my work elsewhere online
I am on Soundcloud and a lot of my work, if not nearly all of it, can be found on Soundcloud.I do have one track at the moment on Spotify and I will grow this. I've got many more sounds stored on IPFS, which I share through blog posts like this (and this other one).