function [out]=RS_header(datain,length);
data_appends=[zeros(1,232*8),datain];
data_temp=zeros(1,249);
for p=1:249
    for q=1:8
        data_temp(p)=(data_appends((p-1)*8+q))*(2^(8-q))+data_temp(p);
    end
end
data_uint=uint16(data_temp);
for i=1:6
    reg(i)=uint16(0);
end
g5=126;
g4=4;
g3=158;
g2=58;
g1=49;
g0=117;
for t=1:249
            
    reg(6)=bitxor(GF8_multiply(g5,data_uint(t)),g4);
    reg(5)=bitxor(GF8_multiply(g4,data_uint(t)),g3);
    reg(4)=bitxor(GF8_multiply(g3,data_uint(t)),g2);
    reg(3)=bitxor(GF8_multiply(g2,data_uint(t)),g1);
    reg(2)=bitxor(GF8_multiply(g1,data_uint(t)),g0);
    reg(1)=GF8_multiply(g0,data_uint(t));
end

reg_bin1=dec2bin(reg(1))
reg_bin2=dec2bin(reg(2))
reg_bin3=dec2bin(reg(3));
reg_bin4=dec2bin(reg(4));
reg_bin5=dec2bin(reg(5));
reg_bin6=dec2bin(reg(6));

len_reg1=max(size(reg_bin1))
len_reg2=max(size(reg_bin2));
len_reg3=max(size(reg_bin3));
len_reg4=max(size(reg_bin4));
len_reg5=max(size(reg_bin5));
len_reg6=max(size(reg_bin6));

reg_dou1=double(reg_bin1)-48;
reg_dou2=double(reg_bin2)-48;
reg_dou3=double(reg_bin3)-48;
reg_dou4=double(reg_bin4)-48;
reg_dou5=double(reg_bin5)-48;
reg_dou6=double(reg_bin6)-48;


out=[zeros(1,8-len_reg6), reg_dou6,...
     zeros(1,8-len_reg5), reg_dou5,...
     zeros(1,8-len_reg4), reg_dou4,...
     zeros(1,8-len_reg3), reg_dou3,...
     zeros(1,8-len_reg2), reg_dou2,...
     zeros(1,8-len_reg1), reg_dou1,...
     ]