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
|
<CsoundSynthesizer>
<CsOptions>
;--opcode-lib=./libcudaop2.dylib
</CsOptions>
<CsInstruments>
ksmps = 64
0dbfs = 1
instr 1
ifftsize = 4096
ihopsize = 512
asig = diskin2:a("flutec3.wav",1,0,1)
fsig = cudanal(asig,
ifftsize,
ihopsize,
ifftsize, 1)
asig = cudasynth(fsig)
asig = linenr(asig,0.005,0.01,0.01)
out(asig)
endin
instr 2
S1 = "flutec3.wav"
ifftsize = 32768
ihopsize = 512
asig diskin2 S1, 1, 0, 1
fsig pvsanal asig, ifftsize, ihopsize, ifftsize, 1
a1 pvsynth fsig
a2 linenr a1*0.5,0.005,0.01,0.01
out a2
endin
</CsInstruments>
<CsScore>
i1 0 60
</CsScore>
</CsoundSynthesizer>
|
