commit 3af2adbb8744e811cf33fe34b39a025a424ec0f1
Author: Aneurin Barker Snook <a@aneur.in>
Date:   Wed Aug 10 23:37:02 2016 +0100

    initial commit with some ideas

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..ab0c910
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,5 @@
+.DS_Store
+*.zip
+*.tidal~
+recordings/
+stems/
diff --git a/haddeo.tidal b/haddeo.tidal
new file mode 100644
index 0000000..4b30013
--- /dev/null
+++ b/haddeo.tidal
@@ -0,0 +1,73 @@
+let bpm b = cps (b/60)
+let withmod a b c d = (whenmod a b . within (c, d))
+let every' n o f = when ((== (o-1)) . (`mod` n)) f
+
+-- original bpm = 105
+bpm 105
+
+d1 $ n "{1/4, 0}" # s "drum"
+
+d1 $ n "{1/4, [0 ~ 0*2 [~ ~ ~ 0]]/4}" # s "drum"
+
+d2 $ n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit"
+
+d2 $
+  withmod 11 5 0.5 1 (density 2) $
+  n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit"
+
+d2 $
+  whenmod 3 2 (density 2) $
+  withmod 11 5 0.5 1 (density 2) $
+  n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit"
+
+d2 $
+  whenmod 3 2 (density 2) $
+  withmod 11 5 0.5 1 (density 2) $
+  n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit"
+
+d2 $
+  every' 32 32 (const $ s "kit:3") $
+  whenmod 3 2 (density 2) $
+  withmod 11 5 0.5 1 (density 2) $
+  n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit"
+
+d3 $ s "icarus/16"
+
+d3 $
+  slow 8 $
+  smash 64 [0.5,0.75] $
+  s "icarus"
+
+d3 $
+  off 0.5 (slow 1.5) $
+  slow 8 $
+  smash 64 [0.5,0.75] $
+  s "icarus"
+
+d4 $ slow 16 $ n "[0 1]/2" # s "nimble"
+
+d4 $
+  superimpose (iter 4) $
+  whenmod 4 3 rev $
+  slow 16 $ striate 128 $
+  n "[0 1]/2" # s "nimble"
+
+d4 $
+  superimpose (iter 4) $
+  whenmod 4 3 rev $
+  slow 16 $ striate 128 $
+  n "[0 1]/2" # s "nimble"
+  # speed ((+0.4).(/1.5) <$> slow 16 saw1)
+
+{-
+d4 $
+  (# speed "[-1 1]/3") $
+  superimpose (iter 4) $
+  whenmod 4 3 rev $
+  slow 16 $ striate 128 $
+  n "[0 1]/2" # s "nimble"
+-}
+
+:t preplace
+
+hush
diff --git a/samples/drum/000-kick.wav b/samples/drum/000-kick.wav
new file mode 100644
index 0000000..5459811
Binary files /dev/null and b/samples/drum/000-kick.wav differ
diff --git a/samples/drum/001-boomkick.wav b/samples/drum/001-boomkick.wav
new file mode 100644
index 0000000..7500d65
Binary files /dev/null and b/samples/drum/001-boomkick.wav differ
diff --git a/samples/icarus/000-icarus.wav b/samples/icarus/000-icarus.wav
new file mode 100644
index 0000000..cd513ab
Binary files /dev/null and b/samples/icarus/000-icarus.wav differ
diff --git a/samples/kit/000-hat.wav b/samples/kit/000-hat.wav
new file mode 100644
index 0000000..6244da6
Binary files /dev/null and b/samples/kit/000-hat.wav differ
diff --git a/samples/kit/001-perc.wav b/samples/kit/001-perc.wav
new file mode 100644
index 0000000..c02ba39
Binary files /dev/null and b/samples/kit/001-perc.wav differ
diff --git a/samples/kit/002-perc.wav b/samples/kit/002-perc.wav
new file mode 100644
index 0000000..8edf83a
Binary files /dev/null and b/samples/kit/002-perc.wav differ
diff --git a/samples/kit/003-rev.wav b/samples/kit/003-rev.wav
new file mode 100644
index 0000000..b30e327
Binary files /dev/null and b/samples/kit/003-rev.wav differ
diff --git a/samples/nimble/000-nimble.wav b/samples/nimble/000-nimble.wav
new file mode 100644
index 0000000..c98aa07
Binary files /dev/null and b/samples/nimble/000-nimble.wav differ
diff --git a/samples/nimble/001-nimble.wav b/samples/nimble/001-nimble.wav
new file mode 100644
index 0000000..7e54b06
Binary files /dev/null and b/samples/nimble/001-nimble.wav differ