commit 18a52506e4ce7b1d9f83abe5c0e6b2fc1c7f26b6
Author: Aneurin Barker Snook <a@aneur.in>
Date:   Wed Mar 16 08:54:35 2016 +0000

    wip ditty for renick's mix

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..e43b0f9
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1 @@
+.DS_Store
diff --git a/for-mix.tidal b/for-mix.tidal
new file mode 100644
index 0000000..6309c27
--- /dev/null
+++ b/for-mix.tidal
@@ -0,0 +1,302 @@
+cps (151/60)
+
+d1 $ sound "[k {k, sn}]/2"
+d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hhc]/2") $ sound "[k {k, sn}]/2"
+
+d1 silence
+d2 silence
+
+d2 $ (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+
+d2 $ (within (0, 0.125) $ density 2 . chop 4) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+
+d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hho]/2") $ sound "[k {k, sn}]/2"
+
+d2 silence
+
+d1 $ (overlay $ sound "[[~ hhc ~ hhc] [~ hhp]]/2") $ sound "[k {k, sn}]/2"
+
+d2 $ (within (0, 0.125) $ density 2 . chop 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+
+d2 $ (within (0, 0.125) $ density 2 . chop 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+
+d3 $ whenmod 16 15 (density 3) $ smash 16 [0.5, 0.25] $ sound "hhp hho"
+  |+| gain "0.7"
+  |+| vowel "a"
+
+d3 $ whenmod 16 15 (density 3) $ smash 16 [0.25, 0.5] $ sound "hhp hho"
+  |+| gain "0.7"
+  |+| vowel "a"
+
+d2 $ (within (0, 0.125) $ density 2 . chop 4) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+  |+| shape "0.3"
+
+d2 $ (within (0, 0.125) $ density 2 . chop 4) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+  |+| shape "0.3"
+  |+| vowel "[u i o]/2"
+
+
+d2 $ --(within (0, 0.125) $ density 2 . chop 4) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+  |+| shape "0.3"
+  |+| vowel "[u i o]/2"
+
+d2 $ every 4 (stut 4 0.8 0.5) $
+  (within (0, 0.125) $ density 2 . gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| speed ((+1).(/2) <$> density 3.1 saw1)
+  |+| shape "0.3"
+  |+| vowel "[u i o]/2"
+
+d2 silence
+
+d3 $ whenmod 16 15 (density 3)
+  $ smash 16 [0.25, 0.5]
+  $ sound "hhp hho"
+  |+| gain "0.7"
+  |+| vowel "a"
+
+cps (100/60)
+cps (150/60)
+
+d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+
+d3 $ whenmod 16 15 (density 3)
+  $ smash 16 [0.25, 0.5]
+  $ sound "hhp hho"
+  |+| gain "0.7"
+  |+| vowel "a"
+
+d3 $ whenmod 16 15 (density 3)
+  $ smash 16 [0.5, 0.25]
+  $ sound "hhp hho"
+  |+| gain "0.7"
+  |+| vowel "a"
+
+d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+
+d2 $
+--  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+
+d2 silence
+
+d4 $
+  whenmod 5 3 rev $
+  smash 32 [4,2,0.5] $ sound "[eg*3]/4"
+  |+| vowel "e u"
+
+hush
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+--------- above sux
+
+cps (151/60)
+
+d1 $ sound "[k {k, sn}]/2"
+
+d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hhc]/2") $ sound "[k {k, sn}]/2"
+d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hho]/2") $ sound "[k {k, sn}]/2"
+
+d3 $ whenmod 16 15 (density 3) $ smash 16 [0.25, 0.5] $ sound "hhp hho"
+  |+| gain "0.7"
+  |+| vowel "a"
+
+d2 $ sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5"
+
+d2 $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+
+d2 $
+  whenmod 2 1 (density 2) $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+
+-- oh shit dog
+d2 $
+  (within (0.5, 1.5) $ rev) $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+
+d2 $
+  (within (0.5, 1.5) $ rev) $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+
+d3 $
+  whenmod 16 15 (density 3) $
+  smash 16 [0.25, 0.5] $
+  sound "hhp hho"
+  |+| gain "0.6"
+  |+| vowel "a"
+
+cps (100/60)
+
+d1 $ --(overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+
+d3 silence
+
+d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+
+d2 $
+  (within (0.5, 1.5) $ rev) $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+
+d2 $
+  (within (0.5, 1.5) $ rev) $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| shape ((/3) <$> slow 16 saw1)
+  |+| vowel "[i o]*2"
+
+d3 $
+  whenmod 16 15 (density 3) $
+  smash 16 [0.25, 0.5] $
+  sound "hhp hho"
+  |+| gain "0.6"
+  |+| vowel "a"
+  |+| shape ((/2) <$> slow 8 saw1)
+
+d4 $
+  whenmod 5 3 rev $
+  smash 32 [4,2,0.5] $ sound "[eg*2]/4"
+  |+| gain "0.7"
+
+d1 $ stack [
+  sound "[[~ hhc ~ hho] [~ hhp]]/2",
+  whenmod 6 5 (density 2) $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+]
+
+d4 $
+--  gap 4 $ -- fuck about with gap a bit to elongate shit
+  whenmod 5 3 rev $
+  smash 32 [4,2,0.5] $ sound "[eg*2]/4"
+  |+| gain "0.7"
+
+-- i apologise for my limited vocabulary
+
+d4 $
+  (every 2 $ stut 4 0.8 0.5) $
+  whenmod 5 3 rev $
+  smash 32 [4,2,0.5] $ sound "[eg*2]/4"
+  |+| gain "0.7"
+
+d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+
+d1 $ sound "[[k ~ ~ k] {k*2, sn}]/2"
+d4 silence
+d2 silence
+d3 silence
+
+d4 $
+  density 2 $
+  (every 2 $ stut 4 0.8 0.5) $
+  whenmod 5 3 rev $
+  smash 32 [4,2,0.5] $
+  sound (samples "[eg*2]/4" (slow 4 $ run 5))
+  |+| gain "0.7"
+  |+| vowel "u"
+
+d1 $ stack [
+  whenmod 5 4 rev $
+  sound "[hhc hho]*2"
+  |+| gain "[0.8 1]/2",
+  whenmod 6 5 (density 2) $
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+]
+
+d2 $
+  (within (0.5, 1.5) $ rev) $
+  (within (0, 0.5) $ gap 16) $
+  (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
+  |+| shape ((/3) <$> slow 16 saw1)
+  |+| vowel "[i o]*2"
+
+d3 silence
+
+d1 $ sound "cy/4"
+
+d1 $ (overlay $ sound "cy/4") $ sound "k"
+
+d3 $
+  whenmod 16 15 (density 3) $
+  smash 16 [0.25, 0.5] $
+--  smash 16 [0.5, 0.25] $
+  sound "hhp hho"
+  |+| gain "0.6"
+  |+| vowel "a"
+  |+| shape ((/2) <$> slow 8 saw1)
+
+d1 $ stack [
+  sound "cy/4",
+  sound "[[k ~ ~ k] {k*2, sn}]/2"
+  ]
+
+d4 silence
+
+cps (133/60)
+cps (155/60)
+
+d1 $
+  (overlay $ (1 ~>) $ sound "cy/8") $
+--  sound "[k {k, sn}]/2"
+  sound "[k [sn k] [~ k] sn]/4"
+
+d2 $
+  whenmod 16 15 (density 3) $
+  smash 16 [0.25, 0.5] $
+--  smash 16 [0.5, 0.25] $
+  sound "hhp hho"
+  |+| gain "0.6"
+  |+| vowel (slow 3.1 "a u i")
+  |+| shape ((/2) <$> slow 7.5 saw1)
+
+
+d2 $ 
+
+hush
+
+-- thanks for sticking around charlie ya ledge
+-- 
+  |+| shape ((/2) <$> slow 7.5 saw1)
diff --git a/for-mix2.tidal b/for-mix2.tidal
new file mode 100644
index 0000000..5258738
--- /dev/null
+++ b/for-mix2.tidal
@@ -0,0 +1,75 @@
+-- original ravey
+
+cps (155/60)
+
+d1 $ stack [
+  (1 ~>) $ sound "cy/8",
+  s "[k {k, sn}]/2"
+  ]
+
+d2 $
+  whenmod 16 15 (density 3) $
+  smash 16 [0.25, 0.5] $
+  s "hh hh:2"
+  # gain "0.6"
+
+d3 $
+  (within (0, 0.5) $ gap 16) $  
+  (s $ samples "[[~ wb ~ ~] wb]/2" (slow 5 $ irand 5))
+  # shape ((/3) <$> slow 16 saw1)
+  # vowel "[i o]*2"
+
+d4 $
+  (0.5 <~) $
+  slowspread density [1,2,0.5,2] $
+  chop 32 $ s "eg:4/2"
+  # gain "0.8"
+  # speed ((+1).(/2) <$> slow 1.88 saw1)
+
+mapM_ ($ silence) [d3,d4]
+hush
+
+d1 $ stack [
+  (1 ~>) $ sound "cy/8",
+  whenmod 16 14 (trunc 0.4) $
+  sound "[k {k, sn}]/2"
+  ]
+
+-- slower bit
+
+cps (100/60)
+
+d1 $ stack [
+  (1 ~>) $ sound "cy/8",
+--  whenmod 16 14 (trunc 0.4) $
+  whenmod 8 7 (overlay $ (0.32 ~>) $ s "k*2") $
+  s "[k sn]/2"
+  ]
+
+d2 $
+  iter 4 $
+  whenmod 16 15 (density 3) $
+  smash 16 [0.25, 0.5] $
+  every 3 (append $ s "hh:1 hh") $
+  s "hh hh:2"
+  # gain "0.6"
+
+d3 $
+  every 7 (0.25 ~>) $
+  (within (0, 0.5) $ gap 16) $
+  every 2 (0.07 ~>) $
+  (s $ samples "[[~ wb ~ ~] wb]/2" (slow 5 $ irand 5))
+  # shape ((/3) <$> slow 16 saw1)
+  # vowel "[i o]*2"
+  # speed "0.8"
+
+d4 $
+--  stut 4 0.6 1.25 $
+  (0.5 <~) $
+  slowspread density [1,2,0.5,2] $
+  chop 32 $ s "eg/2"
+  # gain "0.8"
+  # speed ((+1).(/2) <$> slow 1.88 saw1)
+  # cut "1"
+
+hush
diff --git a/samples/cy/DnBCymbalA-01.wav b/samples/cy/DnBCymbalA-01.wav
new file mode 100755
index 0000000..6fb8d48
Binary files /dev/null and b/samples/cy/DnBCymbalA-01.wav differ
diff --git a/samples/cy/DnBCymbalA-02.wav b/samples/cy/DnBCymbalA-02.wav
new file mode 100755
index 0000000..4d29dde
Binary files /dev/null and b/samples/cy/DnBCymbalA-02.wav differ
diff --git a/samples/cy/DnBCymbalA-03.wav b/samples/cy/DnBCymbalA-03.wav
new file mode 100755
index 0000000..3266f5a
Binary files /dev/null and b/samples/cy/DnBCymbalA-03.wav differ
diff --git a/samples/cy/DnBCymbalA-04.wav b/samples/cy/DnBCymbalA-04.wav
new file mode 100755
index 0000000..16a37e4
Binary files /dev/null and b/samples/cy/DnBCymbalA-04.wav differ
diff --git a/samples/cy/DnBCymbalA-05.wav b/samples/cy/DnBCymbalA-05.wav
new file mode 100755
index 0000000..f97ef11
Binary files /dev/null and b/samples/cy/DnBCymbalA-05.wav differ
diff --git a/samples/eg/Processed_06.wav b/samples/eg/Processed_06.wav
new file mode 100755
index 0000000..f83c034
Binary files /dev/null and b/samples/eg/Processed_06.wav differ
diff --git a/samples/eg/Processed_08.wav b/samples/eg/Processed_08.wav
new file mode 100755
index 0000000..44b317a
Binary files /dev/null and b/samples/eg/Processed_08.wav differ
diff --git a/samples/eg/Processed_13.wav b/samples/eg/Processed_13.wav
new file mode 100755
index 0000000..538324b
Binary files /dev/null and b/samples/eg/Processed_13.wav differ
diff --git a/samples/eg/Processed_26.wav b/samples/eg/Processed_26.wav
new file mode 100755
index 0000000..20e5bdc
Binary files /dev/null and b/samples/eg/Processed_26.wav differ
diff --git a/samples/eg/Processed_32(125BPM).wav b/samples/eg/Processed_32(125BPM).wav
new file mode 100755
index 0000000..ecc4440
Binary files /dev/null and b/samples/eg/Processed_32(125BPM).wav differ
diff --git a/samples/hh/010-HH_DrumHits_OpenHat09.wav b/samples/hh/010-HH_DrumHits_OpenHat09.wav
new file mode 100755
index 0000000..516548f
Binary files /dev/null and b/samples/hh/010-HH_DrumHits_OpenHat09.wav differ
diff --git a/samples/hh/020-HH_DrumHits_OpenHat10.wav b/samples/hh/020-HH_DrumHits_OpenHat10.wav
new file mode 100755
index 0000000..4b59a9a
Binary files /dev/null and b/samples/hh/020-HH_DrumHits_OpenHat10.wav differ
diff --git a/samples/hh/030-HH_Push_01.wav b/samples/hh/030-HH_Push_01.wav
new file mode 100755
index 0000000..1baf372
Binary files /dev/null and b/samples/hh/030-HH_Push_01.wav differ
diff --git a/samples/k/010-CYCdh_ElecK03-Kick02.-1db.wav b/samples/k/010-CYCdh_ElecK03-Kick02.-1db.wav
new file mode 100644
index 0000000..35aa4bb
Binary files /dev/null and b/samples/k/010-CYCdh_ElecK03-Kick02.-1db.wav differ
diff --git a/samples/k/020-Kick_14.wav b/samples/k/020-Kick_14.wav
new file mode 100644
index 0000000..02a0a7b
Binary files /dev/null and b/samples/k/020-Kick_14.wav differ
diff --git a/samples/k/100-CYCdh_ElecK03-Kick02.wav b/samples/k/100-CYCdh_ElecK03-Kick02.wav
new file mode 100755
index 0000000..01eded6
Binary files /dev/null and b/samples/k/100-CYCdh_ElecK03-Kick02.wav differ
diff --git a/samples/sn/HH_DrumHits_Snare08.wav b/samples/sn/HH_DrumHits_Snare08.wav
new file mode 100755
index 0000000..09a90ca
Binary files /dev/null and b/samples/sn/HH_DrumHits_Snare08.wav differ
diff --git a/samples/wb/Wet_Bass_C1.wav b/samples/wb/Wet_Bass_C1.wav
new file mode 100755
index 0000000..3674bae
Binary files /dev/null and b/samples/wb/Wet_Bass_C1.wav differ
diff --git a/samples/wb/Wet_Bass_E1.wav b/samples/wb/Wet_Bass_E1.wav
new file mode 100755
index 0000000..d8dc722
Binary files /dev/null and b/samples/wb/Wet_Bass_E1.wav differ
diff --git a/samples/wb/Wet_Bass_F#2.wav b/samples/wb/Wet_Bass_F#2.wav
new file mode 100755
index 0000000..626dbda
Binary files /dev/null and b/samples/wb/Wet_Bass_F#2.wav differ
diff --git a/samples/wb/Wet_Bass_F1.wav b/samples/wb/Wet_Bass_F1.wav
new file mode 100755
index 0000000..370df07
Binary files /dev/null and b/samples/wb/Wet_Bass_F1.wav differ
diff --git a/samples/wb/Wet_Bass_F2.wav b/samples/wb/Wet_Bass_F2.wav
new file mode 100755
index 0000000..1648ad0
Binary files /dev/null and b/samples/wb/Wet_Bass_F2.wav differ
diff --git a/something.tidal b/something.tidal
new file mode 100644
index 0000000..a2e5f49
--- /dev/null
+++ b/something.tidal
@@ -0,0 +1,106 @@
+cps (151/60)
+
+d1 $ stack [
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  whenmod 9 7 (density 2) $
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  whenmod 6 3 (chop 8) $
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+
+{-
+d1 $ stack [
+  within (0, 0.5) (slow (4%3)) $
+  whenmod 6 3 (chop 8) $
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+-}
+
+d1 $ stack [
+  whenmod 6 3 (chop 8) $
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ gnome ~ ~] gnome]/2"
+--  sound "[[~ hh ~ ~] sn]/2"
+  |+| speed ((+0.3).(/2) <$> density 1.5 saw1)
+--  |+| speed ((+0.4).(/1.5) <$> density 2.1 saw1)
+  |+| cut "1"
+  ]
+
+d2 $ stack [
+  sound "[[k sn ~ k] [k sn]]/2",
+  sound "hh*4"
+  |+| vowel "e o"
+  ]
+
+d2 $ smash 32 [2, 4] $ sound "[[k sn ~ k] [k sn]]/2"
+d2 $ smash 16 [2, 4] $ sound "[[k sn ~ k] [k sn]]/2"
+
+d3 $ stack [
+  sound "[[k sn ~ k] [k sn]]/2",
+  sound "hh*4"
+  |+| vowel "e o"
+  ]
+
+hush
+
+--
+
+d1 $ stack [
+  sound "[[k ~ ~ k] ~]/2",
+  whenmod 9 7 (density 2) $
+  sound "[[~ wt ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  sound "[[k ~ ~ k] ~]/2",
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ wt ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  sound "[[k ~ ~ k] ~]/2",
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ wt ~ ~] sn]/2"
+  ]
+
+d1 $ stack [
+  sound "[[k ~ ~ k] k]/2",
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ hh ~ ~] sn]/2"
+  ]
+
+d1 $ sound "[k {k, sn}]/2"
+d1 $ (every 2 $ overlay $ sound "[~ wt ~ wt]") $ sound "[k {k, sn}]/2"
+
+d2 $ whenmod 6 3 (chop 8) $
+  whenmod 5 2 (rev . chop 4) $
+  whenmod 9 4 (density 2.5) $
+  sound "[[~ gnome ~ ~] gnome]/2"
+  |+| speed ((+0.3).(/2) <$> density 1.5 saw1)
+  |+| cut "1"
+
+hush