n=3;
Times=6;
bf=1000;  %%250 bytes => 250 4-bit Messages

s=serial('com6');

set(s,'inputbuffersize',10000);
set(s,'ouputbuffersize',10000);

set(s,'timeout',10);

x=zeros(250,1,Times);
y=uint8(zeros(250,1,Times));

fopen(s);

for i=1:Times
    
    u=randi([0 1],1,bf);

    uu=reshape(u,4,bf/4);

    uu=uu';

    q=n:-1:0;

    w=2.^[3 2 1 0];
    x(:,:,i)=uu*w';

    

    fwrite(s,x(:,:,i),'int8','async');

    y(:,:,i)=fread(s,bf/4,'int8');
    
    fprintf('test');


    
end

fclose(s);
    delete(s);
    clear s;