function sensores(val,Porta)


for i=1:5%size(val,2)
    fwrite(Porta,[val(1),0,0]);
    Sens (:,i)= fread(Porta,4);
end
Sens=Sens'
% pause(0.5)
