function traff = traffic(max_time)

%max_time = 50;

%Create matriks which reflects deterministic paket arrival time 
%( 15 frames/second) assumed all 8 frames
%arrived/transmitted at the same time. Approximated frame length is 50
%byte.
%Later, matriks is sampled at 0.02 second
%-------------------------------------------------------------------------

%PARAMETERS
%-------------------------------------------------------------------------
mean_ps = 80*8; %mean packet size, 80 bytes = 200*8 bits per frame
std_ps = 0.1; %variation in packet size is around 10% of its mean
num_frame = 15; %number of frame per second, 1 frame
samp = 0.02;


j = 0; %time
k = 1; %index
while (j < max_time)
        jmptimes(k) = j + 1 + (0.1 * randn() );
        indproc(k) = (num_frame * mean_ps) + (mean_ps* std_ps * randn()) ;
        j = jmptimes(k);
        k = k+1;
end

%CONVERTING TO RLC BLOCK
%-------------------------------------------------------------------------
t = 0:samp:max_time;
traff = zeros(1,length(t));
i = 1;
for a = 1 : length(t)
    if(t(a)>jmptimes(i))
        traff(a) = indproc(i);
        i = i + 1;
    end
end

%stem(t,traff)