clear?all;
close?all;
clc;

constraint_length=7;???%?寄存器長度
m=constraint_length-1;???%?Register?lengrh
cn_1=[1?1?1?1?0?0?1];???????%?Generation?polynomial[171133]
cn_2=[1?0?1?1?0?1?1];
trel?=?poly2trellis（7[171?133]）;
tblen=10;??????????????????%譯碼回溯深度

an=zeros（1m）;?????%?Register?initialization
data=randint（1150）;????%產生隨機序列

%-----------------1/2卷積碼編碼-----------------
for?ii=1:length（data）???
????inter_var=[data（ii）?an];
????first_out（ii）=mod（sum（cn_1.*inter_var）2）;
????second_out（ii）=mod（sum（cn_2.*inter_var）2）;
????an=inter_var（1:end-1）;
????output（ii*2-1:ii*2）=[first_out（ii）?second_out（ii）];
end

%--------2/3碼率刪除卷積碼編碼刪除圖樣（10?11）-------------
punctured_code_2_3=zeros（1225）;
for?jj=1:75
????punctured_code_2_3（1+3*（jj-1））=output（1+4*（jj-1））;
????puncture