do
-- resetCycles
let whenDJF = (whenmod 32 20)
let g = (whenDJF (# djfbus 1 (slow 16 $ range 0.5 0.12 saw)))
-- let g = id
setcps (140/60/4)
d1 $ g
$ mask "<f!2 t!30>"
$ "k . ~ <~ k!31> ~ ~"
# "[jazz,kick:5]"
# gain 0.9
d2 $ g
$ mask "<f!8 t!60>"
$ whenmod 64 32 (
|* gain (slow 32 $ range 0.4 1.1 saw)
)
$ fast 2 $ "~ snare:8"
d3 $ fast "1 1 <1!3 4> <1 0.5>" $ "hh*16"
# gain (slow 32 $ range 0.65 0.95 sine)
# pan 0.3
d4 $ g
-- $ mask "<f!32 t!32>"
$ mask "t!3 <t!3 [f <f t>]>"
$ chop 16 $ loopAt 2 $ "break:0" # cut 4 # pan 0.8
d5
$ slice 4 0
$ "blues_elmore:7"
# cut 5
# pan 0.3
# gain 0.8
# room 0.5