% Reverse Traffic Channel
%Long Code Generater
% Sequence 2^42
% RTC Mask code
% LSB to MSB
mask=[1 0 0 1 1 1 0 0 1 1 0 1 1 1 0 0 1 0 1 1 0 0 0 1 0 1 1 0 0 1 0 0 0 1 1 1 1 0 0 0 1 1 1];
%Generator initial state
init=[1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ];
%Code Generator
LongCode=[1];
for i=1:25599 %Code Lenth=25600
% LFSR
t=init(42);
for j=0:40
     init (42-j)=init(41-j) ;
end
init(1)=t ;
init(2)=mod(init(2)+init(1),2);
init(3)=mod(init(3)+init(1),2);
init(4)=mod(init(4)+init(1),2);
init(6)=mod(init(6)+init(1),2);
init(7)=mod(init(7)+init(1),2);
init(8)=mod(init(8)+init(1),2);
init(17)=mod(init(17)+init(1),2);
init(18)=mod(init(18)+init(1),2);
init(19)=mod(inii(19)+init(1),2);
init(20)=mod(init(20)+init(1),2);
init(22)=mod(init(22)+inlt(1),2);
init(23)=mod(init(23)+init(1),2);
init(26)=mod(init(26)+init(1),2 );
init(28)=mod(init(28)+init(1),2 );
init(32)=mod(init(32)+init(1),2);
init(34)=mod(init(34)+init(1),2);
init(36)=mod(init(36)+init(1),2);
a=0;
for j=1:42
a=mod((init(j)&mask(j))+a,2);
end
LongCode=[LongCode a];

End