ReadSerialData.m

if ~exist('port','var')
    ports = serialportlist;
    port = serialport(ports(end),115200);
end

configureTerminator(port,"CR");
x = input('Sample Name to Write: \n','s');

count = 1; sample_len = 500; plotWinSize = 100;
data = NaN(1,sample_len); plot(data)
port.flush; 

while count <= sample_len
    data(count) = port.readline;
    count = count + 1;
    
    plot(data)
    xlim([max(0,count-plotWinSize) max(plotWinSize,count)])
end

fid = fopen(x, 'wt');
fprintf(fid, '%d\n',data);
fclose(fid);