gen?=?[1?0?1?1];?%?校驗多項式
poly?=?[0?0?1?1?1?1?1?1?0?0?1?1?1];?%?原始信號
plen?=?length（poly）;
glen?=?length（gen）;

cur?=?poly（1:glen-1）;
for?p