±±¾©Óʵç´óѧÊÀ¼ÍѧԺ±ÏÒµÉè¼Æ£¨ÂÛÎÄ£©
s2_delay=[-ones(1,N_sample*fc/2) s2(1:end-N_sample*fc/2)]; st_oqpsk=s1.*cos(2*pi*fc*t)-s2_delay.*sin(2*pi*fc*t);
%¾¹ý´øÍ¨ºó£¬ÔÚ¾¹ý·ÇÏßÐÔµç· [f y1f]=T2F(t,st_qpsk); [f y2f]=T2F(t,st_oqpsk);
[t y1]=bpf(f,y1f,fc-1/Ts,fc+1/Ts); [t y2]=bpf(f,y2f,fc-1/Ts,fc+1/Ts); subplot(221);
plot(t,y1);xlabel('t');ylabel('QPSK²¨ÐÎ');
axis([5 15 -1.6 1.6]);title('¾¹ý´øÍ¨ºóµÄ²¨ÐÎ');
subplot(222);
plot(t,y2);xlabel('t');ylabel('OQPSK²¨ÐÎ'); axis([5 15 -1.6 1.6]);title('¾¹ý´øÍ¨ºóµÄ²¨ÐÎ');
%¾¹ý·ÇÏßÐÔµç· y1=1.5*tanh(2*y1); y2=1.5*tanh(2*y2); [f y1f]=T2F(t,y1); [f y2f]=T2F(t,y2);
py1f=py1f+abs(y1f).^2/T; %QPSK²»Í¬¶ÎÐźŹ¦ÂÊÆ×ÃܶÈÏà¼Ó py2f=py2f+abs(y2f).^2/T; %OQPSK²»Í¬¶ÎÐźŹ¦ÂÊÆ×ÃܶÈÏà¼Ó end
py1f=py1f/100 %QPSK100¶Î¹¦ÂÊÆ×ÃÜ¶ÈÆ½¾ù py2f=py2f/100 %OQPSK100¶Î¹¦ÂÊÆ×ÃÜ¶ÈÆ½¾ù
subplot(223);
plot(f,10*log10(py1f));xlabel('f');ylabel('QPSK¹¦ÂÊÆ×ÃܶÈ(dB/Hz)'); title('¾¹ý·ÇÏßÐԵ緺óµÄ¹¦ÂÊÆ×ÃܶÈ');axis([-15 15 -30 10]);
subplot(224);
plot(f,10*log10(py2f));xlabel('f');ylabel('OQPSK¹¦ÂÊÆ×ÃܶÈ(dB/Hz)'); title('¾¹ý·ÇÏßÐԵ緺óµÄ¹¦ÂÊÆ×ÃܶÈ');axis([-15 15 -30 10]);
figure(2) x=-2:0.1:2;
y=1.5*tanh(2*x);
plot(x,y);title('·ÇÏßÐԵ緵ÄÊäÈëÊäÈ뺯Êý')
38