writefile.asv

来自「离散多载波传输(DMT)的MATLAB程序及注释」· ASV 代码 · 共 19 行

function writefile(output)
% if file_input_type==1
    %text file input
%     output_samples=zeros(1,floor(length(output)/8));%extra zeros are not orignal data.
%     for i=1:length(output_samples)
%         output_samples(i)=bin2eight(output(1+(i-1)*8:(i-1)*8+8));
%     end
%     file=fopen('txtout.txt','w');
%     fwrite(file,output_samples,'char');
%     fclose(file);
% end
%if file_input_type==2
    output_samples_big=zeros(1,floor(length(output)/8));%extra zeros are not orignal data
    for i=1:length(output_samples_big)
        output_samples_big(i)=bin2eight(output(1+(i-1)*8:(i-1)*8+8));
        %sound file output
        wavwrite(output_samples,11025,8,'shortout.wav')
    end
%end