annotate aim-mat/tools/@signal/writetofile.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
bleeck@3 1 % method of class @
bleeck@3 2 % function writetofile(sig,name)
bleeck@3 3 % INPUT VALUES:
bleeck@3 4 % sig: signal to save
bleeck@3 5 % name: filename
bleeck@3 6 % RETURN VALUE:
bleeck@3 7 % none
bleeck@3 8 %
bleeck@3 9 % This external file is included as part of the 'aim-mat' distribution package
bleeck@3 10 % (c) 2011, University of Southampton
bleeck@3 11 % Maintained by Stefan Bleeck (bleeck@gmail.com)
bleeck@3 12 % download of current version is on the soundsoftware site:
bleeck@3 13 % http://code.soundsoftware.ac.uk/projects/aimmat
bleeck@3 14 % documentation and everything is on http://www.acousticscale.org
bleeck@3 15
bleeck@3 16
bleeck@3 17 function writetofile(sig,name)
bleeck@3 18 %usage: writetofile(sig,name)
bleeck@3 19 %DRRSmith 28/05/02
bleeck@3 20 %readsounddata=getdata(sig);
bleeck@3 21 %fid=fopen(name,'wb');
bleeck@3 22 %fwrite(fid,readsounddata,'int16');
bleeck@3 23 %fclose(fid);
bleeck@3 24
bleeck@3 25 readsounddata=getdata(sig);
bleeck@3 26 if (isunix==1)
bleeck@3 27 fid=fopen(name,'wb','b'); %bigendian
bleeck@3 28 fwrite(fid,readsounddata,'int16');
bleeck@3 29 fclose(fid);
bleeck@3 30 else
bleeck@3 31 fid=fopen(name,'wb','l'); %littleendian
bleeck@3 32 fwrite(fid,readsounddata,'int16');
bleeck@3 33 fclose(fid);
bleeck@3 34 end
bleeck@3 35
bleeck@3 36 % readsounddata=getdata(sig);
bleeck@3 37 % fid=fopen(name,'wb',endian);
bleeck@3 38 % fwrite(fid,readsounddata,'int16');
bleeck@3 39 % fclose(fid);