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

aaaactually

Browse Source
This commit is contained in:
Aneurin Barker Snook
2016-03-23 00:00:58 +00:00
parent 126e10024c
commit d71b929b22
1 changed files with 32 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files
for-mix2.tidal
+32 -28
View File
@@ -62,13 +62,6 @@ d1 $ stack [
(0.5 ~>) $ s "sn/2" (0.5 ~>) $ s "sn/2"
] ]
d7 $
slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "pc:1"
# gain "0.9"
# cut "7"
# speed "[1 0.7]"
d2 $ d2 $
whenmod 16 15 (density 3) $ whenmod 16 15 (density 3) $
smash 16 [0.25, 0.5] $ smash 16 [0.25, 0.5] $
@@ -91,8 +84,6 @@ d1 $ stack [
(0.5 ~>) $ s "sn/2" (0.5 ~>) $ s "sn/2"
] ]
d7 silence
d2 $ d2 $
iter 4 $ iter 4 $
(# pan (density 16 "0.25 0.75")) $ (# pan (density 16 "0.25 0.75")) $
@@ -155,13 +146,6 @@ d1 $ stack [
mapM_ ($ silence) [d2,d3] mapM_ ($ silence) [d2,d3]
d1 $ stack [
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $
every' 12 2 (density 3) $
s "k",
(0.5 ~>) $ s "sn/2"
]
d4 $ d4 $
(0.18 <~) $ every 2 (const silence) $ (0.18 <~) $ every 2 (const silence) $
(# speed ((+0.8).(/2) <$> slow 4 saw1)) $ (# speed ((+0.8).(/2) <$> slow 4 saw1)) $
@@ -171,6 +155,26 @@ d4 $
# gain "0.8" # gain "0.8"
# cut "4" # cut "4"
d1 $ stack [
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $
every' 12 2 (density 3) $
s "k",
(0.5 ~>) $ s "sn/2"
]
d7 $
slow 16 $ gap 48 $ s "pc:1"
# gain "0.7"
# cut "7"
# speed "[1 0.7]"
d7 $
slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "pc:1"
# gain "0.7"
# cut "7"
# speed "[1 0.7]"
d6 $ d6 $
(every' 3 2 . sometimesBy 0.5 $ density (4%3)) $ (every' 3 2 . sometimesBy 0.5 $ density (4%3)) $
(whenmod 7 5 $ trunc (5%6)) $ (whenmod 7 5 $ trunc (5%6)) $
@@ -182,7 +186,7 @@ d6 $
d7 $ d7 $
slowspread ($) [id, slow 2] $ slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "[pc pc:1]" slow 16 $ gap 48 $ s "[pc pc:1]"
# gain "0.8" # gain "0.7"
# cut "7" # cut "7"
# speed "[1 0.7]" # speed "[1 0.7]"
@@ -199,16 +203,7 @@ d7 $
slowspread ($) [rev, id, brak, (0.25 ~>), id] $ slowspread ($) [rev, id, brak, (0.25 ~>), id] $
slowspread ($) [id, slow 2] $ slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "[pc pc:1]" slow 16 $ gap 48 $ s "[pc pc:1]"
# gain "0.8" # gain "0.7"
# cut "7"
# speed "[1 0.7]"
d7 $
whenmod 7 5 (density 1.25) $
slowspread ($) [rev, id, brak, (0.25 ~>), id] $
slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "[pc pc:1]"
# gain "0.8"
# cut "7" # cut "7"
# speed "[1 0.7]" # speed "[1 0.7]"
@@ -223,6 +218,15 @@ d5 $
# cut "5" # cut "5"
# speed ((+1).(/4) <$> slow 1.95 sinewave1) # speed ((+1).(/4) <$> slow 1.95 sinewave1)
d7 $
whenmod 7 5 (density 1.25) $
slowspread ($) [rev, id, brak, (0.25 ~>), id] $
slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "[pc pc:1]"
# gain "0.7"
# cut "7"
# speed "[1 0.7]"
d5 $ d5 $
density 0.98 $ density 0.98 $
chop 128 $ s "[gt [~ gt] ! ~]/2" chop 128 $ s "[gt [~ gt] ! ~]/2"
@@ -292,7 +296,7 @@ d7 $
slowspread ($) [rev, id, brak, (0.25 ~>), id] $ slowspread ($) [rev, id, brak, (0.25 ~>), id] $
slowspread ($) [id, slow 2] $ slowspread ($) [id, slow 2] $
slow 16 $ gap 48 $ s "[pc pc:1]" slow 16 $ gap 48 $ s "[pc pc:1]"
# gain "0.8" # gain "0.7"
# cut "7" # cut "7"
# speed "[1 0.7]" # speed "[1 0.7]"