Csound Csound-dev Csound-tekno Search About

Re: how to implement feedback?

Date1999-01-10 15:54
FromHans Mikelson
SubjectRe: how to implement feedback?
Hi,

Pete Moss wrote:
>is there an opcode that would handle this for me?


I think something like the following will work:

sr = 44100
kr = 4410
ksmps = 10
nchnls = 1

instr 1
iamp = p4

a1 init 0 ; The trick is you need to initialize a1 before using
          ; it for feedback.

a3 oscil iamp*.1, 2200 + a1, 1 ; Now you can use it as you wish.

k2 linseg 0, .128*p3, .92, .19*p3, .3, .682*p3, 0
a2 oscil iamp*.0708*k2, a3+110, 2

k1 line 1, p3, 0
a1 oscil iamp*.5957*k1, a2+220, 1

out  a1
endin

f1 0 8192 10 1
f2 0 8192  7 0 4096 1 0 -1 4096 0

i1 0 2 32000

e