%產生比特信號
t=0:0.01:7.99;
a=randint（18）;
figure（1）
m=a（ceil（t+0.01））;
plot（tm）
title（‘產生隨機八比特二進制比特序列‘）;
axis（[08-1.51.5]）;
%*************調制************%
fc=4000;??????????%載波頻率
fc1=8000;
fs=80000;?????????%采樣頻率
ts=0:1/fs:（800-1）/fs;
ts1=0:1/fs:（100-1）/fs;
tzxh1=cos（2*pi*fc*ts）;
tzxh2=cos（2*pi*fc1*ts）;%2FSK調制情況下另一載波
%**************2ASK調制************%
ask=m.*tzxh1;
figure（2）
plot（task）
title（‘2ASK調制波形‘）;
axis（[08-1.51.5]）;
%**************2FSK調制************%
fsk=cos（2*pi*（fc+fc*m）.*ts）;
figure（3）
plot（tfsk）
title（‘2FSK調制波形‘）;
axis（[08-1.51.5]）;
%**************2PSK調制************%
psk=cos（2*pi*fc.*ts+pi*m）;
figure（4）
plot（tpsk）
title（‘2PSK調制波形‘）;
axis（[08-1.51.5]）;
%**************2DPSK調制************%
k=1;
for?i=0:7
????if?m（1i*100+50）>0????????
???dpsk（i*100+1:i*100+100）=cos（2*pi*fc.*ts1-pi/2*k）;
???k=-k;?????
????else??????
??dpsk（i*100+1:i*100+100）=cos（2*pi*fc.*ts1+pi/2*k）;?
????end
end?
figure（5）
plot（tdpsk）
title（‘2DPSK調制波形‘）

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件???????7238??2010-09-03?20:12??sheji123.m

-----------?---------??----------?-----??----

?????????????????7238????????????????????1