bleeck@3: % method of class @signal
bleeck@3: % 
bleeck@3: %   INPUT VALUES:
bleeck@3: %  
bleeck@3: %   RETURN VALUE:
bleeck@3: %
bleeck@3: % 
bleeck@3: % (c) 2003-2011, University of Cambridge, Medical Research Council 
bleeck@3: % Maintained by Tom Walters (tcw24@cam.ac.uk), written by Stefan Bleeck (stefan@bleeck.de)
bleeck@3: % http://www.pdn.cam.ac.uk/cnbh/aim2006
bleeck@3: % $Date: 2008-06-10 18:00:16 +0100 (Tue, 10 Jun 2008) $
bleeck@3: % $Revision: 585 $
bleeck@3: 
bleeck@3: function sig=rampamplitude(sig,rt,type)
bleeck@3: 
bleeck@3: if nargin < 3
bleeck@3:     type='linear';
bleeck@3: end
bleeck@3: if nargin < 2
bleeck@3:     rt=0.01;
bleeck@3: end
bleeck@3: if rt==0
bleeck@3:     return
bleeck@3: end
bleeck@3: 
bleeck@3: if strcmp(type,'linear')
bleeck@3:     first_bin=1;
bleeck@3:     nr_point=time2bin(sig,rt);
bleeck@3:     last_bin=nr_point;
bleeck@3:     ramp=linspace(0,1,(last_bin-first_bin));
bleeck@3:     sig=sig*ramp;
bleeck@3:     
bleeck@3:     first_bin=getnrpoints(sig)-nr_point;
bleeck@3:     start_time_hintere_rampe=bin2time(sig,first_bin);
bleeck@3:     last_bin=time2bin(sig,getlength(sig));
bleeck@3:     damp=linspace(1,0,(last_bin-first_bin));
bleeck@3: 	try
bleeck@3: 		sig=mult(sig,damp,start_time_hintere_rampe,rt);
bleeck@3: 	end
bleeck@3:     p=1;
bleeck@3: end