%?Lab?06
%?WiCom_1
%?By?Kashif?Shahzad?
%?01-ET-31
%?3rd?July?2004

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%?Frequency?Hopping?Spread?Spectrum
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
clc
clear

%?Generation?of?bit?pattern
s=round（rand（125））;????%?Generating?20?bits
signal=[];??
carrier=[];
t=[0:2*pi/119:2*pi];?????%?Creating?60?samples?for?one?cosine?
for?k=1:25
????if?s（1k）==0
????????sig=-ones（1120）;????%?120?minus?ones?for?bit?0
????else
????????sig=ones（1120）;?????%?120?ones?for?bit?1
????end
????c=cos（t）;???
????carrier=[carrier?c];
????signal=[signal?sig];
end
subplot（411）;
plot（signal）;
axis（[-100?3100?-1.5?1.5]）;
title（‘\bf\it?Original?Bit?Sequence‘）;

%?BPSK?Modulation?of?the?signal
bpsk_sig=signal.*carrier;???%?Modulating?the?signal
subplot（41