do setcps (80/60/4) let prog = "<d'nine'4!4 g'nine'4!4>" let whenBreak pat = whenmod 32 24 pat let doBreak = (whenBreak (# djfbus 1 (range 0.5 0.1 saw))) let g = doBreak d1 $ g $ "k*<1!4 2 1 1 2> . k(<5 <3 5>>,8,<0!3 1>)" # "jazz" # room 0.8 # sz 2.4 # lpf 5000 # dry 1 # voice 0.07 # gain 0.8 d2 $ g -- Snares $ "~ . s(<1 1 2 4>,8,<0 <1 3>>)" # "snare" # n "[42,35]" # gain 0.65 d3 $ sometimesBy "0 <0!4 1 1 0.25 1>" (ply "<[2|4] 4>") $ slice 8 (run 4 + "<0!3 3 0 0 3 3>") $ "fbreak80:9" # pan 0.6 # cut 3 # gain 0.55 d4 $ note ("[0,[0 . 0(<3!3 [5 <5 8>]>,8)]]" + prog - 24 ) # "supersaw" # pan 0.2 # voice (slow 8 $ range 0.01 0.1 saw) # gain 0.3 d5 $ superimpose ( (+ note 12) . struct "t([<<12 16> 12!3 4 12!3> <6!3 <8 16>>],16)" . (|+ pan 0.2) ) $ arpeggiate $ note (prog - 24 ) # "FMRhodes1" # pan 0.4 # gain 0.65