% Multipath para
Jakes;
P=ones(6,204800);
%Multipath weight
a=[10^(-0.3) 1 10^(-0.2) 10^ (-0.6) 10^(-0.8)  10^(-1)];
%Path para

P(1,:)=a(1)*Rayleigh(1:204800);
P(2,:)=a(2)*Rayleigh(80001:284800);
P(3,:)=a(3)*Rayleigh(160001:364800);
P(4,:)=a(4)*Rayleigh(240001:444800);
P(5,:)=a(5)*Rayleigh(200001:404800);
P(6,:)=a(6)*Rayleigh(290001:494800);
% call Resource Code

Rcode;
%PN*a(t)
S1=P(1,:).*Sdata;
S2=P(2,:).*Sdata;
S3=P(3,:).*Sdata;
S4=P(4,:).*Sdata;
S5=P(5,:).*Sdata;
S6=P(6,:).*Sdata;
%Received Signal
S=zeros(1,205000);
S=S+[S1,zeros(1,200)]+[0 0 S2 zeros(1,198)+[0 0 0 0 0 0 S3 zeros(1,194)1+[zeros(1,16) S4 zeros(1,184)]+[zeros(1,24)  S5  zeros(1,176)]+[zeros(1,50)  S6  zeros(1,150)];
S=real(S);
S=awgn(S,SNR);