coef_gen.m

FPGA开发光盘各章节实例的设计工程与源码

fid = fopen('..\Quartus\rom.mif','w');
if fid==-1
    disp('Couldn''t open file aukfft_fftchipa.vec for writing');
end;
fprintf(fid,'depth = 65536;\n');
fprintf(fid,'width = 16;\n');
fprintf(fid,'address_radix = dec;\n');
fprintf(fid,'data_radix = dec;\n');
fprintf(fid,'\n');
fprintf(fid,'content \n');
fprintf(fid,'begin \n');

h=fir1(15,0.5);
for i=1:65536;
    bin_i=dec2bin(i-1,16);
    romh(i)=0;
    for k=1:16
        romh(i)=romh(i)+h(16-k+1)*bin2dec(bin_i(k));
    end;
    romh(i)=fix(romh(i)*0.5*32767);
    if (romh(i) < 0)
        a=dec2bin(abs(romh(i)),16);
        for k=1:16
            if a(k)==dec2bin(1)
                a(k)=dec2bin(0);
            else
                a(k)=dec2bin(1);
            end;
        end;
        romh(i)=bin2dec(a)+1;
    end;
    fprintf(fid,'%d   : %d;\n',i-1,romh(i));
end;
fprintf(fid,'end \n');

fclose(fid);