do
setcps (100/60/4)
let g = whenmod 32 24 (# djfbus 1 (slow 8 $ range 0.5 0.1 saw))
d1 $ g
$ fix (# att 0) "909"
$ "k*<2!16 1!16> . <k*2!16 <k k(<3 3 5 3 3 3 5 5>,8)>!16>"
# "[jazz,909]"
# gain 1.2
d2 $ g $ "~ cp" # gain 0.8 # lpf 2000
d3 $ g
$ note (scale "aeolian" ("<c e f g>" + arp "up" "c4'min'4"))
# "distortedGuitar"
d4 $ g
$ slice 4 ("0 1 2 <0 1 2 3>")
$ "break:0"
# cut 4
# gain 0.8
d5
$ whenmod 32 16 (off 0.5 ((# cut 52) . (# crush 5)))
$ superimpose ((# cut 51) . (ply 4) . (|+ note 12) . (# pan 0.8))
$ note (scale "aeolian" ("<0 [3@3 <2!3 4>]>")
- 12)
# "bassWarsaw" # gain 0.6
# room 0.4
# pan 0.2
# sz 0.8