Archived
reset scratch file for how it should sound near the start
This commit is contained in:
+12
-12
@@ -27,34 +27,34 @@ d'drum silence
|
||||
|
||||
let --dp = n "1/4"
|
||||
--dp = n "[1*2, 0*8]/8"
|
||||
--dp = n "[1*2, 0 0 0 [0 ~! 0] ! 0 [0 0/4] 0]/8"
|
||||
dp = n "[1, 0*2 [~ 0] ! ~]/4"
|
||||
dp = n "[1*2, 0 0 0 [0 ~! 0] ! 0 [0 0/4] 0]/8"
|
||||
--dp = n "[1, 0*2 [~ 0] ! ~]/4"
|
||||
{--}
|
||||
kp = n "[~ [0 2]/2]"
|
||||
--kp = n "[[~ 0] [[2!! ~]/4 0]]/2"
|
||||
{--}
|
||||
--sp = n ""
|
||||
sp = n ""
|
||||
--sp = 4 ~> n "[~ 0 [~ 0/2 ~!] 0]/4"
|
||||
sp = 4 ~> n "[~ [0 ~ ~ 0/2] ~ 0]/4"
|
||||
--sp = 4 ~> n "[~ [0 ~ ~ 0/2] ~ 0]/4"
|
||||
{--}
|
||||
ste = id -- . mt 16 16
|
||||
de = id
|
||||
. (whenmod 9 5 . whenmod 7 4) (density 2 . rev) {- 9 5? -}
|
||||
-- . (whenmod 9 5 . whenmod 7 4) (density 2 . rev) {- 9 5? -}
|
||||
-- . superimpose (0.25 ~>)
|
||||
ke = id
|
||||
-- . every' 16 8 (const $ s "kit:3")
|
||||
-- . whenmod 3 2 (density 2)
|
||||
-- . (whenmod 11 5 . within (0.5, 1)) (density 2)
|
||||
se = id
|
||||
. within (0.1, 0.4) (# nudge "0.05") . within (0.6, 0.9) (# nudge "0.05")
|
||||
--{-
|
||||
-- . within (0.1, 0.4) (# nudge "0.05") . within (0.6, 0.9) (# nudge "0.05")
|
||||
{-
|
||||
. whenmod 7 6 (slowspread ($) [
|
||||
density 8 . rev . slow 4,
|
||||
(0.25 <~),
|
||||
(0.25 ~>)
|
||||
])
|
||||
--}
|
||||
--{-
|
||||
{-
|
||||
. whenmod 5 3 (
|
||||
superimpose (
|
||||
within (0, 0.5) ((# gain "0.6") . (# n (irand 3)) . (# s "tom")) .
|
||||
@@ -75,7 +75,7 @@ icarus
|
||||
d'wax silence
|
||||
|
||||
d'wax $
|
||||
every' 2 2 (within (0, 0.75) (iter 16)) $
|
||||
-- every' 2 2 (within (0, 0.75) (iter 16)) $
|
||||
slow 16 . striate 256 $ s "icarus"
|
||||
|
||||
d'wax $ retrig $ s "icarus:1/20"
|
||||
@@ -97,7 +97,7 @@ let ns = slow 16 . striate 256
|
||||
-- . nudge "0"
|
||||
)
|
||||
--}
|
||||
. (0.5 ~>)
|
||||
-- . (0.5 ~>)
|
||||
in d'nim $
|
||||
ne $ ns $ n "[0 1]/2" # s "nimble"
|
||||
|
||||
@@ -109,10 +109,10 @@ d'bass silence
|
||||
let be = id
|
||||
-- . (# speed "[1 1.2]")
|
||||
-- . (0.5 ~>)
|
||||
. (1.3 ~>)
|
||||
-- . (1.3 ~>)
|
||||
bc = id
|
||||
-- . striate 16
|
||||
. gap 32
|
||||
-- . gap 32
|
||||
bs = id
|
||||
. slow 8
|
||||
-- . mt 16 2
|
||||
|
||||
Reference in New Issue
Block a user