-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy pathhse.scd
72 lines (69 loc) · 2.03 KB
/
hse.scd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
~clean.lsf("hse") // You may have to change this path.
( // Eval this block then scroll down to the the bottom.
Pdef(0,
Pdup(inf,
Pbind(*[
type: \cln,
snd: \hse,
dur: Pwhite(1.0, 5.0),
bgn: Pwhite(0.0, 1.0),
pan: Plprand(0.0, 0.4),
amp: Plprand(0.125, 0.5),
atk: Plprand(0.0, 3.0),
hld: Plprand(3.0, 6.0),
rel: Plprand(3.0, 6.0),
lpf: Phprand(100, 20000),
hpf: Plprand(20, 500),
octave: Pmeanrand(3, 5).round,
degree: Pwhite(0, 7),
legato: Plprand(0.25, 4.0),
cav: 2,
cai: Pwhite(0.0, 1.0).trace,
tnh: Plprand(0.0, 1.0),
tng: Plprand(0.0, 1.0),
shp: Plprand(0.0, 1.0),
slo: Phprand(0.0, 1.0),
lot: Pwhite(0.0, 1.0),
hit: Plprand(0.0, 1.0),
tri: Plprand(0.0, 1.0),
])
)
).play(quant:1);
Pdef(1,
Pdup(inf,
Pbind(*[
type: \cln,
snd: \hse,
dur: Pwhite(1.0, 5.0),
bgn: Pwhite(0.0, 1.0),
pan: Phprand(0.6, 1.0),
amp: Plprand(0.125, 0.5),
atk: Plprand(0.0, 3.0),
hld: Plprand(3.0, 6.0),
rel: Plprand(3.0, 6.0),
lpf: Phprand(100, 20000),
hpf: Plprand(20, 500),
octave: Pmeanrand(3, 5).round,
degree: Pwhite(0, 7),
legato: Plprand(0.25, 4.0),
cav: 2,
cai: Pwhite(0.0, 1.0).trace,
tnh: Plprand(0.0, 1.0),
tng: Plprand(0.0, 1.0),
shp: Plprand(0.0, 1.0),
slo: Phprand(0.0, 1.0),
lot: Pwhite(0.0, 1.0),
hit: Plprand(0.0, 1.0),
tri: Plprand(0.0, 1.0),
])
)
).play(quant:1);
)
( // Eval one or both until you get an interesting combination of the two loops and then leave it on for a while.
Pdef(0).reset;
Pdef(1).reset;
)
( // Eval this for a real smoof ending.
Pdef(0).stop;
Pdef(1).stop;
)