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

use scale syntax

Browse Source
This commit is contained in:
Aneurin Barker Snook
2017-05-29 16:12:53 +01:00
parent 6bfb0784f9
commit 40b1c67e5f
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
haddeo.tidal
+5 -5
View File
@@ -2,7 +2,7 @@
Anny: Haddeo (Algorave Remix) Anny: Haddeo (Algorave Remix)
anny.audio anny.audio
Current version: 1.0 Current version: 1.0.1
Compatibility: Tidal Cycles 1.0-dev + SuperDirt 1.0-dev + SuperCollider 3.8 Compatibility: Tidal Cycles 1.0-dev + SuperDirt 1.0-dev + SuperCollider 3.8
License: CC-BY-SA https://creativecommons.org/licenses/by-sa/4.0/ License: CC-BY-SA https://creativecommons.org/licenses/by-sa/4.0/
@@ -55,7 +55,7 @@ d'wax $ retrig $ slow 20 $ sound "icarus:1"
d'nim $ d'nim $
{- -- (1) {- -- (1)
superimpose (iter 4 -- (3) iter 6 superimpose (iter 4 -- (3) iter 6
-- .(# speed ((+0.8).(/1.5) <$> slow 2.5 sine1)) -- (2) -- .(# speed (scale (2/3) ((2/3)+0.8) $ slow 2.5 sine1)) -- (2)
) $ -- -} ) $ -- -}
slow 16 . striate 256 $ n "[0 1]/2" # s "nimble" slow 16 . striate 256 $ n "[0 1]/2" # s "nimble"
@@ -109,7 +109,7 @@ d'drum $ mt $ stack [
] ]
d'nim $ superimpose (iter 6 . d'nim $ superimpose (iter 6 .
(# speed ((+0.8).(/1.5) <$> slow 2.5 sine1)) . (# speed (scale (2/3) ((2/3)+0.8) $ slow 2.5 sine1)) .
(# nudge 0)) $ (# nudge 0)) $
mt $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble" mt $ slow 16 . striate 256 $ n "[0 1]/2" # s "nimble"
@@ -123,7 +123,7 @@ msil [d'wax, d'fx2, d'fx3]
d'nim $ d'nim $
{- -- (4) {- -- (4)
superimpose (iter 4 . superimpose (iter 4 .
(# speed ((+0.8).(/1.5) <$> slow 2.5 sine1)) . (# speed (scale (2/3) ((2/3)+0.8) $ slow 2.5 sine1)) .
(# nudge 0)) $ -- -} (# nudge 0)) $ -- -}
mt $ mt $
-- every 3 (density 2) $ -- (3) -- every 3 (density 2) $ -- (3)
@@ -185,7 +185,7 @@ d'drum $ swing 0.14 $ stack [
d'nim $ d'nim $
{- -- (4) {- -- (4)
superimpose (iter 4 superimpose (iter 4
.(# speed ((+0.8).(/1.5) <$> slow 2.5 sine1)) -- (5) .(# speed (scale (2/3) ((2/3)+0.8) $ slow 2.5 sine1)) -- (5)
) $ -- -} ) $ -- -}
{- -- (2) {- -- (2)
every' 16 1 ((# vowel "o u") every' 16 1 ((# vowel "o u")