{[ promptMessage ]}

Bookmark it

{[ promptMessage ]}

QPSK - clc clear all close all data=[0 1 0 1 1 1 0 0 1 1...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
clc; clear all; close all; data=[0 1 0 1 1 1 0 0 1 1]; % information %Number_of_bit=1024; %data=randint(Number_of_bit,1); figure(1) stem(data, 'linewidth',3), grid on; title(' Information before Transmiting '); axis([ 0 11 0 1.5]); data_NZR=2*data-1; % Data Represented at NZR form for QPSK modulation s_p_data=reshape(data_NZR,2,length(data)/2); % S/P convertion of data br=10.^6; %Let us transmission bit rate 1000000 f=br; % minimum carrier frequency T=1/br; % bit duration t=T/99:T/99:T; % Time vector for one bit information % XXXXXXXXXXXXXXXXXXXXXXX QPSK modulatio XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX y=[]; y_in=[]; y_qd=[]; for(i=1:length(data)/2) y1=s_p_data(1,i)*cos(2*pi*f*t); % inphase component y2=s_p_data(2,i)*sin(2*pi*f*t) ;% Quadrature component y_in=[y_in y1]; % inphase signal vector y_qd=[y_qd y2]; %quadrature signal vector y=[y y1+y2]; % modulated signal vector end Tx_sig=y; % transmitting signal after modulation tt=T/99:T/99:(T*length(data))/2; figure(2) subplot(3,1,1); plot(tt,y_in,'linewidth',3), grid on; title(' wave form for inphase component in QPSK modulation '); xlabel('time(sec)'); ylabel(' amplitude(volt0');
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full Document Right Arrow Icon
Image of page 2
This is the end of the preview. Sign up to access the rest of the document.

{[ snackBarMessage ]}