Archived
303 lines
6.0 KiB
Plaintext
303 lines
6.0 KiB
Plaintext
cps (151/60)
|
|
|
|
d1 $ sound "[k {k, sn}]/2"
|
|
d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hhc]/2") $ sound "[k {k, sn}]/2"
|
|
|
|
d1 silence
|
|
d2 silence
|
|
|
|
d2 $ (sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|
|
d2 $ (within (0, 0.125) $ density 2 . chop 4) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|
|
d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hho]/2") $ sound "[k {k, sn}]/2"
|
|
|
|
d2 silence
|
|
|
|
d1 $ (overlay $ sound "[[~ hhc ~ hhc] [~ hhp]]/2") $ sound "[k {k, sn}]/2"
|
|
|
|
d2 $ (within (0, 0.125) $ density 2 . chop 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|
|
d2 $ (within (0, 0.125) $ density 2 . chop 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|
|
d3 $ whenmod 16 15 (density 3) $ smash 16 [0.5, 0.25] $ sound "hhp hho"
|
|
|+| gain "0.7"
|
|
|+| vowel "a"
|
|
|
|
d3 $ whenmod 16 15 (density 3) $ smash 16 [0.25, 0.5] $ sound "hhp hho"
|
|
|+| gain "0.7"
|
|
|+| vowel "a"
|
|
|
|
d2 $ (within (0, 0.125) $ density 2 . chop 4) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|+| shape "0.3"
|
|
|
|
d2 $ (within (0, 0.125) $ density 2 . chop 4) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|+| shape "0.3"
|
|
|+| vowel "[u i o]/2"
|
|
|
|
|
|
d2 $ --(within (0, 0.125) $ density 2 . chop 4) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|+| shape "0.3"
|
|
|+| vowel "[u i o]/2"
|
|
|
|
d2 $ every 4 (stut 4 0.8 0.5) $
|
|
(within (0, 0.125) $ density 2 . gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| speed ((+1).(/2) <$> density 3.1 saw1)
|
|
|+| shape "0.3"
|
|
|+| vowel "[u i o]/2"
|
|
|
|
d2 silence
|
|
|
|
d3 $ whenmod 16 15 (density 3)
|
|
$ smash 16 [0.25, 0.5]
|
|
$ sound "hhp hho"
|
|
|+| gain "0.7"
|
|
|+| vowel "a"
|
|
|
|
cps (100/60)
|
|
cps (150/60)
|
|
|
|
d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
|
|
d3 $ whenmod 16 15 (density 3)
|
|
$ smash 16 [0.25, 0.5]
|
|
$ sound "hhp hho"
|
|
|+| gain "0.7"
|
|
|+| vowel "a"
|
|
|
|
d3 $ whenmod 16 15 (density 3)
|
|
$ smash 16 [0.5, 0.25]
|
|
$ sound "hhp hho"
|
|
|+| gain "0.7"
|
|
|+| vowel "a"
|
|
|
|
d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
|
|
d2 $
|
|
-- (within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|
|
d2 silence
|
|
|
|
d4 $
|
|
whenmod 5 3 rev $
|
|
smash 32 [4,2,0.5] $ sound "[eg*3]/4"
|
|
|+| vowel "e u"
|
|
|
|
hush
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
--------- above sux
|
|
|
|
cps (151/60)
|
|
|
|
d1 $ sound "[k {k, sn}]/2"
|
|
|
|
d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hhc]/2") $ sound "[k {k, sn}]/2"
|
|
d1 $ (overlay $ (0.5 ~>) $ sound "[hhc hho]/2") $ sound "[k {k, sn}]/2"
|
|
|
|
d3 $ whenmod 16 15 (density 3) $ smash 16 [0.25, 0.5] $ sound "hhp hho"
|
|
|+| gain "0.7"
|
|
|+| vowel "a"
|
|
|
|
d2 $ sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5"
|
|
|
|
d2 $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|
|
d2 $
|
|
whenmod 2 1 (density 2) $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|
|
-- oh shit dog
|
|
d2 $
|
|
(within (0.5, 1.5) $ rev) $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|
|
d2 $
|
|
(within (0.5, 1.5) $ rev) $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|
|
d3 $
|
|
whenmod 16 15 (density 3) $
|
|
smash 16 [0.25, 0.5] $
|
|
sound "hhp hho"
|
|
|+| gain "0.6"
|
|
|+| vowel "a"
|
|
|
|
cps (100/60)
|
|
|
|
d1 $ --(overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
|
|
d3 silence
|
|
|
|
d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
|
|
d2 $
|
|
(within (0.5, 1.5) $ rev) $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|
|
d2 $
|
|
(within (0.5, 1.5) $ rev) $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| shape ((/3) <$> slow 16 saw1)
|
|
|+| vowel "[i o]*2"
|
|
|
|
d3 $
|
|
whenmod 16 15 (density 3) $
|
|
smash 16 [0.25, 0.5] $
|
|
sound "hhp hho"
|
|
|+| gain "0.6"
|
|
|+| vowel "a"
|
|
|+| shape ((/2) <$> slow 8 saw1)
|
|
|
|
d4 $
|
|
whenmod 5 3 rev $
|
|
smash 32 [4,2,0.5] $ sound "[eg*2]/4"
|
|
|+| gain "0.7"
|
|
|
|
d1 $ stack [
|
|
sound "[[~ hhc ~ hho] [~ hhp]]/2",
|
|
whenmod 6 5 (density 2) $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
]
|
|
|
|
d4 $
|
|
-- gap 4 $ -- fuck about with gap a bit to elongate shit
|
|
whenmod 5 3 rev $
|
|
smash 32 [4,2,0.5] $ sound "[eg*2]/4"
|
|
|+| gain "0.7"
|
|
|
|
-- i apologise for my limited vocabulary
|
|
|
|
d4 $
|
|
(every 2 $ stut 4 0.8 0.5) $
|
|
whenmod 5 3 rev $
|
|
smash 32 [4,2,0.5] $ sound "[eg*2]/4"
|
|
|+| gain "0.7"
|
|
|
|
d1 $ (overlay $ sound "[[~ hhc ~ hho] [~ hhp]]/2") $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
|
|
d1 $ sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
d4 silence
|
|
d2 silence
|
|
d3 silence
|
|
|
|
d4 $
|
|
density 2 $
|
|
(every 2 $ stut 4 0.8 0.5) $
|
|
whenmod 5 3 rev $
|
|
smash 32 [4,2,0.5] $
|
|
sound (samples "[eg*2]/4" (slow 4 $ run 5))
|
|
|+| gain "0.7"
|
|
|+| vowel "u"
|
|
|
|
d1 $ stack [
|
|
whenmod 5 4 rev $
|
|
sound "[hhc hho]*2"
|
|
|+| gain "[0.8 1]/2",
|
|
whenmod 6 5 (density 2) $
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
]
|
|
|
|
d2 $
|
|
(within (0.5, 1.5) $ rev) $
|
|
(within (0, 0.5) $ gap 16) $
|
|
(sound $ samples "[[~ wb ~ ~] wb]/2" "[0 4 1 3 2]/5")
|
|
|+| shape ((/3) <$> slow 16 saw1)
|
|
|+| vowel "[i o]*2"
|
|
|
|
d3 silence
|
|
|
|
d1 $ sound "cy/4"
|
|
|
|
d1 $ (overlay $ sound "cy/4") $ sound "k"
|
|
|
|
d3 $
|
|
whenmod 16 15 (density 3) $
|
|
smash 16 [0.25, 0.5] $
|
|
-- smash 16 [0.5, 0.25] $
|
|
sound "hhp hho"
|
|
|+| gain "0.6"
|
|
|+| vowel "a"
|
|
|+| shape ((/2) <$> slow 8 saw1)
|
|
|
|
d1 $ stack [
|
|
sound "cy/4",
|
|
sound "[[k ~ ~ k] {k*2, sn}]/2"
|
|
]
|
|
|
|
d4 silence
|
|
|
|
cps (133/60)
|
|
cps (155/60)
|
|
|
|
d1 $
|
|
(overlay $ (1 ~>) $ sound "cy/8") $
|
|
-- sound "[k {k, sn}]/2"
|
|
sound "[k [sn k] [~ k] sn]/4"
|
|
|
|
d2 $
|
|
whenmod 16 15 (density 3) $
|
|
smash 16 [0.25, 0.5] $
|
|
-- smash 16 [0.5, 0.25] $
|
|
sound "hhp hho"
|
|
|+| gain "0.6"
|
|
|+| vowel (slow 3.1 "a u i")
|
|
|+| shape ((/2) <$> slow 7.5 saw1)
|
|
|
|
|
|
d2 $
|
|
|
|
hush
|
|
|
|
-- thanks for sticking around charlie ya ledge
|
|
--
|
|
|+| shape ((/2) <$> slow 7.5 saw1)
|