Mercurial > hg > aimmat
annotate aim-mat/tools/@signal/rampamplitude.asv @ 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 |
---|---|
bleeck@3 | 1 % method of class @signal |
bleeck@3 | 2 % |
bleeck@3 | 3 % INPUT VALUES: |
bleeck@3 | 4 % |
bleeck@3 | 5 % RETURN VALUE: |
bleeck@3 | 6 % |
bleeck@3 | 7 % |
bleeck@3 | 8 % (c) 2003-2011, University of Cambridge, Medical Research Council |
bleeck@3 | 9 % Maintained by Tom Walters (tcw24@cam.ac.uk), written by Stefan Bleeck (stefan@bleeck.de) |
bleeck@3 | 10 % http://www.pdn.cam.ac.uk/cnbh/aim2006 |
bleeck@3 | 11 % $Date: 2008-06-10 18:00:16 +0100 (Tue, 10 Jun 2008) $ |
bleeck@3 | 12 % $Revision: 585 $ |
bleeck@3 | 13 |
bleeck@3 | 14 function sig=rampamplitude(sig,rt,type) |
bleeck@3 | 15 |
bleeck@3 | 16 if nargin < 3 |
bleeck@3 | 17 type='linear'; |
bleeck@3 | 18 end |
bleeck@3 | 19 if nargin < 2 |
bleeck@3 | 20 rt=0.01; |
bleeck@3 | 21 end |
bleeck@3 | 22 if rt==0 |
bleeck@3 | 23 return |
bleeck@3 | 24 end |
bleeck@3 | 25 |
bleeck@3 | 26 if strcmp(type,'linear') |
bleeck@3 | 27 first_bin=1; |
bleeck@3 | 28 nr_point=time2bin(sig,rt); |
bleeck@3 | 29 last_bin=nr_point; |
bleeck@3 | 30 ramp=linspace(0,1,(last_bin-first_bin)); |
bleeck@3 | 31 sig=sig*ramp; |
bleeck@3 | 32 |
bleeck@3 | 33 first_bin=getnrpoints(sig)-nr_point; |
bleeck@3 | 34 start_time_hintere_rampe=bin2time(sig,first_bin); |
bleeck@3 | 35 last_bin=time2bin(sig,getlength(sig)); |
bleeck@3 | 36 damp=linspace(1,0,(last_bin-first_bin)); |
bleeck@3 | 37 try |
bleeck@3 | 38 sig=mult(sig,damp,start_time_hintere_rampe,rt); |
bleeck@3 | 39 end |
bleeck@3 | 40 p=1; |
bleeck@3 | 41 end |