Mercurial > hg > aimmat
annotate aim-mat/tools/@signal/tilt.m @ 4:537f939baef0 tip
various bug fixes and changed copyright message
author | Stefan Bleeck <bleeck@gmail.com> |
---|---|
date | Tue, 16 Aug 2011 14:37:17 +0100 |
parents | 20ada0af3d7d |
children |
rev | line source |
---|---|
tomwalters@0 | 1 % method of class @signal |
tomwalters@0 | 2 % |
tomwalters@0 | 3 % INPUT VALUES: |
tomwalters@0 | 4 % |
tomwalters@0 | 5 % RETURN VALUE: |
tomwalters@0 | 6 % |
tomwalters@0 | 7 % |
bleeck@3 | 8 % This external file is included as part of the 'aim-mat' distribution package |
bleeck@3 | 9 % (c) 2011, University of Southampton |
bleeck@3 | 10 % Maintained by Stefan Bleeck (bleeck@gmail.com) |
bleeck@3 | 11 % download of current version is on the soundsoftware site: |
bleeck@3 | 12 % http://code.soundsoftware.ac.uk/projects/aimmat |
bleeck@3 | 13 % documentation and everything is on http://www.acousticscale.org |
bleeck@3 | 14 |
tomwalters@0 | 15 |
tomwalters@0 | 16 |
tomwalters@0 | 17 % not jet fully tested!!! |
tomwalters@0 | 18 |
tomwalters@0 | 19 |
tomwalters@0 | 20 |
tomwalters@0 | 21 function sig=tilt(sig,tilttime) |
tomwalters@0 | 22 % usage: sig=tilt(sig,tilttime) |
tomwalters@0 | 23 % puts the signal downwards to the left! |
tomwalters@0 | 24 % in the auditory image model, all activities become |
tomwalters@0 | 25 % smaller with the distance |
tomwalters@0 | 26 % usually with a decrease of 100% in 40 ms |
tomwalters@0 | 27 |
tomwalters@0 | 28 |
tomwalters@0 | 29 |
tomwalters@0 | 30 |
tomwalters@0 | 31 |
tomwalters@0 | 32 if nargin<2 |
tomwalters@0 | 33 tilttime=0.04; |
tomwalters@0 | 34 end |
tomwalters@0 | 35 |
tomwalters@0 | 36 vals=sig.werte; |
tomwalters@0 | 37 |
tomwalters@0 | 38 if getminimumtime(sig)>0 |
tomwalters@0 | 39 return |
tomwalters@0 | 40 end |
tomwalters@0 | 41 durationtotilt=abs(getminimumtime(sig)); |
tomwalters@0 | 42 tiltnr=time2bin(sig,0); % so viele Punkte werden getiltet |
tomwalters@0 | 43 dt=tilttime-durationtotilt; % übrige Zeit, die links aus dem Bild rausgeht |
tomwalters@0 | 44 dnull=dt/tilttime; |
tomwalters@0 | 45 ti=linspace(dnull,1,tiltnr)'; |
tomwalters@0 | 46 vals(1:tiltnr)=vals(1:tiltnr).*ti; |
tomwalters@0 | 47 % figure |
tomwalters@0 | 48 % subplot(2,1,1) |
tomwalters@0 | 49 % plot(sig); |
tomwalters@0 | 50 sig.werte=vals; |
tomwalters@0 | 51 % subplot(2,1,2) |
tomwalters@0 | 52 % plot(sig); |
tomwalters@0 | 53 |
tomwalters@0 | 54 |
tomwalters@0 | 55 |