From f2f1bf647002bc188bd571e17d52c43ae32f15b4 Mon Sep 17 00:00:00 2001 From: Leo Coogan Date: Sun, 28 Nov 2021 18:56:18 -0500 Subject: [PATCH] Improved readability --- 0.tidal | 24 +++++++++++++++--------- 1 file changed, 15 insertions(+), 9 deletions(-) diff --git a/0.tidal b/0.tidal index 85c6898..5a6d416 100644 --- a/0.tidal +++ b/0.tidal @@ -1,31 +1,32 @@ -- Coogan, Leonard : Untitled -- First "song" with Tidal/SuperCollider! --- First pattern, respectively - +-- 808 cowbell pattern d1 $ n (slow 2 $ fmap (*7) $ run 8) # s "808" # decay "[1 0.2]/4" # voice "[0.5 0]/8" # speed (sine + 0.8) -d1 $ s "hush" - +-- Chopped high-hats d2 $ chop "<32 128 32 16>" $ s "[~ hh]*8" +-- Kick d3 $ jux rev $ chop "<32 64 16>" $ s "[bd:4 bd:3]*2" # gain "0.95" +-- High tom d4 $ chop 16 $ s "[ht]" -- # gain (sine + 1.0) +-- Bassline d5 $ jux (rev) $ chunk 4 (fast 2 . (|- n 12)) @@ -40,29 +41,34 @@ d5 # sustain 0.5 # legato 2 - +-- Handclaps d6 -- $ jux (rev . (|*| speed 2)) $ every 3 (rev . chop 8) $ s "cp:1 cp:2" -- $ s "cp:1 cp:2(3,8, <0 2 3>)" -- # gain (sine + 0.8) + +-- Jazz full xfade "jz" $ s "jazz*8" # n (run 12) -- switch to 8 -xfade "jz" $ s "hush" +xfade "jz" $ s "hush" -- silencio! + +-- Short awful synth p "lead" $ s "psin" # n (sine + 10) # gain 0.7 + # octave 2 -p "lead" $ s "hush" +p "lead" $ s "hush" -- okei, now shut it up + +-- Ambient synth d7 $ n (arp "" "") # s "pad invaders pad pad" # octave 2 -- # gain "0.8" # bpf (sine + 150) # sustain "<0.3 0.5>" - -d7 $ s "hush"