Archived
initial commit with all the bits
This commit is contained in:
Aneurin Barker Snook
@@ -0,0 +1,82 @@
|
||||
bps (150/60)
|
||||
|
||||
--
|
||||
-- drum
|
||||
--
|
||||
|
||||
-- 4 to floor
|
||||
d1 $ stack [
|
||||
superimpose (slow 1) $ sound "house*2",
|
||||
0.5 ~> sound "cp"
|
||||
]
|
||||
|
||||
-- marching drum
|
||||
d1 $ stack [
|
||||
slow 2 $ sound "house house [house [house]/2] house",
|
||||
brak $ 0.5 ~> sound (pick <$> "sn*3 cp" <*> (spread iter [2,2,3]) "15 4 3 8")
|
||||
-- |+| shape ((/1.2) <$> slow 8 sinewave1)
|
||||
|+| resonance (slow 2 sinewave1)
|
||||
]
|
||||
|
||||
-- crazy ass drum
|
||||
d1 $ slow 1 $ stack [
|
||||
sound "house*2",
|
||||
jux (spread slow [3,5] . rev) $ every 3 (striate 3) $ every 2 (brak) $ sound "house*2",
|
||||
0.5 ~> sound "cp"
|
||||
--sound "hh*4 [cp hh*2]"
|
||||
]
|
||||
|
||||
-- kinda funky
|
||||
d1 $ overlay (interlace (sound "rm*3") (sound "hh*3")) $ sound "house*2"
|
||||
|
||||
--
|
||||
-- fwonk
|
||||
--
|
||||
|
||||
-- cool fwonk lewp
|
||||
d2 $ every 3 (|+| resonance "0.5") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| shape ((/3) <$> sinewave1)
|
||||
|
||||
-- weird fwonks
|
||||
d2 $ every 5 (jux rev) $ every 3 (|+| resonance "0.4") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> slow 5 "2 4 6 9")
|
||||
|+| vowel "a e"
|
||||
|+| shape ((/3) <$> sinewave1)
|
||||
|
||||
-- spaced fwonk
|
||||
d2 $ jux (iter 3) $ slow 4 $ interlace (sound "fwonk/1 space*2") (0.5 ~> sound "[space/2 fwonk*2]")
|
||||
|+| vowel "a"
|
||||
|+| resonance "0.5"
|
||||
|+| shape "0.2"
|
||||
|+| pan (density 3 sinewave1)
|
||||
|
||||
--
|
||||
-- wind
|
||||
--
|
||||
|
||||
-- nice
|
||||
d3 $ every 3 (jux rev) $ smash 10 [1,2] $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> (spread density [3,4] . iter 3) "0 2 4 6 8 9")
|
||||
|+| shape ((/2) <$> slow 3 sinewave1)
|
||||
|
||||
-- nice in 4/4
|
||||
d3 $ slow 2 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> slow 2 "0 2 4 5 7 1 3 5")
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|
||||
-- simple wind 4/4
|
||||
d3 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> density 2 "0 1 2 3 7")
|
||||
|+| vowel "e u"
|
||||
|+| resonance ((/1.2) <$> sinewave1)
|
||||
|
||||
--
|
||||
-- space - n.b. samples are way too loud
|
||||
--
|
||||
|
||||
-- Sweet space break #1
|
||||
d4 $ spread striate [3,4] $ sound (pick <$> "space invaders" <*> spread density [2,2,5] "0 2 4 5 8 15 7")
|
||||
|+| vowel "e"
|
||||
|+| resonance "0.2"
|
||||
|
||||
-- Sweet space break #2
|
||||
d4 $ striate 4 $ sound (pick <$> "[space invaders]*3" <*> spread density [2,3,5] "0 2 4 6")
|
||||
|+| vowel "e"
|
||||
|+| resonance "0.2"
|
||||
@@ -0,0 +1,106 @@
|
||||
bps (150/60)
|
||||
|
||||
--
|
||||
-- drum
|
||||
--
|
||||
|
||||
-- 4 to floor
|
||||
d1 $ stack [
|
||||
superimpose (slow 1) $ sound "house*2",
|
||||
0.5 ~> sound "cp"
|
||||
]
|
||||
|
||||
-- marching drum
|
||||
d1 $ stack [
|
||||
sound "house*2",
|
||||
--slow 2 $ sound "house house [house [house]/2] house",
|
||||
brak $ 0.5 ~> sound (pick <$> "sn*3 cp" <*> (spread iter [2,2,3]) "15 4 3 8")
|
||||
-- |+| shape ((/1.2) <$> slow 8 sinewave1)
|
||||
|+| resonance (slow 2 sinewave1)
|
||||
]
|
||||
|
||||
-- crazy ass drum
|
||||
d1 $ slow 1 $ stack [
|
||||
sound "house*2",
|
||||
jux (spread slow [3,5] . rev) $ every 3 (striate 3) $ every 2 (brak) $ sound "house*2",
|
||||
0.5 ~> sound "cp"
|
||||
--sound "hh*4 [cp hh*2]"
|
||||
]
|
||||
|
||||
-- *much* better crazy drum
|
||||
d1 $ stack [
|
||||
sound "house*2",
|
||||
jux (spread slow [3,5] . rev) $ every 3 (striate 3) $ every 2 (brak) $ sound "{rm*2, hh*4}",
|
||||
0.5 ~> sound "cp"
|
||||
]
|
||||
|
||||
--
|
||||
-- fwonk
|
||||
--
|
||||
|
||||
-- cool fwonk lewp
|
||||
d2 $ every 3 (|+| resonance "0.5") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| shape ((/3) <$> sinewave1)
|
||||
|
||||
-- cool #2 (more staccato, aggressive)
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] (run 4))
|
||||
|+| vowel "a u o"
|
||||
|+| shape ((/2) <$> sinewave1)
|
||||
|
||||
-- weird fwonks
|
||||
d2 $ every 5 (jux rev) $ every 3 (|+| resonance "0.4") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> slow 5 "2 4 6 9")
|
||||
|+| vowel "a e"
|
||||
|+| shape ((/3) <$> sinewave1)
|
||||
|
||||
-- spaced fwonk
|
||||
d2 $ jux (iter 3) $ slow 4 $ interlace (sound "fwonk/1 space*2") (0.5 ~> sound "[space/2 fwonk*2]")
|
||||
|+| vowel "a"
|
||||
|+| resonance "0.5"
|
||||
|+| shape "0.2"
|
||||
|+| pan (density 3 sinewave1)
|
||||
|
||||
--
|
||||
-- wind
|
||||
--
|
||||
|
||||
d1 $ stack [
|
||||
sound "house*2",
|
||||
0.5 ~> sound "cp"
|
||||
]
|
||||
|
||||
d3 $ every 3 (jux rev) $ smash 10 [1,2] $ slow 1 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> (spread density [3,4] . iter 3) "0 2 4 6 8 9")
|
||||
|+| shape ((/2) <$> slow 3 sinewave1)
|
||||
|
||||
-- nice
|
||||
d3 $ every 3 (jux rev) $ smash 10 [1,2] $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> (spread density [3,4] . iter 3) "0 2 4 6 8 9")
|
||||
|+| shape ((/2) <$> slow 3 sinewave1)
|
||||
|
||||
-- nice in 4/4
|
||||
d3 $ slow 2 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> slow 2 "0 2 4 5 7 1 3 5")
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|
||||
-- simple wind 4/4
|
||||
d3 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> density 2 "0 1 2 3 7")
|
||||
|+| vowel "e u"
|
||||
|+| resonance ((/1.2) <$> sinewave1)
|
||||
|
||||
--
|
||||
-- space - n.b. samples are way too loud
|
||||
--
|
||||
|
||||
-- Sweet space break #1
|
||||
d4 $ spread striate [3,4] $ sound (pick <$> "space invaders" <*> spread density [2,2,5] "0 2 4 5 8 15 7")
|
||||
|+| vowel "e"
|
||||
|+| resonance "0.2"
|
||||
|
||||
-- Sweet space break #2
|
||||
d4 $ striate 4 $ sound (pick <$> "[space invaders]*3" <*> spread density [2,3,5] "0 2 4 6")
|
||||
|+| vowel "e"
|
||||
|+| resonance "0.2"
|
||||
|
||||
d4 $ sound "invaders"
|
||||
-- velocity does nothing??
|
||||
-- |+| velocity (run 10)
|
||||
-- gain not in scope
|
||||
-- |+| gain "0"
|
||||
@@ -0,0 +1,25 @@
|
||||
bps (146/60)
|
||||
|
||||
d1 $ every 2 (density 2) $ sound "wobble"
|
||||
|+| speed ((+0.3).(*1.3) <$> slow 4 sinewave1)
|
||||
|+| shape "0.5"
|
||||
|
||||
d2 $ spread slow [2,1] $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|+| speed ((/) <$> slow 5 sinewave1 <*> "3 2 1")
|
||||
|
||||
d3 $ stack [
|
||||
jux (slow 1.5 . iter 6) $ every 4 (rev) $ sound "[house rm*2] [sn house]",
|
||||
sound "house*2"
|
||||
]
|
||||
|
||||
d4 $ every 3 (|+| vowel "a") $ every 2 (density 2) $ sound (pick <$> "fwonk fwonk*2" <*> slow 5 (run 3))
|
||||
|+| resonance ((/2) <$> slow 3 sinewave)
|
||||
|+| shape ((/3) <$> slow 4 sinewave1)
|
||||
|+| speed "1.6"
|
||||
|
||||
hush
|
||||
|
||||
-- fwónk
|
||||
-- recorded for the cauldron challenge 001 (soundcloud.com/fwonkrecords/sets/the-cauldron-challenge-001)
|
||||
-- song in emacs + tidal by anny fm (anny.fm, soundcloud.com/anny-fm)
|
||||
@@ -0,0 +1,59 @@
|
||||
bps (153/60)
|
||||
|
||||
-- wind cans. unsure whether to keep this
|
||||
d1 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> (spread density [3,4] . iter 3) "0 2 4 6 8 9")
|
||||
|+| shape ((/2) <$> slow 3 sinewave1)
|
||||
|
||||
-- standard fwonk loop
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| shape ((/3) <$> slow 3 sinewave1)
|
||||
|
||||
-- out of sync deliberately
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 1.9 $ sound (pick <$> "fwonk [fwonk/2]*2 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| resonance ((/2) <$> slow 2 sinewave1)
|
||||
|+| shape ((/3) <$> slow 3 sinewave1)
|
||||
|
||||
-- excellent
|
||||
d3 $ stack [
|
||||
spread slow [1,1.1] $ every 2 brak $ sound "{rm*2, hh*4}",
|
||||
sound "house*2",
|
||||
brak $ 0.5 ~> sound (pick <$> "rm*3 sn/9" <*> spread iter [2,2,3] (run 4))
|
||||
]
|
||||
|
||||
-- kinda cool bassy
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 4 $ sound (pick <$> "wobble*4" <*> slow 2 "1 3 5 15")
|
||||
-- |+| vowel "o"
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
|
||||
-- ok this actually turned out pretty good
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 4 $ sound (pick <$> "psr wobble*4" <*> slow 2 "1 3 5 15")
|
||||
-- |+| vowel "o"
|
||||
|+| end "0.4"
|
||||
-- |+| end "0.8" -- heavier
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
-- also try slow 3.7
|
||||
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 3.7 $ sound (pick <$> "psr wobble*4" <*> spread slow [2,1,2] (run 5))
|
||||
|+| end "0.8"
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
|
||||
--
|
||||
-- composition notes
|
||||
--
|
||||
|
||||
-- start slow
|
||||
d3 $ slow 2 $ stack [
|
||||
sound "house*2 [sn/9 ~ [house]/2]"
|
||||
]
|
||||
|
||||
d3 $ slow 2 $ stack [
|
||||
sound "house*2 [sn/9 ~ ~ ~ [house]/2]"
|
||||
]
|
||||
|
||||
-- speed up a bit
|
||||
d3 $ stack [
|
||||
sound "house*2",
|
||||
slow 2 $ 0.5 ~> sound "sn/9"
|
||||
]
|
||||
@@ -0,0 +1,141 @@
|
||||
bps (146/60)
|
||||
|
||||
--
|
||||
-- drum
|
||||
--
|
||||
|
||||
d1 $ sound "house [~ house]"
|
||||
|
||||
d1 $ sound "house [sn:2 house]"
|
||||
|
||||
d1 $ sound "[house hh*2] [sn:2 house]"
|
||||
|
||||
d1 $ every 4 rev $ sound "[house hh*2] [sn:2 house]"
|
||||
|
||||
-- ooh
|
||||
d1 $ jux (slow 1.5 . iter 6) $ every 4 rev $ sound "[house hh*2] [sn:2 house]"
|
||||
-- "mono" copy
|
||||
d1 $ superimpose (slow 1.5 . iter 6) $ every 4 rev $ sound "[house hh*2] [sn:2 house]"
|
||||
|
||||
d1 $ every 2 (slow 2 . brak) $ jux (slow 1.5 . iter 6) $ every 4 rev $ sound "[house rm*2] [sn:2 house]"
|
||||
|
||||
-- nah
|
||||
--d1 $ superimpose (iter 4) $ every 4 rev $ sound "[house hh*2] [sn:2 house]"
|
||||
--d1 $ superimpose (slow 1.5 . iter 6) $ every 4 rev $ sound "[house hh*2] [sn:2 house]"
|
||||
|
||||
--
|
||||
-- fwonk
|
||||
--
|
||||
|
||||
d2 $ sound "fwonk:2"
|
||||
|
||||
d2 $ sound "fwonk:2 fwonk:2*2"
|
||||
|
||||
d2 $ sound (pick <$> "fwonk fwonk*2" <*> slow 7 (run 3))
|
||||
|
||||
d2 $ every 2 (density 2) $ sound (pick <$> "fwonk fwonk*2" <*> slow 7 (run 3))
|
||||
|
||||
d2 $ every 2 (density 2) $ sound (pick <$> "fwonk fwonk*2" <*> slow 7 (run 3))
|
||||
|+| resonance ((/2) <$> slow 3 sinewave)
|
||||
|
||||
d2 $ every 2 (density 2) $ sound (pick <$> "fwonk fwonk*2" <*> slow 7 (run 3))
|
||||
|+| resonance ((/2) <$> slow 3 sinewave)
|
||||
|+| shape ((/3) <$> slow 4 sinewave1)
|
||||
|
||||
d2 $ every 3 (|+| vowel "a") $ every 2 (density 2) $ sound (pick <$> "fwonk fwonk*2" <*> slow 7 (run 3))
|
||||
|+| resonance ((/2) <$> slow 3 sinewave)
|
||||
|+| shape ((/3) <$> slow 4 sinewave1)
|
||||
|
||||
d2 $ every 3 (|+| vowel "a") $ every 2 (density 2) $ sound (pick <$> "fwonk fwonk*2" <*> slow 7 (run 3))
|
||||
|+| resonance ((/2) <$> slow 3 sinewave)
|
||||
|+| shape ((/3) <$> slow 4 sinewave1)
|
||||
|+| speed "1.8"
|
||||
|
||||
--
|
||||
-- wind
|
||||
--
|
||||
|
||||
d3 $ slow 4 $ sound "wind"
|
||||
|
||||
d3 $ slow 4 $ sound "wind can"
|
||||
|
||||
d3 $ slow 4 $ sound "wind [can can*2]"
|
||||
|
||||
d3 $ slow 4 $ sound "[wind]/2 [can can*2]"
|
||||
|
||||
d3 $ slow 4 $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 3 (run 4))
|
||||
|
||||
d3 $ slow 4 $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|
||||
d3 $ slow 3 $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|
||||
d3 $ spread slow [3,2] $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|
||||
d3 $ spread slow [2,1] $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|
||||
d3 $ spread slow [2,1] $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|
||||
d3 $ spread slow [2,1] $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|+| vowel "o u"
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|
||||
d3 $ spread slow [2,1] $ sound (pick <$> "[wind]/2 [can can*2]" <*> slow 5 (run 8))
|
||||
|+| vowel "o u"
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|+| speed ((/) <$> slow 5 sinewave1 <*> "3 2 1")
|
||||
|
||||
--
|
||||
-- bass
|
||||
--
|
||||
|
||||
d5 $ sound "wobble"
|
||||
|+| speed ((+0.3).(*1.3) <$> slow 4 sinewave1)
|
||||
|
||||
d5 $ every 2 (density 2) $ sound "wobble"
|
||||
|+| speed ((+0.3).(*1.3) <$> slow 4 sinewave1)
|
||||
|
||||
d5 $ brak $ every 2 (density 2) $ sound "wobble"
|
||||
|+| speed ((+0.3).(*1.3) <$> slow 4 sinewave1)
|
||||
|
||||
d5 $ brak $ every 2 (density 2) $ sound "wobble"
|
||||
|+| speed ((+0.3).(*1.3) <$> slow 4 sinewave1)
|
||||
|+| shape "0.4"
|
||||
|
||||
-- ugh
|
||||
d5 $ every 2 (|+| resonance "1") $ every 4 (density 1.1) $ brak $ every 2 (density 2) $ sound "wobble"
|
||||
|+| speed ((+0.3).(*1.3) <$> slow 4 sinewave1)
|
||||
|
||||
--
|
||||
-- lol
|
||||
--
|
||||
|
||||
d5 $ spread density [1,2,1] $ sound (pick <$> "metal*2" <*> slow 6 (run 5))
|
||||
|
||||
d5 $ spread density [1,2,1] $ sound (pick <$> "newnotes*2" <*> slow 6 (run 5))
|
||||
|
||||
d5 $ spread density [1,1,2] $ sound (pick <$> "newnotes metal" <*> slow 8 (run 5))
|
||||
|
||||
--
|
||||
-- click
|
||||
-- (maybe save this for a 4-to-floor track)
|
||||
|
||||
d4 $ sound "click"
|
||||
|
||||
d4 $ sound (pick <$> "click" <*> slow 5 (run 4))
|
||||
|
||||
d4 $ density 2 $ sound (pick <$> "click" <*> slow 5 (run 4))
|
||||
|
||||
d4 $ spread density [1,1,2] $ sound (pick <$> "click" <*> slow 5 (run 4))
|
||||
|
||||
d4 $ spread density [1,2,1] $ sound (pick <$> "click" <*> slow 5 (run 4))
|
||||
|
||||
-- more drums
|
||||
-- kinda shit but possible evolution
|
||||
|
||||
d1 $ jux (slow 1.5 . iter 6) $ every 4 rev $ sound (pick <$> "[house hh*2] [sn:2 house]" <*> slow 2 (run 4))
|
||||
|
||||
d1 $ stack [
|
||||
jux (slow 1.5 . iter 6) $ every 4 rev $ 0.2 ~> sound (pick <$> "[rm hh*2] [sn:2 rm]" <*> slow 2 (run 4)),
|
||||
sound "house*2"
|
||||
]
|
||||
@@ -0,0 +1,33 @@
|
||||
bps (153/60)
|
||||
|
||||
-- wind cans. unsure whether to keep this
|
||||
d1 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> (spread density [3,4] . iter 3) "0 2 4 6 8 9")
|
||||
|+| shape ((/2) <$> slow 3 sinewave1)
|
||||
|
||||
-- standard fwonk loop
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| shape ((/3) <$> sinewave1)
|
||||
|
||||
-- out of sync deliberately
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 1.9 $ sound (pick <$> "fwonk [fwonk/2]*2 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| resonance ((/2) <$> slow 2 sinewave1)
|
||||
|+| shape ((/3) <$> slow 3 sinewave1)
|
||||
|
||||
-- excellent
|
||||
d3 $ stack [
|
||||
spread slow [1,1.1] $ every 2 brak $ sound "{rm*2, hh*4}",
|
||||
sound "house*2",
|
||||
brak $ 0.5 ~> sound (pick <$> "rm*3 sn/9" <*> spread iter [2,2,3] (run 4))
|
||||
]
|
||||
|
||||
-- kinda cool bassy
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 4 $ sound (pick <$> "wobble*4" <*> slow 2 "1 3 5 15")
|
||||
-- |+| vowel "o"
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
|
||||
-- is this bass any good at all???
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 12 $ sound "wobble*4"
|
||||
-- |+| vowel "u"
|
||||
|+| shape ((/2) <$> spread density [0.5,4,3] sinewave1)
|
||||
@@ -0,0 +1,98 @@
|
||||
bps (153/60)
|
||||
|
||||
-- wind cans. unsure whether to keep this
|
||||
d1 $ sound (pick <$> "[wind]/2 [can*2 [can/2]*2]" <*> (spread density [3,4] . iter 3) "0 2 4 6 8 9")
|
||||
|+| shape ((/2) <$> slow 3 sinewave1)
|
||||
|
||||
-- standard fwonk loop
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 2 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| shape ((/3) <$> slow 3 sinewave1)
|
||||
|
||||
-- out of sync deliberately
|
||||
d2 $ every 3 (|+| resonance "0.3") $ slow 1.9 $ sound (pick <$> "fwonk [fwonk/2]*2 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
|+| resonance ((/2) <$> slow 2 sinewave1)
|
||||
|+| shape ((/3) <$> slow 3 sinewave1)
|
||||
|
||||
-- excellent
|
||||
d3 $ stack [
|
||||
spread slow [1,1.1] $ every 2 brak $ sound "{rm*2, hh*4}",
|
||||
sound "house*2",
|
||||
brak $ 0.5 ~> sound (pick <$> "rm*3 sn/9" <*> spread iter [2,2,3] (run 4))
|
||||
]
|
||||
|
||||
-- kinda cool bassy
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 4 $ sound (pick <$> "wobble*4" <*> slow 2 "1 3 5 15")
|
||||
-- |+| vowel "o"
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
|
||||
-- ok this actually turned out pretty good
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 4 $ sound (pick <$> "psr wobble*4" <*> slow 2 "1 3 5 15")
|
||||
-- |+| vowel "o"
|
||||
|+| end "0.4"
|
||||
-- |+| end "0.8" -- heavier
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
-- also try slow 3.7
|
||||
|
||||
d4 $ jux (slow (13%12) . rev) $ striate 6 $ slow 3.7 $ sound (pick <$> "psr wobble*4" <*> spread slow [2,1,2] (run 5))
|
||||
|+| end "0.8"
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
|
||||
--
|
||||
-- composition notes
|
||||
--
|
||||
|
||||
-- start slow
|
||||
d3 $ slow 2 $ stack [
|
||||
sound "house*2 [sn/9 ~ [house]/2]"
|
||||
]
|
||||
|
||||
d3 $ slow 2 $ stack [
|
||||
sound "house*2 [sn/9 ~ ~ ~ [house]/2]"
|
||||
]
|
||||
|
||||
-- speed up a bit
|
||||
d3 $ stack [
|
||||
sound "house*2",
|
||||
slow 2 $ 0.5 ~> sound "sn/9"
|
||||
]
|
||||
|
||||
--
|
||||
-- some shit i did night of monday 17th feb
|
||||
--
|
||||
|
||||
d1 $ jux (slow (13%12) . rev) $ striate 6 $ slow 3 $ sound "psr wobble*4"
|
||||
|+| end "0.8"
|
||||
|+| shape ((/2) <$> slow 4 sinewave1)
|
||||
|
||||
-- 130bpm
|
||||
d2 $ stack [
|
||||
sound "house*2",
|
||||
sound "bd*6",
|
||||
0.5 ~> sound (pick <$> "rm*3 sn/9" <*> spread iter [2,2,3] (run 4)),
|
||||
sound "{rm*2, hh*4}"
|
||||
]
|
||||
|
||||
d2 $ stack [
|
||||
--superimpose brak $ sound "house*2",
|
||||
brak $ sound "fwonk*2 sn/9",
|
||||
every 4 (density 2) $ sound "hh*4"
|
||||
]
|
||||
|
||||
d1 $ sound "[fwonk/3] cp*2, cp*16"
|
||||
|+| shape ((/2) <$> slow 4 sinewave)
|
||||
|
||||
d3 $ slow 1.9 $ sound (pick <$> "fwonk*2 [fwonk/2]*3 fwonk/1" <*> spread slow [2,3,5] "1 2 3 4 5 10")
|
||||
|+| vowel "a"
|
||||
-- |+| resonance ((/3) <$> slow 3 sinewave1)
|
||||
|+| shape ((/2) <$> slow 2 sinewave1)
|
||||
|
||||
d4 $ slow 1.5 $ sound (pick <$> "[wind]/2 [can [can/2]*2]" <*> spread density [2,3] "1 4 5 8")
|
||||
|+| shape ((/2) <$> slow 1.2 sinewave1)
|
||||
|
||||
d2 $ sound "house*8"
|
||||
|
||||
d1 $ spread density [1,2] $ striate 5 $ sound "fwonk/3 fwonk/2 wobble*3"
|
||||
|+| vowel "a"
|
||||
|+| shape ((/1.3) <$> slow 4 sinewave1)
|
||||
Reference in New Issue
Block a user