04.tidal

04.hs

bps (220/120)

-- drums
r1 $ stack [
rep 6 $ midinote "0/2",
(0.25 <~) $ rep 8 $ midinote "3/3",
slow 2 $ (0.25 ~>) $ rep 11 $ midinote "1/4",
foldEvery [2,3,4] (0.25 ~>) $ midinote "2([5 3 7]/3,8)" ]

-- synth
m $ whenmod 16 12 (stut' 1 (0.125) (|+| note "12")) $
whenmod 20 14 (stut' 1 (0.125) (|+| note "12")) $
whenmod 12 8 ((|=| pitchmod (scale 0.01 0.99 $ slow 12 tri1))) $
(|+| note "[-12 0 12 0 -12 -24]/48") $
(|=| xmod (scale 0.01 0.99 $ slow 9 tri1)) $
(|=| voicedepth (scale 0.01 0.99 $ slow 10 tri1)) $
(|=| release (scale 0.2 0.55 $ slow 11 tri1)) $
(|=| egrelease (scale 0.2 0.55 $ slow 8 tri1)) $
(|=| decay (scale 0.3 0.7 $ slow 8.783 tri1)) $
(|=| egdecay (scale 0.2 0.9 $ slow 9.683 tri1)) $
(|=| shape1 (scale 0.01 0.9 $ slow 17 tri1)) $
(|=| shape2 (scale 0.01 0.9 $ slow 18 tri1)) $
(|=| lfoint (scale 0.01 0.99 $ slow 19 tri1)) $
(|=| lfotarget (scale 0.55 0.99 $ slow 20 tri1)) $
(|=| oct2 (scale 0.33 0.99 $ slow 22 tri1)) $
rep 11 $ note "-7/4"
|=| pitchmod "0.501"

r1 silence
m silence