n=randn(1,100);%高斯白噪聲 
x=rand(1,100)%[-1,1]上均勻分布 
for i=1:100
if (x(i)>0.5)  (x(i)==0.5) 
x(i)=1; 
elseif x(i)<0.5 
x(i)=0; 
end; 
end;%0與1均勻出現的信號 
y=x+n; 
e=0; 
for i=1:100
if (y(i)>0.5) or (y(i)==0.5); 
y(i)=1; 
elseif y(i)<0.5; 
y(i)=0;%判決 
end; 
if y(i)~=x(i); 
e=e+1;%誤碼次數 
end; 
end; 
P=e./100;%誤碼率