|
@@ -262,15 +262,14 @@ d7 $
|
|
|
# speed "[-3 -2]"
|
|
|
# gain "0.9"
|
|
|
|
|
|
-{-
|
|
|
d7 $
|
|
|
- within (0, 0.75) (density (5%3) . sometimes (0.5 <~)) $
|
|
|
+ whenmod 5 2 (density (5%3)) $
|
|
|
whenmod 16 8 (0.5 ~>) $
|
|
|
slow 8 $
|
|
|
slowspread ($) [gap 16, striate 8] $
|
|
|
n "[0 1]/2" # s "nimble"
|
|
|
# speed "[-3 -2]"
|
|
|
--}
|
|
|
+ # gain "0.9"
|
|
|
|
|
|
d1 $ stack [
|
|
|
n "[1, 0*4 [~ 0*2] [~ 0/2 0 ~] ~]/4" # s "drum",
|