convert10to2.m

来自「本程序仿真做出了一个RS编码器。运行本软件」· M 代码 · 共 25 行

function y=convert10to2(x)
% 本函数实现十进制数到二进制数的转换
%x为输入十进制数，y为输出二进制数
y = zeros(1,5);
if x>2^5-1
    l = floor(log2(x));
    l=l+1;
    temp = zeros(1,l);
    for i=1:l
        temp(i) = mod(x,2);
        x = (x-temp(i))/2;
    end
    k = 6;
    for i=l:-1:k
        temp(i-k+1:i-1) = temp(i-k+1:i-1)+temp(i)*[1 0 1 0 0];
        temp(i)=0;
        temp = mod(temp,2);
    end
    y = temp(1:k-1);
else
    for i =1:5
        y(i) = mod(x,2);
        x = (x-y(i))/2;
    end
end