|  | Hello,
Is there another unit of subjective loudness besides the Sone? I've 
been unable to put it into use (earlier post attached.)
Thanks,
gb141@columbia.edu
>In "Elements of Computer Music," on page 21, example (1-2), there is a
>formula listed for subjective loudness of sine tones, L = C * (I^1/3). 
>I have implemented it in this form, 
>  IL = 10 * ( ln ( ( ( sones / Hz )^3 ) / 10^-12 ) / ln 10 )
>however I'm not getting any satisfactory results. I was expecting to be
>able to control the subjective loudness of a sine oscil by passing two
>arguments to the formula, Hz and sones. 
>Are speakers the problem? Do they need to have an absolutely flat
>frequency response for this to work? I have tried it on head-phones,
>low-end Sony speakers, and on mid-range JBLs, with no success. I'd
>appreciate any suggestions.
;-------sonetest.orc---------------------------
        sr              =               44100
        kr              =               441
        ksmps           =               100
        nchnls          =               2
instr 1
        ifq             =               cpspch(p4+4)
        isones          =               p5
        asones          expseg          .1, .1, isones, p3-.11, isones,
.01, .1
        ares1           apow            asones/ifq, 3, 1
        ires2           ipow            10, -12
        adb             =               10 * ((log((ares1) / ires2)) /
log(10))
        ampenv          =               ampdb(adb)
        amp             =               ampenv
        asig            oscili          amp, ifq, 1
                        outs            asig, asig
endin
;------------sonetest.sco-------------------------------
f1 0 1024  10  1
;                 sones  ---  !According to the equation these should
sound equally loud!
i1 0    1   1.00  2.816
i1 1.5  1   2.00  
i1 3    1   3.00  
i1 4.5  1   4.00  
i1 6    1   5.00  
i1 7.5  1   6.00  
i1 9    1   7.00  
i1 10   1   8.00  
e |