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
|
<CsoundSynthesizer>
<CsOptions>
-odac
</CsOptions>
<CsInstruments>
sr = 44100
kr = 4410
nchnls = 2
0dbfs = 1
seed 0
instr 1
ipan = p4
kdensity = random:k(random:k(0, 1), random:k(0.1, 0.9))
krepeattrig = abs(oscil(1.5, random:k(3, 14)))
kbufread = abs(oscil(1, random:k(7, 13)))
kbufmode = int(random:k(0, 2))
a1 bitchrandom 1, kdensity, krepeattrig, kbufread, kbufmode
a2 bitchglitch a1, oscil:k(0.1, random:k(25, 35)), abs(oscil:k(2, random:k(0.1, 0.5))) ;bitchpeaker a1, 2048
a3 bitchwreck a2, 1024, abs(oscil:k(2, random:k(0.2, 0.8)))
a5 bitchwreck a3, 1024, abs(oscil:k(2, random:k(2, 6)))
;a6 waveset a5, abs(oscil:k(20, random:k(0.1, 0.5)))
outs a5*ipan, a5*(1-ipan)
endin
</CsInstruments>
<CsScore>
i1 0 60 0.75
i1 0 60 0.25
</CsScore>
</CsoundSynthesizer>
|