Skip to content
Permalink
Branch: master
Find file Copy path
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
323 lines (277 sloc) 5.65 KB
hush
d1
$ s "uni:1"
# gain "0.6"
# cps(132/120)
-- Live codeing desu!!
d1
$jux ((5/8) ~>)
$slow 4
$s "sfh(3, 8)"
#gain "0.7"
#n (irand 200)
#pan (range 0.4 0.6 $rand)
#up "[7, 0, 12]"
#speed "[1.01, 1.0]"
#lpf "18000"
d2
$slow 8
$sound "empty"
#speed "[1.0, 1.01]"
#gain "0.9"
#lpf "2000"
d3
$slow 2
$jux ((3/8) ~>)
$sound "autech2(3, 8, [0, 5])"
#gain "0.75"
#speed "[1.0, 1.001]"
|*|speed "[-1.0, 1.5]"
#n "{0 2 3}%5"
#lpf (range 400 10000 $slow 8 $sine)
#speed "[1.005, 1.0]"
#n "{0}%7"
#lpf (range 400 18000 $slow 4 $sine) #resonance "0.1"
|*|speed "[-1.0, 1.5]"
d4
$sometimesBy 0.6 (jux ((3/8) ~>))
$sound "uni(3, 8)"
#n "1 2"
#gain "1.0"
#delay "0.3" #delaytime "{0.005 0.02 0.01}%4" #delayfeedback "0.9"
d2
-- $sometimesBy 0.2 (jux ((3/8)~>))
$slow 2
$stack
[
s "distd(4, 16)" #gain "1.7",
sometimes (jux ((5/8) ~>))
$jux (rev)
$s "uni(5, 16, [0, 6, 9, 12])"
#n "{1 2 3}%6"
#gain "1.2"
#up "{0 -7 7 12}%7"
]
|*| gain "1.0"
-- #hpf 1000
-- |*| gain "<1 1 1 1 1 1 1 0>"
d1
$ sound "tet(5, 8, {0, 2})"
#gain "1.2"
#lpf (range 1200 15000 $slow 16 $sine) #resonance "0.1"
#up "{[0, 7][7, 12]}%5"
#n "{0 1 2}%5"
d3
$jux ((3/8) <~)
$sound "jimsyn(5, 8)"
#n "<20 1>"
|*| up "-0.2"
|*| gain "1.1"
#lpf (range 2000 8000 $slow 12 $sine)
#resonance "0.1"
do
let chord1 = "c'maj7 g'sus2"
d4
$slow 2
$stack
[
sound "supersaw(3,16,{0,8})" # note chord1 |+|note "12",
sound "supersaw(3,16,{2,5})" # note chord1 |+|note "7",
sound "supersaw(3,16,{0,3})" # note chord1 |+|note "0"
]
#sustain "0.08"
#gain "0.9"
#lpf (range 800 8000 $slow 16 $sine)
#resonance "0.2"
d2
$slow 2
$sometimesBy 0.5 ((5/8) <~)
$stack
[
-- s "tabla2(5, 16, {0})" #gain "1.3" #n (irand 30),
-- s "kon(5, 16, [0, 10])" #n "{0 3 5}%5" #gain "1.4",
s "uni(6, 16)" #gain "1.5",
s "uni uni ~ uni ~ uni ~ uni" #n 1 #gain "1.3"
]
|*|gain "1.0"
-- #hpf 4000
d3
$jux ((5/8) ~>)
$slow 2
$s "deepsyn(5, 16, [0, 5])"
#gain "0.9"
#n "<6 7 8 9>*4"
#up "[19, 24]"
#speed "[1.01, 1.0]"
#lpf (range 300 8000 $slow 8 $rand) #resonance "0.3"
d4
-- $every 8 (jux (rev))
-- $sometimesBy 0.2 ((5/8) <~)
$stack
[
s "distd*2",
s "bd cp bd hc" #n (irand 12),
s "uni(3, 8, {0, 3})"
#n "0 0 0 1 0 3 1 2"
]
#gain "<1 1 1 1 1 1 0 0>"
|*|gain "1.2"
d1
$stack
[
s "super808(5, 8, 3)" #n "{-12 -7 -5 0 5 7}%3",
s "ifdrums(3, 8, 0)" #n "{1 2 3}%4",
slow 2 $s "ifdrums(2, 8)" #gain "1.5"
]
#shape "0.5"
#gain "1.0"
do
let chord2 = "c3'sus2 g'sus4"
d3
$slow 2
$jux ((5/8) ~>)
$s "superhammond(5, 16, [0, 10])" #note chord2 |+|note "[0, 7]"
#lpf (range 500 18000 $slow 16 $sine)
#resonance "0.3"
#voice 3
#gain "0.9"
|+|note "{0 -12 12 -7 7}%16"
d4
$chop 12
$jux (rev)
$s "eh(5, 8, {4, 8})"
#n "{4 3 1}%9"
#pan (rand)
#gain "0.9"
d5
$jux (rev)
$s "superwho*8"
#sustain "0.1"
#note "{0 -5 -7 -12 -17 -19}%9"
|+| note "[0, 9, 12]"
-- #voice (range 0.1 0.8 $slow 24 $sine)
#cutoff (range 400 18000 $slow 32 $sine)
#resonance "0.1"
#gain "1.2"
#voice "{7 0 12 5 19 24}%9"
unsolo 5
do
d5 silence
d6 silence
let
pat1 = "{0 ~ ~ 0 ~ ~ 0 ~ 0 0 ~ 0 ~ ~}%8"
d1
$sometimesBy 0.1 (rev)
$sometimesBy 0.4 (0.25 <~)
$stack
[
s "uni(5, 8)" #n "{0 1 2}%8",
s "distd(2, 8)" |*|gain "1.8" #voice "4" #sustain "0.2",
s "[~ uni:1]*2"
]
#shape "0.5"
|*|gain "0.5"
d2
$every 3 (jux (0.125 ~>))
$stack
[
up pat1
# s "bfm"
|+| note (choose [12, 0, -12, -24, -36])
|+| note "{0, 5, 7, 9}"
]
#sustain (choose [0.05, 0.12, 0.15])
#pitch1 (choose [0.33, 3.33, 19.33])
#voice (choose [30, 1000, 4000, 12000])
#delay "0.8"
#delaytime (choose [0.01, 0.03, 0.02, 0.008])
#delayfeedback "0.8"
|*|gain "1.0"
#room "0.4"
#size "0.2"
do
let
pat2 = "{0 ~ 0 ~ ~ 0 ~ 0 ~ ~}%8"
d3
$every 4 (jux (0.125 ~>))
$up pat2
# s "superzow"
|+| note (choose [19, 12, 0])
|+| note "{0, 7, 11}"
#sustain (choose [0.08, 0.12, 0.3])
#shape "0.8"
#lpf (range 1000 20000 $rand)
#resonance "0.4"
#detune "10"
#accelerate (choose [0, 0, 1, 4]) #slide "1"
#gain "1.0"
do
let
pat3 = "{0 ~ 0 ~ ~ 0 0 ~ 0}%8"
d4
$sometimesBy 0.4 (jux (0.125 ~>))
$up pat3
# s "supersiren"
# sustain "0.15"
# note "{0,5,7,9,11}"
|+| note (choose [0, 5, 7, 9, 11])
|+| note (choose [-12, -24, 0, 12, 24])
#pan (rand)
#gain "0.0"
d5
$s "{superzow*8, uni:1*8}"
#n "{0,5,7,9,11}"
|+|n "{-12,0,12,24,48}"
#sustain "0.08"
#gain (range 0.0 2.5 $slow 24 $saw)
-- #vowel "{a i u e o}%12"
#room "0.2"
#size "0.2"
d5 silence
d4
$slow 2
$jux ((3/8) ~>)
$sound "autech2(3, 8, [0, 5, 10])"
#gain "1.1"
#speed "[1.005, 1.0]"
#n "{0 1 2 3}%7"
#lpf (range 400 18000 $slow 4 $sine) #resonance "0.1"
|*|speed "[-1.0, 3]"
#shape "0.5"
d3
$slow 2
$jux (rev)
-- $sometimesBy 0.2 (jux ((3/8)~>))
-- $sometimesBy 0.1 ((3/8) <~)
$stack
[
s "uni(4, 16)" #gain "1.7" #shape "0.9",
sometimes (jux ((5/8) ~>))
$s "uni(5, 16, [0, 6, 9, 12])"
#note "{1 2 3}%6"
#gain "1.2"
#up "{0 -7 7 12}%7"
]
-- |*| gain "<1 1 1 1 1 1 1 0>"
|*| gain "1.2"
#shape "0.8"
#hpf 1000
d1
$jux ((5/8) ~>)
$slow 4
$s "sfh(3, 8)"
#gain "1.2"
#n (irand 200)
#pan (range 0.4 0.6 $rand)
#up "[7, 0, 12]"
#speed "[1.01, 1.0]"
d2
$slow 8
$sound "empty"
#speed "[1.0, 1.01]"
#gain "1.5"
#lpf "12800"
do
d3 silence
d4 silence
hush
You can’t perform that action at this time.