writefile.m

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

function writefile(output)

%     %text file input
%     output_samples=zeros(1,floor(length(output)/8));%extra zeros are not orignal data.
%     %output_samples=zeros(1,length(output)/8);
%     for i=1:length(output_samples)
%         output_samples(i)=bin2eight(output(1+(i-1)*8:(i-1)*8+8));
%     end
%     file=fopen('dmttxt.txt','w');
%     fwrite(file,output_samples,'char');
%     fclose(file);
    
    %sound file input
    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));
        %convert dynamic range from 0:255 to -1:1
        output_samples=(output_samples_big-127)/128;
        %sound file output
        wavwrite(output_samples,22050,8,'dmtshort.wav');
    end