function generatemif(A,str)
%功能：輸入矩陣和文件名，生成mif文件，保存在默認路徑中
%A為任意矩陣 ，str為生成文件的名字，不含后綴名
%-----------------------------------------
%計算儲存單元數
A=round(A);
SizeA=size(A);
line=SizeA(1); %行數
row=SizeA(2); %列數
depth =line*row; %存儲器的單元數
%-----------------------------------------
%計算數據寬度
m1=max(max(A))+1;
m2=max(max(-A));
index=0;
while m1>2^index || m2>2^index
index=index+1;
end
widths = index+1; %數據寬度為index+1位
%-----------------------------------------
%生成文件
tempstr='.mif';
str=strcat(str,tempstr);
fidc = fopen(str,'wt');
fprintf(fidc , 'depth = %d;\n',depth);
fprintf(fidc, 'width = %d;\n',widths);
fprintf(fidc, 'address_radix = UNS;\n');
fprintf(fidc,'data_radix = DEC;\n');
fprintf(fidc,'content begin\n');
for i = 1:line
for j=1:row
fprintf(fidc,'%d:%d;\n',(i-1)*row+j-1,A(i,j));
end
end
fprintf(fidc, 'end;');
fclose(fidc);