From 03ed088424e8d3b6ea89ebed56550e3ca01b9554 Mon Sep 17 00:00:00 2001
From: Aneurin Barker Snook <a@aneur.in>
Date: Mon, 20 Jun 2016 18:32:41 +0100
Subject: [PATCH] add first version of notes doc

---
 euler-june2016-notes.tidal | 388 +++++++++++++++++++++++++++++++++++++
 1 file changed, 388 insertions(+)
 create mode 100644 euler-june2016-notes.tidal

diff --git a/euler-june2016-notes.tidal b/euler-june2016-notes.tidal
new file mode 100644
index 0000000..d56d17e
--- /dev/null
+++ b/euler-june2016-notes.tidal
@@ -0,0 +1,388 @@
+{-
+anny: euler room june 2016 live performance notes
+http://anny.audio
+https://bitbucket.org/anny-fm/
+-}
+
+let bpm b = cps (b/60)
+
+-- [1] battery 1 @ 125bpm
+
+d'bass $ slow 4 $ b1'bass
+  # n "0 1 0 0"
+  # speed (thirdosc1 <$> slow 8 sinewave1)
+
+d'hand $ b1'hand
+  # shape ((/2) <$> slow (10%4) sinewave1)
+  # pan (halfosc <$> slow (8%3) sinewave1)
+
+d'perc $ cf $
+  jux (0.25 <~) $
+  b1'perc
+  # n (density 3 $ run 2)
+
+-- good bass
+d'bass $ cf $
+  spread slow [1,3] $
+  striate 16 $
+  b1'bass
+  # n "0 1 0 0"
+  # speed (halfosc1 <$> slow 8 sinewave1)
+  # gain "0.9"
+
+d'drum $ cf $
+  overlay (s "~ psr:1") $
+  every 4 (density 1.5) $ slow 2 $ s "k [~ k] ! ~"
+
+-- funktac
+d'tac $ cf $ b1'tac
+d'tac $ cf . whenmod 7 4 (density 1.5) $ b1'tac
+
+d'drum $
+  overlay k $
+  cf $ s "~ psr:1"
+
+-- birdsong. don't play it for too long. gets annoying
+d'warb $ b1'warbler
+
+d'perc $ cf $
+  spread slow [2,1] $
+--  slow 2 . spread slow [2,4,2,3] $ -- outro
+  jux (0.25 <~) $ b1'perc
+  # n (density 3 $ run 2)
+
+msil [d'bass, d'tac]
+
+d'cymb $ (1 ~>) $ cymb'2 "0.6"
+
+d'drum $ overlay k $
+  cf $
+  every' 8 8 (density 1.5) $ -- 2
+  every 2 (density 3) $ -- 1
+  s "~ psr:1"
+
+d'shard $ (9%16) <~ shard'2 # gain "0.6"
+
+-- remove kickdrum
+
+msil [d'cymb, d'hand, d'fly, d'bass]
+
+-- [2] piston v @ 138bpm
+
+d'drum silence
+d'drum $ drum'5
+d'perc $ perc'5
+d'ant $ ant'2
+
+-- rapidly
+msil [d'warb, d'ant, d'fly, d'shard]
+d'drum $ overlay k $ drum'5
+
+d'bass $ within (0.5, 0.75) (# vowel "u o") $ -- 5, short
+  every 2 (density 2) $ -- 3
+  whenmod 3 2 (density 1.6) $ -- 1, then 2 w/o whenmod
+  bass'5
+  # speed ((+0.75).(/2) <$> slow 1.3 sinewave1) -- 4
+
+d'fly $ fly'5 False
+
+d'bz $ within (0, 0.5) rev $
+  whenmod 4 3 (density 1.8) $
+  bass2'5
+  # shape ((/3) <$> density 3 sinewave1)
+
+d'shard $ whenmod 5 3 (slow 1.5) $ rev $ stack [
+  gnome'5 [0.5,1] id,
+  gnome'5 [(1/2.5),1] (0.5 <~)
+  ]
+
+-- first break
+msil [d'drum, d'bass]
+
+-- 2nd break
+msil [d'perc,d'bz]
+d'shard silence
+d'bass $ bass'6
+
+--[3] piston vi @ 138bpm
+
+solo $ d'bass $ bass'6
+d'bz $ bass2'6
+d'fly $ plode'6
+d'cymb $ cymb'6
+d'perc $ wt'2 # gain "0.85"
+d'bass silence
+
+-- drum
+d'drum $ overlay sn'6 $ drum'6 --main
+d'cymb $ density (5%4) $ whenmod 9 4 (density 1.5) $ cymb'6 --hat
+d'cymb $ (0.5 <~) $ cymb'2 "0.7" --for slow
+
+-- bass
+d'misc $ slow 16 $ bass' 64 --goodbass
+d'bass $ 0.6 ~> bass'4 --weirdbass
+
+-- other
+d'gnome $ wtsn'6
+
+-- slow
+msil [d'perc,d'gnome,d'misc]
+d'gnome $ gnome'6 5 -- then 3
+msil [d'drum,d'fly,d'bz,d'cymb]
+d'drum $ s "[[k k:1]*2 [sn k:1 ~ k] [~ k:1 k ~] [~ sn ~ k]]/8"
+d'fly $ fly'5 False
+
+-- out
+msil [d'perc,d'fly,d'bz]
+
+--[4] battery 2 @ 125bpm
+
+msil [d'drum, d'fly, d'gnome, d'bass]
+
+-- uxay
+d'perc $ b2'ux
+  # speed "[0.7 1 1.2]/2"
+
+d'perc $ b2'ux2 False
+
+-- drum
+d'drum $ overlay k $
+  cf $ every 3 (0.125 <~) $ b2'psrf
+
+d'cymb silence
+
+-- trump
+d'tr $ cf $ b2'trump "[~ trump ! !] ~"
+  # speed (halfosc1 <$> slow 4 sinewave1)
+
+-- the really good bass
+d'bass $ b2'bass
+  # shape (halfosc <$> saw1)
+
+-- arpy out
+d'arpy $ cf $ iter 9 $ b2'arpy
+
+--[5] raise @ 117bpm
+
+d'ql $ slow (10%4) $ spread density [1,5%4] $
+  s "[qlatibro:1 qlatibro]*2"
+  # vowel "e"
+
+d'drum $ cf $ pn'hh
+msil [d'bz, d'bass]
+d'perc $ 0.75 ~> s "wtsn/8"
+
+d'casio $ cf $
+--  jux (slow (4%3)) $ -- 2
+--  spread density [1,4%3] $ -- 1
+  s "casio*2 ~"
+  # gain "0.85"
+
+d'mons $ cf $
+--  spread density [1,2] $ -- 1
+  striate 4 $ slow 2 $ s "monsterb"
+  # gain "0.7"
+  # speed ((+0.6).(/2) <$> slow 4 sinewave1)
+
+d'bass $ every 2 (density 2) $
+--  whenmod 3 2 (density 1.6) $
+  bass'5
+  # speed ((+0.75).(/2) <$> slow 1.3 sinewave1)
+
+-- ~, pbd*2, k*2, then
+d'drum $ cf $ overlay (pn'sn) $ overlay (pn'hh) $
+  every 4 (brak . density 2) $ s "k(3,8)"
+
+d'qs $ cf $
+--  spread density [1,1,2,0.5] $ -- 2
+--  spread density [1,1,0.5,2] $ -- 3
+--  jux (iter 8) $ -- 1
+  pn'qs 2
+  # speed ((+0.7).(/2) <$> slow 3.2 triwave1)
+  # gain "0.95"
+
+d'bass2 $ slow 8 $ s "jungbass jungbass:1"
+  # speed "1.2"
+
+-- shush, crasio, fly
+msil [d'perc, d'qs]
+d'fly $ fly'5 True
+
+-- monster & out
+msil [d'arpy, d'fly]
+
+--[6] juliese @ 99bpm
+
+-- back to k*2, pull bass, switch
+d'bass $ every 2 (density 2) $ bass'5
+msil [d'bass, d'perc, d'ql]
+
+d'bass $
+  slowspread (\x -> within (0.5, 1) (x)) [id, slow 2 . brak] $ -- much later
+  whenmod 4 2 (density 3) $ -- 2
+  whenmod 3 2 (slow 2) $ -- 1
+  bassbass' -- née bassbass
+
+d'perc $
+--  iter 4 $ -- 4
+--  (# pan (density 16 "0.25 0.75")) $ -- 3
+--  whenmod 16 15 (density 3) $ -- 1
+  hhb False --2 -> True
+
+d'drum $ -- overlay ((1 ~>) $ s "cy/8") $
+  overlay ((0.5 ~>) $ s "rsn/2") $ morek $ s "k"
+
+d'drum $ overlay ((0.5 ~>) $ s "rsn/2") $
+  morek $ every' 12 2 (density 3) $ s "k"
+
+d'udu $
+--  (every' 5 3 $ brak) $ -- 3
+--  (every' 3 2 . sometimesBy 0.5 $ density (4%3)) $ -- 1
+--  (whenmod 7 5 $ trunc (5%6)) $ -- 2
+  ududu
+
+d'wbass $ -- (sometimesBy 0.6 $ superimpose (rev . slow (5%4))) $
+  every' 4 4 (0.32 ~>) $
+  chop 16 $
+--  s "[wb wb:1 ~ ~]/4"
+--  s "[wb [wb:1 wb:2] ~ ~]/4"
+--  s "[wb [wb:1 wb:2] ~ [wb:1 wb:2]]/4"
+  s "[wb [wb:1 wb:2] ~ [[wb:1 wb:1/2] wb:2]]/4"
+  # gain "0.9"
+  # speed "[1 1 2]/3"
+
+msil [d'perc, d'bass]
+
+d'eg $
+  (0.18 <~) $ every 2 (const silence) $ -- 4
+  (# speed ((+0.8).(/2) <$> slow 4 saw1)) $ -- 2
+  density 0.25 $ -- (3) then 0.245
+  slowspread density [1, 2, 0.5, 2] $ -- 1
+  eg
+  # gain "0.8"
+
+-- it's ok to just copy-paste this one
+d'pc $
+--  slowspread ($) [rev, id, brak, (0.25 ~>), id] $ -- 2
+--  slowspread (\x -> within x (slow 1.5)) [(0.25, 0.5), (0.75, 1), (0.25, 0.75)] $ -- 1
+  pcbeep
+
+d'gt $ -- density 0.98 $
+  gt
+  # gain "0.87"
+  # speed ((+1).(/4) <$> slow 1.95 sinewave1)
+
+msil [d'perc, d'eg, d'wbass]
+d'drum $ ju'drum2
+
+--[7] something to say @ 106bpm
+
+d'gt silence
+d'drum $ every' 32 32 (const silence) $ slow 2 $ ju'drum2
+d'bass silence
+
+-- speed up
+d'perc $ cf $
+  every 2 (superimpose $ iter' 3) $
+  slow 2 $ ss'perc -- ss'perc' after midpoint
+
+d'gt $
+--  stut 2 0.8 0.5 $ -- new
+  cf $
+--  slow 2 $ every 4 (density 2) $ every 2 (density 2) $ -- 1
+--  density 2 $ iter 2 $ -- 3
+  ss'stab
+  # speed "0.7"
+--  # speed ((+0.7).(/2) <$> slow 5 sinewave1) -- 2
+
+d'kurt $ cf $ s "kurt"
+  # n (slow 7 $ run 7)
+--  # n (slow 4 "5 6 4") -- alt
+
+d'voc $ cf $ slow 4 $ ss'verse
+  # vowel "e"
+
+d'voc $ cf $ slow 4 $ -- then slow 2, then no slow @ end
+--  slowspread ($) [id, (within (0.25, 0.5) $ const silence), (# speed "-1")] $ -- @ end
+--  iter 3 . striate 16 $ -- striate 4 until end
+  ss'chorus
+  # vowel "e" -- u e until end
+--  # speed ((+0.5).(*1.2) <$> slow 5 sinewave1)
+
+-- breakdown
+msil [d'drum, d'perc]
+-- ss'perc' ON D'DRUM!!!
+msil [d'gt, d'kurt, d'pc, d'voc]
+
+d'bass $ whenmod 4 2 (density 3) $ whenmod 3 2 (slow 2) $ bassbass'
+
+d'moog $ cf $
+  slow 8 . striate 8 $
+  0.25 <~ s "moog"
+  # n (slow 2 "0 1")
+  # speed "0.6 0.7"
+  # pan (slow 8 sinewave)
+
+-- kick in
+d'bass silence
+d'drum $ overlay (morek $ k) $
+  cf $
+  every 2 (superimpose $ iter' 3) $
+  slow 2 $ ss'perc'
+
+-- out
+d'misc $ bass2'3
+
+--[8] piston viii @ 138bpm
+
+msil [d'gt, d'voc, d'perc, d'moog, d'bass]
+
+d'fly $ fly'7
+  # delay "0.6"
+  # delayfeedback "0.4"
+  # delaytime "0.62" --(112/60)/3
+
+d'bass $ slow 16 $ bass' 32 -- then 64
+d'bz $ bz'8 # gain "0.9"
+d'drum $ sound "[k*2 [sn ~ ~ wt] [~ k] sn [~ k]]/5"
+d'drum $ sound "[k [sn ~ ~ wt] [~ k] sn]/4" -- swap wt for k
+d'ant $ ant'2
+d'misc $ fly'2
+d'shard $ bass'5f
+d'perc $ sound "{wt/2, [~ wtsn]/8}"
+d'cymb $ cymb'6f
+
+d'perc $ overlay fly'1f $ -- 2nd last
+  within (0.5, 1) (slow (3%2) . chop 4) $ -- last
+  whenmod 5 3 (rev . chop 8) $ -- only rev 1st
+  snare43'1
+
+msil [d'fly,d'bz,d'shard,d'misc,d'ant,d'cymb]
+
+d'misc $ overlay bass'5f $
+  (0.75 ~>) $ bass'4
+
+d'drum $ sound "[k*2 [sn ~ ~ k] [k k*2] sn]/4"
+
+d'shard $ whenmod 7 3 (density (5%4)) $ plox'4 "[ice plode]*2"
+d'fly $ fly'5 True
+d'ant $ bass2'6
+d'cymb $ wtsn'6
+
+d'gnome $ gnome'6 3
+
+d'bz $ within (0.5, 1) (density 2) $
+  shard'3f
+
+msil [d'fly,d'shard,d'bz,d'misc,d'cymb]
+d'misc $ (0.75 ~>) $ bass'4
+d'cymb $ (2.75 ~>) $ cymb'2 "0.7"
+d'bz $ every 3 brak $ bzox'4 "~ bzl"
+msil [d'gnome,d'ant]
+msil [d'bz,d'cymb,d'misc]
+
+solo $ d'perc $ within (0.5, 1) (slow (3%2) . chop 4) $
+  whenmod 5 3 (rev . chop 8) $
+  snare43'1
+
+hush