writeg7231stream.m

该代码是双速率的语音压缩编码（G.723.1）的matlab代码。能在matlab6.5以上运行

function WriteG7231Stream (FName, QC)
% Write a ITU-T G.7231 coder byte stream file, given
% code values frame by frame.

% $Id: WriteG7231Stream.m 1.2 2004/06/25 G.723.1-v2r1b $

% Convert the codes to a byte stream
ByteStream = SetQCodes (QC);

FID = fopen (FName, 'w');
fprintf ('G.723.1 Bitstream file: %s\n', FullName (FName))

NF = length (ByteStream);
for (k = 1:NF)
  fwrite (FID, ByteStream{k}, 'char');
end

fclose (FID);

return