radar3.m

This programme can generate signals of five different radars which contains noise.

%***********************************
%radar3
%***********************************
function R3=radar3(ts,te)
i3=1;
toa3=ts; 
ran3=0;
while(toa3<te)
    R3(i3,3)=150+round(10*0.02*randn(1))/10;
    R3(i3,4)=780+round(10*156*(2*(rand(1)-0.5)))/10+round(10*0.05*randn(1))/10;
    R3(i3,2)=32+round(100*sqrt(2)*0.05*randn(1))/100;
    R3(i3,5)=toa3;
    R3(i3,6)=3;
    toa3=toa3+R3(i3,4);
    ran3=ceil(30*rand(1));
    if ran3<=3 
        R3(i3,1)=2850+round(10*3*rand(1))/10;
    elseif ran3>3 & ran3<=6
        R3(i3,1)=2900+round(10*3*rand(1))/10;
        elseif ran3>6 & ran3<=9
        R3(i3,1)=2920+round(10*3*rand(1))/10;
        elseif ran3>9 & ran3<=12
        R3(i3,1)=2950+round(10*3*rand(1))/10;
        elseif ran3>12 & ran3<=15
        R3(i3,1)=2980+round(10*3*rand(1))/10;
        elseif ran3>15 & ran3<=18
        R3(i3,1)=3000+round(10*3*rand(1))/10;
        elseif ran3>18 & ran3<=21
        R3(i3,1)=3050+round(10*3*rand(1))/10;
        elseif ran3>21 & ran3<=24
        R3(i3,1)=3080+round(10*3*rand(1))/10;
        elseif ran3>24 & ran3<=27
        R3(i3,1)=3100+round(10*3*rand(1))/10;
    else
         R3(i3,1)=3150+round(10*3*rand(1))/10;
    end
    i3=i3+1;
end