function s=serialread(spo)

%     SOSI-M2 V1.0 MATLAB M-file
%
% Read serial port buffer until empty
%
% spo: serial port object
%
% s: last string read

delayt=0.05;
s='';
pause(delayt);                      %Wait for bytes to return

while spo.BytesAvailable > 1   %Done when '>' is last character
    pause(delayt)                      %Wait for bytes to return
    s=fgetl(spo);
    if length(s) > 4
        sto=sprintf('Serialread: %s',s);
        disp(sto);
    end
end