cod2str.m

用matlab实现ASCII和二进制码的互换

%二进制码转换成ASCII码
function y=cod2str(x);
if nargin<1;  % %nargin是用来判断输入变量个数的函数
    x=str2cod(str2mat('MATLAB7.0','BBI 2000'));
end;
[m,n]=size(x); n=n/8;
for j=1:m;
    s=[];
    for i=1:n;
        I=(1:8)+(i-1)*8;
        a=sum(x(j,I).*[128 64 32 16 8 4 2 1]);
        s=[s setstr(a)];
    end;
    if j==1; y=s; else; y=str2mat(y,s); end;
end;