Hello Csounders

I have been having some problems with reson.  No matter
what amplitude of signal I feed it , it outputs a very distorted
signal.

----------------------------------------------------------------------------
-------------
; Reson.orc

sr=44100
kr=4410
ksmps=10

instr 1

ia1=ampdb(p4)
ib1=ampdb(p5)
kcps=cpspch(p6)
ifn=p7
ia2=p8
ib2=p9
kbw=p10

kenv    line    ia1, p3, ib1
kenv2   line    ia2, p3, ib2
asig    oscili  kenv, kcps, ifn
asig2   reson   asig, kenv2, kbw
out asig2
endin

;Reson Score
;
f1 0  2049 10  1                                             ; Sine
f2 0  2049 10  1   .5   .3   .25  .2   .167   .14  .125 .111 ; Sawtooth
f3 0  2049 10  1   0    .3    0   .2    0     .14   0   .111 ; Square
;
;
;p1   p2       p3    p4       p5      p6      p7       p8     p9       p10
;i1     s           d     amp  env      cps    wave  filt  env       kbw
;                                   --dB--         pch                 --cps--
;
i1   0             .2     90   50        8.09     1       900   150    100
i1    .25       .2     80   10        7.09     2    1000    500    350
i1    .5          .2     70   .            6.09      3      500     200   100
i1    .75       .2     60   .            8.09     1       900     250   250
e


Here are the results

SECTION 1:
ftable 1:
ftable 2:
ftable 3:
new alloc for instr 1:
B  0.000 ..  0.200 T  0.200 TT  0.200 M:13601849.0
         number of samples out of range:     8737
B  0.200 ..  0.250 T  0.250 TT  0.250 M:      0.0
B  0.250 ..  0.450 T  0.450 TT  0.450 M: 878051.4
         number of samples out of range:     7046
B  0.450 ..  0.500 T  0.500 TT  0.500 M:      0.0
B  0.500 ..  0.700 T  0.700 TT  0.700 M:1305401.5
         number of samples out of range:     8579
B  0.700 ..  0.750 T  0.750 TT  0.750 M:      0.0
B  0.750 ..  0.950 T  0.950 TT  0.950 M: 137360.2
         number of samples out of range:     6274
end of score.              overall amps:13601849.0
           overall samples out of range:    30636
0 errors in performance

See those amplitudes fly !!!    It's not like I hvwe even used balance
to get back some gain after filtering.   Is it something I am doing wrong ?
i am also having similar problems with lpread and lpreson , but that
can wait for another mail :-)

Any  suggestions ?

Peter  Sansom
http://sustenance.va.com.au

Try changing

asig2   reson   asig, kenv2, kbw

to

asig2   reson   asig, kenv2, kbw,1

You are changing the bandwidth which DRAMATICALLY changes the gain unless
you set the scaling factor, iscl to 1.

At 3:17 PM +0930 5/29/98, Peter wrote:
>Hello Csounders
>
>I have been having some problems with reson.

>
>kenv    line    ia1, p3, ib1
>kenv2   line    ia2, p3, ib2
>asig    oscili  kenv, kcps, ifn
>asig2   reson   asig, kenv2, kbw
>out asig2
>endin

-------------------------------------------------------------------------------
Erik Spjut (rhymes with cute) - Acting Director,The Center for Design Education
and/or Associate Professor of Engineering
Harvey Mudd College, Claremont, CA 91711  USA
Erik_Spjut@hmc.edu      Ph & Voice mail (909) 607-3890      Fax (909) 621-8967