|
@@ -25,8 +25,7 @@ let bpm b = cps (b/60)
|
|
|
|
|
|
|
|
{-
|
|
{-
|
|
|
@b1
|
|
@b1
|
|
|
-Anny FM: Battery 1
|
|
|
|
|
-anny.audio
|
|
|
|
|
|
|
+Battery 1
|
|
|
-}
|
|
-}
|
|
|
|
|
|
|
|
bpm 125
|
|
bpm 125
|
|
@@ -146,8 +145,7 @@ d'drum silence
|
|
|
|
|
|
|
|
{-
|
|
{-
|
|
|
@b2
|
|
@b2
|
|
|
-Anny FM: Battery 2
|
|
|
|
|
-anny.audio
|
|
|
|
|
|
|
+Battery 2
|
|
|
-}
|
|
-}
|
|
|
|
|
|
|
|
bpm 125
|
|
bpm 125
|
|
@@ -180,7 +178,7 @@ let b = brak . iter 4 -- (1)
|
|
|
|
|
|
|
|
d'warb silence
|
|
d'warb silence
|
|
|
|
|
|
|
|
--- ~b2drum w/o peri
|
|
|
|
|
|
|
+-- b2drum w/o peri
|
|
|
|
|
|
|
|
-- @b2trump
|
|
-- @b2trump
|
|
|
d'tr $ cf $ whenmod 5 4 rev $ s "[~ trump ! !] ~"
|
|
d'tr $ cf $ whenmod 5 4 rev $ s "[~ trump ! !] ~"
|
|
@@ -190,8 +188,8 @@ d'tr $ cf $ whenmod 5 4 rev $ s "[~ trump ! !] ~"
|
|
|
# shape 0.6
|
|
# shape 0.6
|
|
|
-- # speed (scale 0.5 1.5 $ slow 4 sine1) -- (1)
|
|
-- # speed (scale 0.5 1.5 $ slow 4 sine1) -- (1)
|
|
|
|
|
|
|
|
--- ~b2drum w/ peri
|
|
|
|
|
--- ~b2perc w/ b=brak . iter 4
|
|
|
|
|
|
|
+-- b2drum w/ peri
|
|
|
|
|
+-- b2perc w/ b=brak . iter 4
|
|
|
|
|
|
|
|
d'bass $ slow 8 $
|
|
d'bass $ slow 8 $
|
|
|
s "[jvbass ~] [jvbass [~ ~ ~ ~ jvbass]] [~ [~ ~ ~ ~ jvbass]] [~ jvbass !]"
|
|
s "[jvbass ~] [jvbass [~ ~ ~ ~ jvbass]] [~ [~ ~ ~ ~ jvbass]] [~ jvbass !]"
|
|
@@ -216,22 +214,21 @@ d'arpy $ cf $ s "arpy*8"
|
|
|
|
|
|
|
|
msil [d'perc, d'bass]
|
|
msil [d'perc, d'bass]
|
|
|
|
|
|
|
|
--- ~b2drum w/o peri
|
|
|
|
|
|
|
+-- b2drum w/o peri
|
|
|
|
|
|
|
|
-- @b2arpy
|
|
-- @b2arpy
|
|
|
d'arpy $ cf $ iter 9 $ s "arpy*8"
|
|
d'arpy $ cf $ iter 9 $ s "arpy*8"
|
|
|
# n "2 1 3 1"
|
|
# n "2 1 3 1"
|
|
|
# gain 0.7
|
|
# gain 0.7
|
|
|
|
|
|
|
|
--- ~b2perc @ (1)
|
|
|
|
|
--- ~b2drum w/ peri
|
|
|
|
|
|
|
+-- b2perc @ 1
|
|
|
|
|
+-- b2drum w/ peri
|
|
|
|
|
|
|
|
msil [d'drum, d'perc]
|
|
msil [d'drum, d'perc]
|
|
|
|
|
|
|
|
{-
|
|
{-
|
|
|
@b3
|
|
@b3
|
|
|
-Anny FM: Battery 3
|
|
|
|
|
-anny.audio
|
|
|
|
|
|
|
+Battery 3
|
|
|
-}
|
|
-}
|
|
|
|
|
|
|
|
bpm 125
|
|
bpm 125
|
|
@@ -243,7 +240,7 @@ d'arpy $ cf $
|
|
|
# n "2 1 3 1"
|
|
# n "2 1 3 1"
|
|
|
# gain 0.7
|
|
# gain 0.7
|
|
|
|
|
|
|
|
--- ~b1perc3
|
|
|
|
|
|
|
+-- b1perc3
|
|
|
d'perc $ cf $
|
|
d'perc $ cf $
|
|
|
slow 2 . spread slow [2,4,2,3] $
|
|
slow 2 . spread slow [2,4,2,3] $
|
|
|
jux (0.25 <~) $
|
|
jux (0.25 <~) $
|
|
@@ -263,27 +260,27 @@ d'bass $ cf $
|
|
|
# speed 1.2
|
|
# speed 1.2
|
|
|
# shape 0.2
|
|
# shape 0.2
|
|
|
|
|
|
|
|
--- ~b3bass @ (1)
|
|
|
|
|
|
|
+-- b3bass @ 1
|
|
|
|
|
|
|
|
d'drum $ cf $ sound "[tok*2 [rm tok]] [psr:1 tok*2]"
|
|
d'drum $ cf $ sound "[tok*2 [rm tok]] [psr:1 tok*2]"
|
|
|
# n (slow 3 $ run 4)
|
|
# n (slow 3 $ run 4)
|
|
|
|
|
|
|
|
--- ~b3bass @ (2)
|
|
|
|
|
--- ~b3bass @ (3)
|
|
|
|
|
|
|
+-- b3bass @ 2
|
|
|
|
|
+-- b3bass @ 3
|
|
|
|
|
|
|
|
--- ~b1hand
|
|
|
|
|
|
|
+-- b1hand
|
|
|
d'hand $ slow 8 $ rev . striate 256 $ s "hand*8"
|
|
d'hand $ slow 8 $ rev . striate 256 $ s "hand*8"
|
|
|
# speed 0.7
|
|
# speed 0.7
|
|
|
# shape (scale 0 0.5 $ slow (10/4) sine1)
|
|
# shape (scale 0 0.5 $ slow (10/4) sine1)
|
|
|
# pan (scale 0.25 0.75 $ slow (8/3) sine1)
|
|
# pan (scale 0.25 0.75 $ slow (8/3) sine1)
|
|
|
|
|
|
|
|
--- ~b1tac
|
|
|
|
|
|
|
+-- b1tac
|
|
|
d'tac $ cf . whenmod 7 4 (density 1.5) $
|
|
d'tac $ cf . whenmod 7 4 (density 1.5) $
|
|
|
s "[~ tacscan] ! ~ ~"
|
|
s "[~ tacscan] ! ~ ~"
|
|
|
# gain 0.8
|
|
# gain 0.8
|
|
|
# vowel (slow 3 "e u")
|
|
# vowel (slow 3 "e u")
|
|
|
|
|
|
|
|
--- ~b3arpy @ (1)
|
|
|
|
|
|
|
+-- b3arpy @ 1
|
|
|
|
|
|
|
|
msil [d'bass, d'hand]
|
|
msil [d'bass, d'hand]
|
|
|
|
|
|
|
@@ -301,11 +298,11 @@ d'drum $ cf $
|
|
|
sound "[tok*2 [rm tok]] [psr:1 tok*2]"
|
|
sound "[tok*2 [rm tok]] [psr:1 tok*2]"
|
|
|
# n (slow 3 $ run 4)
|
|
# n (slow 3 $ run 4)
|
|
|
|
|
|
|
|
--- ~b1hand
|
|
|
|
|
--- ~b1perc3 @ (1)
|
|
|
|
|
|
|
+-- b1hand
|
|
|
|
|
+-- b1perc3 @ 1
|
|
|
|
|
|
|
|
--- ~b3bass
|
|
|
|
|
--- ~b1tac
|
|
|
|
|
|
|
+-- b3bass
|
|
|
|
|
+-- b1tac
|
|
|
|
|
|
|
|
-- @b3bassloud
|
|
-- @b3bassloud
|
|
|
d'bass $ cf $
|
|
d'bass $ cf $
|
|
@@ -332,30 +329,30 @@ d'drum $ cf $
|
|
|
|
|
|
|
|
msil [d'bass, d'arpy]
|
|
msil [d'bass, d'arpy]
|
|
|
|
|
|
|
|
--- ~b3drumfull @ (5)
|
|
|
|
|
|
|
+-- b3drumfull @ 5
|
|
|
|
|
|
|
|
d'hand silence
|
|
d'hand silence
|
|
|
|
|
|
|
|
--- ~b2perc1
|
|
|
|
|
|
|
+-- b2perc1
|
|
|
d'perc $ cf $
|
|
d'perc $ cf $
|
|
|
slow 2 . spread slow [2,4,2,3] $
|
|
slow 2 . spread slow [2,4,2,3] $
|
|
|
jux (0.25 <~) $
|
|
jux (0.25 <~) $
|
|
|
slow 2 $ s "uxay [~ uxay] [psr uxay] ~"
|
|
slow 2 $ s "uxay [~ uxay] [psr uxay] ~"
|
|
|
# n (density 3 $ run 2)
|
|
# n (density 3 $ run 2)
|
|
|
|
|
|
|
|
--- ~b3drum2
|
|
|
|
|
|
|
+-- b3drum2
|
|
|
d'drum $ cf $
|
|
d'drum $ cf $
|
|
|
overlay (slow 2 $ s "peri*2 [~ ~ ~ peri] [~ peri peri ~] ~") $
|
|
overlay (slow 2 $ s "peri*2 [~ ~ ~ peri] [~ peri peri ~] ~") $
|
|
|
sound "[tok*2 [rm tok]] [psr:1 tok*2]"
|
|
sound "[tok*2 [rm tok]] [psr:1 tok*2]"
|
|
|
# n (slow 3 $ run 4)
|
|
# n (slow 3 $ run 4)
|
|
|
|
|
|
|
|
--- ~b2perc @ (1)
|
|
|
|
|
--- ~b2bass @ (2)
|
|
|
|
|
--- ~b1tac
|
|
|
|
|
--- ~b1bass1 [on channel d'bass2]
|
|
|
|
|
--- ~b3arpy @ (1)
|
|
|
|
|
--- ~b1warbler
|
|
|
|
|
--- ~b1hand
|
|
|
|
|
|
|
+-- b2perc @ 1
|
|
|
|
|
+-- b2bass @ 2
|
|
|
|
|
+-- b1tac
|
|
|
|
|
+-- b1bass1 [on channel d'bass2]
|
|
|
|
|
+-- b3arpy @ 1
|
|
|
|
|
+-- b1warbler
|
|
|
|
|
+-- b1hand
|
|
|
|
|
|
|
|
msil [d'perc, d'bass, d'tac, d'bass2, d'hand]
|
|
msil [d'perc, d'bass, d'tac, d'bass2, d'hand]
|
|
|
d'drum silence
|
|
d'drum silence
|
Aneurin Barker Snook