Skip to content

Instantly share code, notes, and snippets.

@kindohm
Created April 25, 2014 05:35
Show Gist options
  • Save kindohm/11278599 to your computer and use it in GitHub Desktop.
Save kindohm/11278599 to your computer and use it in GitHub Desktop.
d1 $ sound "mouth*4"
d1 $ every 3 rev $ every 4 (0.25 <~) $ slow 4 $ striate' 64 (1/40) ( sound "ulmel:1")
|+| speed "[1 1.5 1.25, 0.5]"
d2 $ every 3 (density 2) $ every 2 (density 2) $ sound "mouth*8"
|+| gain "0.6"
d3 $ jux (iter 8) $ sound "bd*2 ~ cp future future*2 ~ bd*4 sn*2"
|+| gain "0.7"
d4 $ stack [ slow 1.5 $ sound "less:1", density 2 $ sound "~ dss", density 2 $ sound "less:2*2 less:2*2 ~ ~"]
|+| speed "[1 2 1 0.8]/4"
d5 $ every 4 (0.25 <~) $ every 3 (0.25 <~) $ sound (samples "peri*4 ~ peri*4 ~" (run 33))
|+| gain "0.8"
|+| cutoff ((*0.3) . (+0.001) <$> slow 3.1 sinewave1)
|+| resonance "0.3"
bps 1.2
d1 silence
d1 $ every 3 rev $ slow 4 $ striate' 64 (1/70) ( sound "alone:7")
|+| gain "1.3"
|+| speed "[1]"
d5 silence
d5 $ whenmod 5 3 (jux (rev)) $ every 3 (0.25 <~) $ every 4 (0.25 <~) $ sound "[~ [~ dsk ~ dsk] [~ dsk dsk dsk] ~]"
|+| gain "0.5"
d6 $ slowspread ($) [density 2, (0.25 <~), (|+| accelerate "1 2"), slow 1, juxcut rev] $ sound "~ jvbass*4 ~ ~"
|+| speed "[1 2 1.5, 4 5]/3"
|+| shape "0.3"
3
d1 silence
d1 $ every 3 (slow 2 . (|+| speed "0.5")) $ every 4 (|+| pan "[1 0]*2") $ sound (samples "amencutup*4 amencutup*4 amencutup*4 amencutup*4" (slow 0.7 $ run 41))
|+| speed "[1 0.8 1 1.2]/4"
d5 silence
d4 silence
d4 $ slowspread ($) [ slow 1, slow 2, (|+| accelerate "1"), (|+| speed "0.8 0.5 2")] $ sound (samples "bmdrums*4 ~ bmdrums*4 bmdrums*2" (run 55))
d1 silence
d1 $ slow 2 $ striate' 32 (1/20) $ sound "bock:1"
|+| gain "1.3"
|+| speed "[1 0.8 1.25 0.5 0.5]/5"
d7 $ sound "[dsk:1*2 ~] dss:1 ~ dss:1"
|+| shape "0.2"
d6 silence
d6 $ striate' 32 (1/40) ( sound "dsfx:7")
|+| shape "0.1"
|+| speed "[1 2 1.5 1.25]/4"
d4 silence
bps 1.3
d2 $ every 3 (|+| speed "-1") $ sound (samples "feel*8" (run 22))
|+| speed "1 0.8"
|+| shape "0.2"
d4 $ slow 4 $ sound "laz*4 laz*4 laz*4 [laz laz ~ [~ laz]]"
|+| speed "[0.2 0.1 -0.5]/2"
|+| cut "1"
|+| shape "0.5"
d1 silence
d2 silence
d3 silence
d5 silence
d6 silence
d7 silence
hush
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment