-odac
sr = 44100
ksmps = 32
nchnls = 2
0dbfs = 1
seed 0
opcode OscBank,a,kkio
kChorusDetune linrand 2
kAmp, kFreq, iNum, iCnt xin
aSig oscili kAmp/iNum,kFreq+kChorusDetune, 4
iCount = iCnt+1
if iCount >= iNum igoto endofrecursion
aOscBankSig OscBank 1/iNum,kFreq+kChorusDetune,iNum,iCount
endofrecursion:
xout aSig + aOscBankSig
endop
instr 2
aOut OscBank 1, 400, 10
outs aOut, aOut
endin
;GEN07 straight lines
f4 0 4096 10 1 1
i2 0 5
e