rsencode.m

RS编码程序设计

%
%   File Name   :   RsEncode.m
%   Abstract    :   编码算法
%   
%   Version     :   1.0    2008-5-29
%*************************************************************************
function [RsCode]=RsEncode(Msg)

G=[7,8,12,13];
k=11;
temp=zeros(1,4);

%prevent error 
if(length(Msg)~=11)
    error('Error,please input the information series of 11 bits');
end;


% division circuit(main operation)
for i = k : -1: 1
    feedback = RsSymbolAdd(temp(4),Msg(i));

    temp(4) = RsSymbolAdd(temp(3),RsSymbolMul(G(4),feedback));
    temp(3) = RsSymbolAdd(temp(2),RsSymbolMul(G(3),feedback));
    temp(2) = RsSymbolAdd(temp(1),RsSymbolMul(G(2),feedback));
    temp(1) = RsSymbolMul(G(1),feedback);
end;
 
% output the encoded sequence
RsCode = [temp Msg];