some new ideas

This commit is contained in:
Aneurin Barker Snook
2016-10-30 00:07:55 +01:00
parent ace8439ff9
commit 72d538c0bb
3 changed files with 10 additions and 1 deletions
+10 -1
View File
@@ -179,6 +179,15 @@ d'nim $ every' 16 1 ((# vowel "o u") . nim'del) $
whenmod 16 12 (# vowel "[a i]/3") $ whenmod 16 12 (# vowel "[a i]/3") $
(1 ~>) $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble" (1 ~>) $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble"
-- experimental
d9 $ swing' $
-- iter 3 $
-- superimpose (0.75 ~>) $
chop 8 $
n "[0*2 1 [[~ 0]!] 0]/4" # s "bass2"
# speed "[2 1]"
# gain "0.9"
{- {-
let s = gap 32 let s = gap 32
in d'bass $ swing' $ in d'bass $ swing' $
@@ -244,6 +253,6 @@ d'hi $
# speed ((-4+).(*(-1)) <$> density 1.1 sine1) # speed ((-4+).(*(-1)) <$> density 1.1 sine1)
# gain "0.9" # gain "0.9"
msil [d'bass, d'hi] msil [d'bass, d'hi, d9]
hush hush
Binary file not shown.
Binary file not shown.