music-2010s/haddeo-remix
Archived
1
0
Fork 0
Code Pull Requests Activity

move stuff around a bit

Browse Source
This commit is contained in:
Aneurin Barker Snook
2016-11-19 21:11:32 +00:00
parent 750b53c120
commit c34f978ada
1 changed files with 21 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files
haddeo.tidal
+21 -14
View File
@@ -238,6 +238,12 @@ d'bass2 $ swing' $
# speed (0.5 ~> "[2 1]") # speed (0.5 ~> "[2 1]")
# gain "0.82" # gain "0.82"
d'fx1 $
(2 ~>) $ chop 16 $ s "dorr/4"
# hresonance "0.05"
# hcutoff "200"
# gain "0.8"
d'fx2 $ d'fx2 $
stack [ stack [
1.75 ~> s "tubal/4", 1.75 ~> s "tubal/4",
@@ -247,12 +253,6 @@ d'fx2 $
# speed "0.9" # speed "0.9"
] ]
d'fx1 $
(2 ~>) $ chop 16 $ s "dorr/4"
# hresonance "0.05"
# hcutoff "200"
# gain "0.8"
d'nim $ every' 16 1 ((# vowel "o u") . nim'del) $ d'nim $ every' 16 1 ((# vowel "o u") . nim'del) $
whenmod 16 12 (# vowel "[a i]/3") $ whenmod 16 12 (# vowel "[a i]/3") $
(1 ~>) $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble" (1 ~>) $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble"
@@ -266,14 +266,12 @@ d'fx1 $
d'wax $ slow 16 . striate 256 $ s "icarus" d'wax $ slow 16 . striate 256 $ s "icarus"
d'drum $ swing' $ stack [ d'fx3 $
n "[1*2, 0*8, [[~ 0] ~! [~!! 0] [~! 0!] ~!!]]/8" # s "drum", (1.5 ~>) $
whenmod 3 2 (density 2) $ slow 4 $ chop 48 $
withmod 11 5 0.5 1 (density 2) $ sound (samples "snoo" <$> slow 7 $ run 7)
n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit", # gain "0.8"
n "[~ [1 0/8 1/2 0/2]]/2" # s "sn" # cut "10"
# gain "0.85"
]
d'nim $ superimpose (iter 4) $ d'nim $ superimpose (iter 4) $
every' 16 1 ((# vowel "o u") . nim'del) $ every' 16 1 ((# vowel "o u") . nim'del) $
@@ -285,6 +283,15 @@ d'nim $ superimpose (iter 4 . nim'osc) $
whenmod 16 12 (# vowel "[a i]/3") $ whenmod 16 12 (# vowel "[a i]/3") $
(1 ~>) $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble" (1 ~>) $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble"
d'drum $ swing' $ stack [
n "[1*2, 0*8, [[~ 0] ~! [~!! 0] [~! 0!] ~!!]]/8" # s "drum",
whenmod 3 2 (density 2) $
withmod 11 5 0.5 1 (density 2) $
n "[[~ 0] [[2!! ~]/4 0]]/2" # s "kit",
n "[~ [1 0/8 1/2 0/2]]/2" # s "sn"
# gain "0.85"
]
d'drum $ swing' $ stack [ d'drum $ swing' $ stack [
n "[1*2, 0*8, [[~ 0] ~! [~!! 0] [~! 0!] ~!!]]/8" # s "drum", n "[1*2, 0*8, [[~ 0] ~! [~!! 0] [~! 0!] ~!!]]/8" # s "drum",
n "[~ 0]" # s "kit", n "[~ 0]" # s "kit",