remove old source files, update readme for simplicity

README.md

@@ -11,29 +11,9 @@ Originally performed live @ The Loft, Brighton, 4th July 2014.
 
 ### battery123.tidal
 
-This version updated April 2016 for Tidal 0.7 (jumping three whole major patches! Amazing) to use `cps (125/60)` instead of `bps (125/60)` hence everything becoming prefixed with `slow 2` - because for some reason, cycles are twice as fast as beats. (Surely it should be the other way round.)
+This version updated April 2016 for Tidal 0.7 (jumping three whole major patches! Amazing) to use `cps (125/60)` instead of `bps (125/60)` hence everything becoming prefixed with `cf` - because for some reason, cycles are twice as fast as beats. (Surely it should be the other way round.)
 
-I also felt compelled to write out the live composition in full, even though it differs significantly from my [original home recording](https://soundcloud.com/anny-fm/battery-123-original-version). I never kept notes on the original composition in `scratch11.tidal` - just the parts - so this may not match up exactly with the live recording or necessarily even sound the same in places, but I think it's roughly right. Good enough to borrow from in future gigs, anyway.
-
-This is the one you want if firing up B123 in latest versions of Tidal, and will be maintained long term for my own use.
-
-#### To-do
-
-- More `let` lines to define reusables, mainly for future gigs and to reduce copy-pasting
-- More annotations
-- Remove unused samples to improve portability
-
-### scratch11.tidal
-
-Original "full" notes on B123, last updated 2nd July 2014. These are pretty poor notes to be honest, but I'm preserving them in version control all the damn same cause before I lose them.
-
-I think this was using Tidal 0.4.6 BTW, at least according to [the latest version at that time](https://github.com/tidalcycles/Tidal/tree/c214cb1baa8259ce4514741bb8a14ca28d1139e7).
-
-### scratch12.cond.tidal
-
-Final notes-to-self made while practicing in hotel room, just hours before performing live. (Did I mention this was my first ever algorave?) Even less useful than `scratch11` because I smushed everything together without double line breaks to make it: a) possible to scroll easily & quickly refer to in one corner of the screen, and b) incomprehensible to anyone trying to understand it _before_ I actually triggered new parts.
-
-I'm much less protective of my code these days!...
+Older versions of this composition with original notes are available on the `original-notes` tag of this repository.
 
 ## Sample attributions
 

scratch11.tidal

@@ -1,124 +0,0 @@
-{-
-anny fm: battery 1,2,3
-           __
-       c|||  o_
-     c||||| ___o
-soundcloud.com/anny-fm
--}
-
-bps (125/60)
-
-let preload p s = d9 $ sound (samples p s) |+| end "0.00001"
-
-let halfosc = (/2).(+0.5)
-let halfosc1 = (+1).(/2)
-let thirdosc1 = (+1).(/3)
-
-preload "[bass3 hand uxay tok psr peri tacscan warbler trump arpy bass wobble jvbass]*16" (run 16)
-
-{----
-PT. 1
-----}
-
--- rumble bass
-
-d3 $ slow 2 $ (sound (samples "bass3 [~ bass3] ! ~" "0 1 0 0") |+| begin "0.2")
-|+| speed (thirdosc1 <$> slow 4 sinewave1)
-
-d3 $ spread slow [1,3] $ striate 16 $ (sound (samples "bass3 [~ bass3] ! ~" "0 1 0 0") |+| begin "0.2")
-|+| speed (halfosc1 <$> slow 4 sinewave1)
-|+| gain "0.8"
-
--- whine
-
-d4 $ slow 4 $ rev . striate 256 $ sound "hand*8"
-|+| speed "0.7"
-|+| shape ((/2) <$> slow (5%4) sinewave1)
-|+| pan (halfosc <$> slow (4%3) sinewave1)
-
--- drum
-
-d2 $ slow 2 . spread slow [2,4,2,3] $ jux (0.25 <~) $ slow 2 $ sound (samples "[uxay tok*2] [~ uxay] [psr:8 uxay] ~" (density 3 $ run 2))
-
-d2 $ spread slow [2,1] $ jux (0.25 <~) $ slow 2 $ sound (samples "[uxay tok*2] [~ uxay] [psr:8 uxay] ~" (density 3 $ run 2))
-
-d1 $ stack [
-  every 4 (density 1.5) $ slow 2 $ sound "peri:1 [~ peri:1] ! ~",
-  sound "peri:1*2",
-  whenmod 8 7 (density 1.5) $ every 2 (density 3) $ sound "~ psr:14"
-  ]
-
--- pexpl
-
-d9 $ whenmod 7 4 (density 1.5) $ slow 2 $ sound "[~ tacscan:13] ! ~ ~"
-|+| gain "0.8"
-|+| vowel (slow 1.5 "e u")
-
-{----
-PT. 2
-----}
-
--- birdsong
-
-d6 $ slow 2 $ striate 32 $ sound (samples "warbler" (slow 7 $ run 7))
-|+| gain "0.8"
-
--- side drum
-
-d2 $ sound (samples "uxay*2" "1 0 1 2")
-d2 $ density 2 $ brak . iter 4 $ sound (samples "uxay*4" "1 0 1 2")
-|+| gain "0.8"
-|+| speed (slow 2 "0.7 1 1.2")
-|+| shape "0.4 0.3 0.6"
-
--- kick, snare
-
-d1 $ stack [
-  sound "peri:1*2",
-  every 3 (0.125 <~) $ sound "psr:8*4 psr:8*2"
-  every 3 (0.125 <~) $ slow 4 $ sound "[psr:8*4 psr:8*2] ! ! psr:8*8"
-  |+| gain "0.6"
-]
-
--- sweet beep
-
-d8 $ whenmod 5 4 rev $ sound (samples "[~ trump ! !] ~" (slow 1.2 $ run 4))
-d8 $ whenmod 5 4 rev $ sound (samples "trump*8" (slow 1.2 $ run 4))
-|+| gain "0.8"
-|+| speed (halfosc1 <$> slow 2 sinewave1)
-|+| vowel (slow 1.6 "a e o")
-|+| shape "0.6"
-
--- chip
-
-d7 $ whenmod 7 4 (|+| vowel "a") $ iter 9 $ sound (samples "arpy*8" "4 2 7 2")
-|+| gain "0.7"
-
--- saw bass
-
-d3 $ slow 4 $ sound (samples "[jvbass ~] [jvbass [~ ~ ~ ~ jvbass]] [~ [~ ~ ~ ~ jvbass]] [~ jvbass !]" (slow 1.4 "0 1 2"))
-|+| vowel "i"
-|+| speed "0.8"
---  |+| shape "0.4"
-|+| shape (halfosc <$> saw1)
-
-{----
-PT. 3
-----}
-
--- proper drum
-
-d1 $ stack [
-  -- kick
-  every 3 rev $ whenmod 8 7 rev $ slow 2 $ sound "peri:1*2 [~ ~ ~ peri:1] [~ peri:1 peri:1 ~] ~",
-  -- main perc w snare
-  whenmod 5 3 (density 2) $ iter 2 $ sound (samples "[tok*2 [rm tok]] [psr:14 tok*2]" (slow 3 $ run 4))
-]
-
--- fun bass v.2
-
-d3 $ spread slow [2,(7%4)] $ whenmod 7 6 (density 1.5) $ iter 4 $ sound (samples "bass*4" "0 1")
-d3 $ spread slow [2,(7%4)] $ whenmod 7 6 (density 1.5) $ iter 4 $ sound (samples "{bass*4, wobble*3}" "0 1")
-|+| begin "0.4"
-|+| speed "1.2"
-|+| shape "0.2"

scratch12.cond.tidal

@@ -1,68 +0,0 @@
-{-
-anny fm: battery 1,2,3
-           __
-       c|||  o_
-     c||||| ___o
-soundcloud.com/anny-fm
--}
-bps (125/60)
-let preload p s = d9 $ sound (samples p s) |+| end "0.00001"
-let halfosc = (/2).(+0.5)
-let halfosc1 = (+1).(/2)
-let thirdosc1 = (+1).(/3)
-preload "[bass3 hand uxay tok psr peri tacscan warbler trump arpy bass wobble jvbass]*16" (run 16)
-hush
-{-PT. 1-}
-d3 $ spread slow [1,3] $ striate 16 $ (sound (samples "bass3 [~ bass3] ! ~" "0 1 0 0") |+| begin "0.2")
-  |+| speed (halfosc1 <$> slow 4 sinewave1)
-  |+| gain "0.9"
-d4 $ slow 4 $ rev . striate 256 $ sound "hand*8"
-  |+| speed "0.7"
-  |+| shape ((/2) <$> slow (5%4) sinewave1)
-  |+| pan (halfosc <$> slow (4%3) sinewave1)
-d2 $ slow 2 . spread slow [2,4,2,3] $ jux (0.25 <~) $ slow 2 $ sound (samples "[uxay tok*2] [~ uxay] [psr:8 uxay] ~" (density 3 $ run 2))
-d2 $ spread slow [2,1] $ jux (0.25 <~) $ slow 2 $ sound (samples "[uxay tok*2] [~ uxay] [psr:8 uxay] ~" (density 3 $ run 2))
-d1 $ stack [
-  every 4 (density 1.5) $ slow 2 $ sound "peri:1 [~ peri:1] ! ~",
-  sound "peri:1*2",
-  whenmod 8 7 (density 1.5) $ every 2 (density 3) $ sound "~ psr:14"
-]
-d9 $ whenmod 7 4 (density 1.5) $ slow 2 $ sound "[~ tacscan:13] ! ~ ~"
-  |+| gain "0.8"
-  |+| vowel (slow 1.5 "e u")
-{-PT. 2-}
-d6 $ slow 2 $ striate 32 $ sound (samples "warbler" (slow 7 $ run 7))
-  |+| gain "0.8"
-d2 $ sound (samples "uxay*2" "1 0 1 2")
-d2 $ density 2 $ brak . iter 4 $ sound (samples "uxay*4" "1 0 1 2")
-  |+| gain "0.8"
-  |+| speed (slow 2 "0.7 1 1.2")
-  |+| shape "0.4 0.3 0.6"
-d1 $ stack [
-  sound "peri:1*2",
-  every 3 (0.125 <~) $ sound "psr:8*4 psr:8*2"
-  every 3 (0.125 <~) $ slow 4 $ sound "[psr:8*4 psr:8*2] ! ! psr:8*8"
-  |+| gain "0.6"
-]
-d8 $ whenmod 5 4 rev $ sound (samples "[~ trump ! !] ~" (slow 1.2 $ run 4))
-d8 $ whenmod 5 4 rev $ sound (samples "trump*8" (slow 1.2 $ run 4))
-  |+| gain "0.8"
-  |+| speed (halfosc1 <$> slow 2 sinewave1)
-  |+| vowel (slow 1.6 "a e o")
-  |+| shape "0.6"
-d3 $ slow 4 $ sound (samples "[jvbass ~] [jvbass [~ ~ ~ ~ jvbass]] [~ [~ ~ ~ ~ jvbass]] [~ jvbass !]" (slow 1.4 "0 1 2"))
-  |+| vowel "i"
-  |+| speed "0.8"
-  |+| shape (halfosc <$> saw1)
-d7 $ whenmod 7 4 (|+| vowel "a") $ iter 9 $ sound (samples "arpy*8" "4 2 7 2")
-  |+| gain "0.7"
-{-PT. 3-}
-d1 $ stack [
-  every 3 rev $ whenmod 8 7 rev $ slow 2 $ sound "peri:1*2 [~ ~ ~ peri:1] [~ peri:1 peri:1 ~] ~",
-  whenmod 5 3 (density 2) $ iter 2 $ sound (samples "[tok*2 [rm tok]] [psr:14 tok*2]" (slow 3 $ run 4))
-]
-d3 $ spread slow [2,(7%4)] $ whenmod 7 6 (density 1.5) $ iter 4 $ sound (samples "bass*4" "0 1")
-d3 $ spread slow [2,(7%4)] $ whenmod 7 6 (density 1.5) $ iter 4 $ sound (samples "{bass*4, wobble*3}" "0 1")
-  |+| begin "0.4"
-  |+| speed "1.2"
-  |+| shape "0.2"