tomwalters@0: % method of class @signal
tomwalters@0: % 
tomwalters@0: %   INPUT VALUES:
tomwalters@0: %  sig,attenuation
tomwalters@0: % sig is the signal
tomwalters@0: % attenuation is the attenuation against the lowdest possible tone
tomwalters@0: % 
tomwalters@0: % 
tomwalters@0: %
tomwalters@0: %   RETURN VALUE:
tomwalters@0: %
tomwalters@0: % 
tomwalters@0: % (c) 2003, University of Cambridge, Medical Research Council 
tomwalters@0: % Stefan Bleeck (stefan@bleeck.de)
tomwalters@0: % http://www.mrc-cbu.cam.ac.uk/cnbh/aimmanual
tomwalters@0: % $Date: 2003/06/11 10:46:32 $
tomwalters@0: % $Revision: 1.1 $
tomwalters@0: 
tomwalters@0: 
tomwalters@0: 
tomwalters@0: function sig=attenuate(sig,attenuation)
tomwalters@0: 
tomwalters@0: if attenuation==0
tomwalters@0:     return
tomwalters@0: end
tomwalters@0: 
tomwalters@0: dat=sig.werte;
tomwalters@0: ma=max(dat);
tomwalters@0: mi=min(dat);
tomwalters@0: if -mi > ma
tomwalters@0:     ma=-mi;
tomwalters@0: end
tomwalters@0: 
tomwalters@0: 
tomwalters@0: amphigh=max(sig);
tomwalters@0: 
tomwalters@0: amp=amphigh / power(10,-attenuation/20);
tomwalters@0: if amp>0
tomwalters@0:     sig=scaletomaxvalue(sig,amp);
tomwalters@0: end
tomwalters@0: