setcps (100/60/4)
do
d3 $ silence
d2 $ fast 4 $ "drum:8"
# gain 0.5
-- TODO CLEANUP BELOW
d10 $ fast 8 $ note ((cF (0) "1") * 26) # "superpiano"
# velocity 0.7
d1 $ sound "jazz*4"
-- # djf (cF default CC_Number)
-- # djf (cF 0.5 "14")
# djf ("^1")
-- # gain 0.6
# speed (cF 12 "0")
d1 $ s "arpy*4" # gain (cF 1 "1")
d1 $ sound "amencutup" + n (run (segment 1 $ range 1 16 $ cF 1 "14" ))
do
d1 $ "jazz*1" # gain 0.5
d4 $ "hh*<16!3 8>" # pan (range 0.1 0.8 sine) # gain 0.6
d2 $ often (ply 2) $ "~ snare" # gain 0.6
d3 $ note (cF (-12) "3") # sound "superpiano" # velocity 0.5
d1 $ sound "amencutup" + n (run (segment 1 $ range 1 16 $ cF 0 "32" ))