%一定信噪比下的高斯和突發干擾后經卷積重排改善后的誤碼率
function [err_bit_rate]=AWGN_Burst_viterbi_weave(snr_in_dB,N,burst)
E=1;
snr=10^(snr_in_dB/10);
sgma=sqrt((E/snr)/2);%噪聲功率
err_bit=0;
err_frame=0;
G=[1 0 0 1 1;1 1 0 1 1];
k=1;

for i=1:N
    coder_input=round(rand(1,224));
ch_out=viterbi_encoder(G,k,coder_input);%編碼
ch_out=INTER_WEAVE_8(ch_out);

%經信道加高斯燥聲
u=2*ch_out-1;
u=sign(u+sgma*randn(size(u))+eps);
u=(u+1)/2;

%%經信道加突發干擾
N_Interval=200;  %突發間隔
Noise=BurstNoise(N_Interval,burst,length(u));
u=rem(u+Noise,2);

u=COUNTER_WEAVE_8(u);
[decoder_output,survivor_state,cumulated_metric]=viterbi_decoder(G,k,u);%解碼
err_num=(length(find(coder_input~=decoder_output)));
err_bit=err_num+err_bit;
err_frame=(length(find(err_num~=0)))+err_frame;
end;
%誤碼率,誤幀率
err_bit_rate=err_bit/(N*244);
err_frame_rate=err_frame/N;