0001 function status = write_mask(fid,Epoch,NEpoch,NChan,Max_microv,Min_Chan,Nbad_chan,bad_chan,mask);
0002
0003
0004
0005
0006
0007
0008 if nargin < 8
0009 error('insufficient input arguments')
0010 end;
0011
0012 if fid < 1
0013 error('invalid file id')
0014 end;
0015
0016 fwrite(fid,Epoch,'int16');
0017 fwrite(fid,NEpoch,'int16');
0018 fwrite(fid,NChan,'int16');
0019 fwrite(fid,Max_microv,'int16');
0020 fwrite(fid,Min_Chan,'int16');
0021 fwrite(fid,Nbad_chan,'int16');
0022 fwrite(fid,bad_chan,'int16');
0023 fwrite(fid,mask,'int16');
0024 status = 1;