commit 0cca31f6027ee8866a42d0c6c9e55c4c3b8005d7 Author: Aneurin Barker Snook Date: Mon Mar 27 01:00:15 2017 +0100 initial commit of tidied-up tidal code, samples etc todo: add sample attributions diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..7e399b5 --- /dev/null +++ b/.gitignore @@ -0,0 +1,5 @@ +.DS_Store +*.swp +*.*~ +#*# + diff --git a/README.md b/README.md new file mode 100644 index 0000000..4dbaedc --- /dev/null +++ b/README.md @@ -0,0 +1,21 @@ +# Anny: Cuadrillion (Demo) + +[anny.audio](https://www.anny.audio) + +First played for Algorave's fith birthday, #algofive 17th March 2017 + +Written for Fwonk release nr. 200 out in March 2017. FW200 is Fwonk's final release, at least in its current form, but its catalogue will live on. There is a lot of very good electronic music in there, so be sure to check it out some time! + +[fwonk.co.uk](http://fwonk.co.uk) + +## Files + +`cuadrillion.scd` is a simple SuperCollider file to initialise my audio routing and load project samples. + +`cuadrillion.tidal` contains the Tidal Cycles code for this project. This includes `-- @tagged` major elements and some compositional notes. + +`samples.csv` contains sample attributions for this project. All sample files are available in the `samples/` directory. + +## License + +Source code is [CC-BY-SA](https://creativecommons.org/licenses/by-sa/4.0/) and samples are all royalty free. diff --git a/cuadrillion.scd b/cuadrillion.scd new file mode 100644 index 0000000..0476e35 --- /dev/null +++ b/cuadrillion.scd @@ -0,0 +1,8 @@ +include("SuperDirt") + +Server.local.options.device = "Soundflower (2ch)"; +SuperDirt.start + +~dirt.loadSoundFiles(thisProcess.nowExecutingPath.dirname +/+ "/samples/*") + +~dirt.stop diff --git a/cuadrillion.tidal b/cuadrillion.tidal new file mode 100644 index 0000000..78f57b2 --- /dev/null +++ b/cuadrillion.tidal @@ -0,0 +1,133 @@ +{- +Anny: Cuadrillion (Demo) +anny.audio + +First played for Algorave's fith birthday, #algofive 17th March 2017 + +Written for Fwonk release nr. 200 out in March 2017. FW200 is Fwonk's +final release, at least in its current form, but its catalogue will +live on. There is a lot of very good electronic music in there, so be +sure to check it out some time! +fwonk.co.uk + +See README.md +-} + +let bpm b = cps (b/60) + every' n o f = when ((== (o-1)) . (`mod` n)) f + d'drum = d1 + d'perc = d2 + d'bass = d3 + d'bleep = d4 + d'moog = d4 + d'gt = d5 + d'gt2 = d6 + d'gt3 = d7 + +bpm 149 + +-- @bleep +d'bleep $ + -- every' 5 2 (iter 4) $ -- (2) + -- every 3 (rev . slow 2 . chop 4) $ -- (1) + n "[[~ 0] ~ 1 ~]/4" # s "bleep" + # gain "1.2" + +d'drum $ + every' 16 16 (overlay $ n "~ 1!!" # s "drum") $ + 1 <~ n "1/16" # s "drum" + +-- @drumintro +d'drum $ + every' 16 16 (overlay $ n "~ 1!!" # s "drum") $ + n "{1, [~! [~ 0]!]/4}" # s "drum" + +d'drum $ + every' 16 16 (overlay $ n "~ 1!!" # s "drum") $ + n "{1, [~! [~ 0]!]/4, [[~ 3] 3]/2}" # s "drum" + +d'perc $ n "[~ 1 ~ ~]/4" # s "drum2" + +-- @perc +d'perc $ + stack [ + n "[~ 1 0 ~]/4", + 0.5 ~> n "[3 2 ~]/3" + -- 0.75 ~> n "[3 2 ~ 2 3]/5", -- (1) + -- 0.25 ~> n "[~ 3 2 ~ 0 2 3]/7" -- (2) + ] + # s "drum2" + +-- @drum +d'drum $ + -- every' 16 16 (density 2) $ -- (1) replacing (0) + every' 16 16 (within (0.5, 1) $ density 2) $ -- (0) + n "{0, 1, [~! [~ 0]!]/4, [[~ 3] 3]/2}" # s "drum" + +-- @bass +d'bass $ + -- slowspread slow [1,1,1,2,3] $ -- (2) + (0.5 <~) $ rev $ gap 32 $ + -- superimpose ((# gain "0.7") . (# speed "3")) $ -- (1) + every' 32 31 (overlay $ n "2" # s "drbass") $ + every' 16 16 (overlay $ n "1 ~" # s "drbass") $ + n "[0 0 [~ 0] !]/4" # s "drbass" + # gain "0.9" + # vowel "{a, i}" + # shape "0.4" + # orbit "1" # room "0.2" # size "0.1" + # resonance "0.1" # cutoff "130" -- 10 -> 130 + +-- @gt +d'gt $ -- every' 8 8 (const silence) $ -- (1) then (3) remove + -- every 3 (slow 32) $ -- (1) then (2) remove + every 2 rev $ + (0.5 ~>) $ + slow 8 $ smash 16 [1,2] $ striate 16 $ + n "0" # s "acb" + # cut "7" + # gain "0.8" -- 0.1 -> 0.8 + # speed (scale 0.7 1.4 $ slow 3 sine1) + # vowel "u" + +-- @gt2 +d'gt2 $ (0.5 <~) $ + slow 8 $ + iter 4 $ + striate 16 $ + sound "acg" + # cut "6" + # shape "0.4" + # gain "0.9" + +-- ~drum w/ (1) + +-- @gt3 +let hp = "240" + lp = "1200" + r = "0.3" + in d'gt3 $ + (3 ~>) $ + -- every' 4 2 (superimpose (3 <~)) $ -- (1) and (2) remove + slow 16 . gap 8 $ -- (0) and (2) remove + -- slow 30 . gap 15 $ -- (2) + sound "dg" + # gain "0.9" + # orbit "1" # room "0.2" # size "0.1" + # speed (scale 1 1.25 $ slow 4.1 sine1) + # cutoff lp # resonance r + # hcutoff hp # resonance r + +mapM_ ($ silence) [d'gt, d'gt2, d'gt3] + +-- ~perc w/ (1) +-- ~perc w/ (2) +-- ~gt w/ (1) +-- ~bass w/ (1) +-- ~gt2 +-- ~gt w/ (2) then (3) +-- ~gt3 w/ (2) + +mapM_ ($ silence) [d'gt, d'gt2, d'gt3, d'bass] + +hush diff --git a/samples.csv b/samples.csv new file mode 100644 index 0000000..b8e6481 --- /dev/null +++ b/samples.csv @@ -0,0 +1,18 @@ +Sample,Index,File,Origin,URL,Notes +acb,0,AC_BassA_128-A2.wav,,, +acg,0,AC_GuitarsB_95-C3.wav,,, +arpb,0,AC_ARPBassB_128-A.wav,,, +bleep,0,000-Fx_09.wav,,, +bleep,1,010-Fx_09.wav,,, +dg,0,Processed_16.wav,,, +drbass,0,000 Kick Power trunc.wav,,, +drbass,1,001 Kick Power trunc2.wav,,, +drbass,2,100 Kick Power.wav,,, +drum,0,000 Kick LazerDice 6.wav,,, +drum,1,010 Snare Party 2.wav,,, +drum,2,011 Snare Turnt 2.wav,,, +drum,3,020 DnBHatD-06.wav,,, +drum2,0,Snare ElbeDock.wav,,, +drum2,1,Snare EnaSwag 1.wav,,, +drum2,2,Snare Youza 1.wav,,, +drum2,3,Snare Youza 2.wav,,, diff --git a/samples/acb/AC_BassA_128-A2.wav b/samples/acb/AC_BassA_128-A2.wav new file mode 100755 index 0000000..7f06210 Binary files /dev/null and b/samples/acb/AC_BassA_128-A2.wav differ diff --git a/samples/acg/AC_GuitarsB_95-C3.wav b/samples/acg/AC_GuitarsB_95-C3.wav new file mode 100755 index 0000000..ec0bdda Binary files /dev/null and b/samples/acg/AC_GuitarsB_95-C3.wav differ diff --git a/samples/arpb/AC_ARPBassB_128-A.wav b/samples/arpb/AC_ARPBassB_128-A.wav new file mode 100755 index 0000000..23694ab Binary files /dev/null and b/samples/arpb/AC_ARPBassB_128-A.wav differ diff --git a/samples/bleep/000-Fx_09.wav b/samples/bleep/000-Fx_09.wav new file mode 100644 index 0000000..853a6a1 Binary files /dev/null and b/samples/bleep/000-Fx_09.wav differ diff --git a/samples/bleep/010-Fx_09.wav b/samples/bleep/010-Fx_09.wav new file mode 100644 index 0000000..5e2cf9a Binary files /dev/null and b/samples/bleep/010-Fx_09.wav differ diff --git a/samples/dg/Processed_16.wav b/samples/dg/Processed_16.wav new file mode 100755 index 0000000..16205dc Binary files /dev/null and b/samples/dg/Processed_16.wav differ diff --git a/samples/drbass/000 Kick Power trunc.wav b/samples/drbass/000 Kick Power trunc.wav new file mode 100644 index 0000000..009c99a Binary files /dev/null and b/samples/drbass/000 Kick Power trunc.wav differ diff --git a/samples/drbass/001 Kick Power trunc2.wav b/samples/drbass/001 Kick Power trunc2.wav new file mode 100644 index 0000000..d899dcd Binary files /dev/null and b/samples/drbass/001 Kick Power trunc2.wav differ diff --git a/samples/drbass/100 Kick Power.wav b/samples/drbass/100 Kick Power.wav new file mode 100755 index 0000000..dca8048 Binary files /dev/null and b/samples/drbass/100 Kick Power.wav differ diff --git a/samples/drum/000 Kick LazerDice 6.wav b/samples/drum/000 Kick LazerDice 6.wav new file mode 100755 index 0000000..4c4cfdb Binary files /dev/null and b/samples/drum/000 Kick LazerDice 6.wav differ diff --git a/samples/drum/010 Snare Party 2.wav b/samples/drum/010 Snare Party 2.wav new file mode 100755 index 0000000..6820f9a Binary files /dev/null and b/samples/drum/010 Snare Party 2.wav differ diff --git a/samples/drum/011 Snare Turnt 2.wav b/samples/drum/011 Snare Turnt 2.wav new file mode 100755 index 0000000..38c54da Binary files /dev/null and b/samples/drum/011 Snare Turnt 2.wav differ diff --git a/samples/drum/020 DnBHatD-06.wav b/samples/drum/020 DnBHatD-06.wav new file mode 100755 index 0000000..1c1ae36 Binary files /dev/null and b/samples/drum/020 DnBHatD-06.wav differ diff --git a/samples/drum2/Snare ElbeDock.wav b/samples/drum2/Snare ElbeDock.wav new file mode 100755 index 0000000..19ec8f4 Binary files /dev/null and b/samples/drum2/Snare ElbeDock.wav differ diff --git a/samples/drum2/Snare EnaSwag 1.wav b/samples/drum2/Snare EnaSwag 1.wav new file mode 100755 index 0000000..ca1b3a4 Binary files /dev/null and b/samples/drum2/Snare EnaSwag 1.wav differ diff --git a/samples/drum2/Snare Youza 1.wav b/samples/drum2/Snare Youza 1.wav new file mode 100755 index 0000000..2d49a30 Binary files /dev/null and b/samples/drum2/Snare Youza 1.wav differ diff --git a/samples/drum2/Snare Youza 2.wav b/samples/drum2/Snare Youza 2.wav new file mode 100755 index 0000000..b5a5cee Binary files /dev/null and b/samples/drum2/Snare Youza 2.wav differ