Livecoding with Tidal

Tau_party.tidal

bps (170/120)

d1 $
stack[
sound "909",
sound "~ bass:1"
]

let pat1 = "{-12 ~ [~ 0] ~ 0*2 [~ 0]}%4"

let pat2 = "{[~ 0] 0 ~ 0*4 [~ 0] -12}%4"

d1 $ stack[
up pat1 |=| sound "909*2",
up pat2 |=| sound "bass:2 bass:1 bass bass:3"
]

d1 $
whenmod 2 1 (jux (iter 4)) $
stack[
up pat1 |=| sound "909*2",
up pat2 |=| sound "bass:2 bass:1 bass bass:3"
]

d1 $
whenmod 2 1 (jux (iter 4)) $
stack [
up pat1 |=| sound "bd ~ bd*2 ~" |+| gain "1.0",
up pat2 |=| sound "[909 909:1]" |+| gain "1.0",
sound (samples "bass*8?" (irand 12)) |+| speed "1.5 1.0 0.5 2.0"
]

d1 $
every 7 (chop 16) $
every 9 (gap 16) $
every 11 (|+| coarse "24 16 32") $
every 13 (|+| accelerate "[2 -2]*3") $
whenmod 2 1 (jux (iter 4)) $
stack [
up pat1 |=| sound "bd ~ bd*2 ~" |+| gain "1.0",
up pat2 |=| sound "[909*4 909:1]" |+| gain "1.0",
sound (samples "bass*8?" (irand 12)) |+| speed "0.75 1.5 2.0"
]

let pat3 = "{0 0*2 [~ 0] [~ 0] 0 0 ~ 0 ~ 0 -12 0*4 ~ [~ 0] [~ 0] ~ 0*2 -12}%4"

let pat4 = "{0 0*2 [~ 0] [~ 0] 0 0 -12 0*4 ~ 0 ~ 0 -12 0*2 ~ [~ 0] [~ 0] ~ 0*2 -12}%4"

let pat5 = "{[~ 0] 0 0 ~ 0 -12 0*2 ~ [~ 0] [~ 0] ~ 0 -12 0*4 ~ [~ 0] [~ 0] ~ 0*2 -12}%4"

let pat6 = "{~ 0 ~ 0 -12 0*4 0 0*2 [~ 0] -12 0*4 ~ 0 ~ 0 -12 0*2 ~ [~ 0] [~ 0] ~ 0*2 -12}%4"

d2 $
every 2 (chop 8) $
every 3 (gap 4) $
every 4 (|+| coarse "24 16 32") $
every 5 (|+| accelerate "[1 -1]*3") $
whenmod 8 4 (jux (iter 4)) $
stack [
up pat3 |=| sound "bd ~ bd*2 sn" |+| gain "1.0",
up pat4 |=| sound "[bass:2]" |+| gain "1.0",
up pat1 |=| sound (samples "bass2*8?" (irand 12)) |+| speed "0.75 1.5 2.0",
up pat2 |=| sound (samples "stomp*2?" (irand 10)) |+| gain "1.5"
]

d2 $
every 4 (chop 16) $
every 6 (gap 8) $
every 8 (|+| coarse "24 16 32") $
every 10 (|+| accelerate "[1 -1]*3") $
every 11 (stut 4 0.5 0.2 ) $
whenmod 8 4 (jux (iter 4)) $
stack [
up pat3 |=| sound "bd ~ bd*2 sn" |+| gain "1.0",
up pat4 |=| sound "[bass:2]" |+| gain "1.0",
sound (samples "bass2*8?" (irand 12)) |+| speed "0.75 1.5 2.0" |+| gain "1.0"
]

d2 $
every 2 (chop 16) $
every 3 (gap 16) $
whenmod 8 4 (jux (iter 4)) $
stack [
up pat3 |=| sound "bd ~ bd*2 sn" |+| gain "1.0",
up pat4 |=| sound "[bass:2]" |+| gain "1.0",
up pat5|=|sound "hc:3" |+| speed "1.0 0.5 1.5",
up pat6 |=|sound "drumtraks:17" |+| speed "1.0 0.5 1.5"
] |+| delay "0.9" |+| delaytime "0.06 0.03" |+| delayfeedback "0.7"

d3 $
every 2 (chop 16) $
every 3 (gap 16) $
every 4 (|+| coarse "24 16 32") $
every 5 (|+| accelerate "[1 -1]*3") $
every 6 (|+| accelerate "[1 -1]*2") $
every 7 (|+| accelerate "[1 -1]*4") $
whenmod 4 3 (jux (iter 4)) $
stack [
every 4 (|+| coarse "24 16 32") $ sound (samples "hit*8?" (irand 12)) |+| speed "0.75 1.0"
]

d3 $
every 5 (chop 8) $
every 4 (gap 16) $
every 3 (|+| coarse "24 16 32") $
every 5 (|+| accelerate "[1 -1]*3") $
every 6 (|+| accelerate "[1 -1]*2") $
every 7 (|+| accelerate "[1 -1]*4") $
whenmod 4 3 (jux (iter 4)) $
stack [
up pat3 |=| sound "bd ~ bd*2 sn" |+| gain "1.0",
up pat4 |=| sound "[bass:2]" |+| gain "1.0",
up pat5 |=| sound (samples "gab?*2" (irand 10)) |+| gain "1.2",
up pat6 |=| sound (samples "hit?" (irand 8)) |+| gain "1.0"
]

d4 $
stack [
sound "gabba*2" |+| gain "1.5"
]

d4 $
stack [
jux (iter 4) $ sound "hc:3*16" |+| speed "1.0 0.5 1.5" |+| gain "1.0",
sound "gabba*2" |+| gain "1.5",
sound "~ [~ gab:1] ~ ~ " |+| gain "1.5",
sound "~ ~ ~ gab:4" |+| gain "1.5"
]

d4 $
every 8 (|+| accelerate "[1 -1]*3") $
whenmod 4 3 (jux (iter 4)) $
stack [
up pat3 |=| sound "bd ~ bd*2 sn" |+| gain "1.0",
up pat4 |=| sound "[bass:2]" |+| gain "1.0",
sound (samples "sitar*4?" (irand 8)) |+| gain "1.0" |+| speed "1.5 1.0 0.5 0.25"
]

d4 $
every 8 (|+| accelerate "[1 -1]*3") $
every 3 (gap 8) $
whenmod 4 3 (jux (iter 4)) $
stack [
sound (samples "pluck*8?" (irand 17)) |+| gain "1.0",
up pat3 |=| sound (samples "tabla*8?" (irand 26)) |+| gain "1.0",
up pat4 |=| sound (samples "tabla2*8?" (irand 42)) |+| gain "1.0"
]


d1 silence

d2 silence

d3 silence

d4 silence

hush