function crc_encode_scr=crc_encode(scr)
poly=[1 1 0 0 1 1];      %crc檢驗用多項式
[M N]=size(poly);
scrg=[scr zeros(1,N-1)];
[q r]=deconv(scrg,poly);
r=abs(r);
for i=1:length(r)
    a=r(i);
    if ( mod(a,2)== 0 )
        r(i)=0;
    else
        r(i)=1;
    end
end

crc=r(length(scr)+1:end);
crc_encode_scr=bitor(scrg,r);