simplify comments for readability

This commit is contained in:
Aneurin Barker Snook
2017-06-09 17:45:32 +01:00
parent e8f417462a
commit 6865b9ed49
+30 -33
View File
@@ -25,8 +25,7 @@ let bpm b = cps (b/60)
{-
@b1
Anny FM: Battery 1
anny.audio
Battery 1
-}
bpm 125
@@ -146,8 +145,7 @@ d'drum silence
{-
@b2
Anny FM: Battery 2
anny.audio
Battery 2
-}
bpm 125
@@ -180,7 +178,7 @@ let b = brak . iter 4 -- (1)
d'warb silence
-- ~b2drum w/o peri
-- b2drum w/o peri
-- @b2trump
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
-- # 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 $
s "[jvbass ~] [jvbass [~ ~ ~ ~ jvbass]] [~ [~ ~ ~ ~ jvbass]] [~ jvbass !]"
@@ -216,22 +214,21 @@ d'arpy $ cf $ s "arpy*8"
msil [d'perc, d'bass]
-- ~b2drum w/o peri
-- b2drum w/o peri
-- @b2arpy
d'arpy $ cf $ iter 9 $ s "arpy*8"
# n "2 1 3 1"
# gain 0.7
-- ~b2perc @ (1)
-- ~b2drum w/ peri
-- b2perc @ 1
-- b2drum w/ peri
msil [d'drum, d'perc]
{-
@b3
Anny FM: Battery 3
anny.audio
Battery 3
-}
bpm 125
@@ -243,7 +240,7 @@ d'arpy $ cf $
# n "2 1 3 1"
# gain 0.7
-- ~b1perc3
-- b1perc3
d'perc $ cf $
slow 2 . spread slow [2,4,2,3] $
jux (0.25 <~) $
@@ -263,27 +260,27 @@ d'bass $ cf $
# speed 1.2
# shape 0.2
-- ~b3bass @ (1)
-- b3bass @ 1
d'drum $ cf $ sound "[tok*2 [rm tok]] [psr:1 tok*2]"
# 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"
# speed 0.7
# shape (scale 0 0.5 $ slow (10/4) sine1)
# pan (scale 0.25 0.75 $ slow (8/3) sine1)
-- ~b1tac
-- b1tac
d'tac $ cf . whenmod 7 4 (density 1.5) $
s "[~ tacscan] ! ~ ~"
# gain 0.8
# vowel (slow 3 "e u")
-- ~b3arpy @ (1)
-- b3arpy @ 1
msil [d'bass, d'hand]
@@ -301,11 +298,11 @@ d'drum $ cf $
sound "[tok*2 [rm tok]] [psr:1 tok*2]"
# n (slow 3 $ run 4)
-- ~b1hand
-- ~b1perc3 @ (1)
-- b1hand
-- b1perc3 @ 1
-- ~b3bass
-- ~b1tac
-- b3bass
-- b1tac
-- @b3bassloud
d'bass $ cf $
@@ -332,30 +329,30 @@ d'drum $ cf $
msil [d'bass, d'arpy]
-- ~b3drumfull @ (5)
-- b3drumfull @ 5
d'hand silence
-- ~b2perc1
-- b2perc1
d'perc $ cf $
slow 2 . spread slow [2,4,2,3] $
jux (0.25 <~) $
slow 2 $ s "uxay [~ uxay] [psr uxay] ~"
# n (density 3 $ run 2)
-- ~b3drum2
-- b3drum2
d'drum $ cf $
overlay (slow 2 $ s "peri*2 [~ ~ ~ peri] [~ peri peri ~] ~") $
sound "[tok*2 [rm tok]] [psr:1 tok*2]"
# 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]
d'drum silence