smldpeburst.m

依据GSM 05.03建议

function sig_err_rate=smldpeburst(snr_in_dB)
E=1;
snr=10^(snr_in_dB/10);
sgma=sqrt(E/snr)/2;%噪声功率
%信息序列
r=round(rand(1,456));
%经信道加突发干扰
u=r;

Noise=BurstNoise(80,6,length(r));
u=mod(r+Noise,2);


%误码率
sig_err_rate=(length(find(r~=u)))/length(r);