s=serial('COM4');
set(s,'BaudRate',9600);
fopen(s);
data=[];
time=[];
data=[data str2num(fgetl(s))];
time=[time now];
while(1)
%data=[data,str2num(fgetl(s))];
%time=[time,now]
plot(time,data);
dateaxis('x',13,datestr(now,13))
grid
data=[data str2num(fgetl(s))];
time=[time now];
drawnow;
end
fclose(s);
set(s,'BaudRate',9600);
fopen(s);
data=[];
time=[];
data=[data str2num(fgetl(s))];
time=[time now];
while(1)
%data=[data,str2num(fgetl(s))];
%time=[time,now]
plot(time,data);
dateaxis('x',13,datestr(now,13))
grid
data=[data str2num(fgetl(s))];
time=[time now];
drawnow;
end
fclose(s);