-- LOOP FunkTechno focus
solo 3
do
setcps (110/60/4)
d1
$ whenmod 16 12 (mask "<f!3 [f!3 t]>")
$ fast 4 $ "jazz" # gain 0.9
d2
$ whenmod 16 12 (mask "<f!3 [f t]>")
$ sometimesBy "0!4 0.5!3 0" ( -- Open hat
often (stut 2 0.9 "[s|e|q]") . (# s "ho:1") . (|* gain 0.65))
$ whenmod 8 6 (juxBy 0.5 rev)
$ "hh(<8 <5 3>>,8,<0!6 4!2>)"
# gain (slow 10 $ range 0.8 1.2 sine)
# cut 2
d3
$ whenmod 16 8 (<| "dr*<16 12 8 16>")
$ "d*4 d*<4 8>" # "dr" # gain 0.8
d4
$ whenmod 32 28 (# crush "<8 7 6 5>")
$ whenmod 32 24 (# room "<0.2 0.3 0.4 0.5>")
$ whenmod 32 16 (mask "t <f f t f>")
$ slice 8 "0 1 2 <3!3 7>" $ "fbass:18"
# cut 4 # gain 0.8