tomwalters@0: % tool
tomwalters@0: % 
tomwalters@0: %   INPUT VALUES:
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/07/09 15:24:57 $
tomwalters@0: % $Revision: 1.1 $
tomwalters@0: 
tomwalters@0: function res=time2bin(fr,time)
tomwalters@0: % gibt das Bin zurück, bei dem diese Zeit wäre
tomwalters@0: % Zeit immer in Sekunden
tomwalters@0: % Samplerate immer in Bins pro Sekunde (96 kHz)
tomwalters@0: 
tomwalters@0: samplerate=getsr(fr);
tomwalters@0: 
tomwalters@0: res=time*samplerate;
tomwalters@0: 
tomwalters@0: res=round(res); % rundungsfehler!!!