clc;
clear all;
k=0;
disp('SAMPLE INPUT AND OUTPUT: ');
n=input('Number of Frames: ');
frame=1;
while frame<=n
fprintf('Transmitting Frame %d\n',frame);
s=randint(1,1,10);
if s<3
fprintf('TIME OUT\n Re-');
k=k+1;
elseif s>6
fprintf('PAK of Frame %d Received\n',frame);
frame=frame+1;
k=k+1;
else
fprintf('NAK of Frame %d Received\n Re-',frame);
k=k+1;
end
end