%function(save_data)

% Kommentare mit voda: Parameter in der SW vom ÂµC prÃ¼fen
% und ggf anpassen

picture_folder = 'images\'; % Logfiles

% Variable save_data = 0 -> Bilddatei nicht speichern
if (nargin == 0)
   save_data = 0;
end 

% PrÃ¼ft ob Schnittstelle vorhanden und belegt ist

if ~isempty(instrfind)
   fclose(instrfind); 
end

%Serial-Objekt erzeugen
%voda: USART-Parameter vom µC eventuell anpassen, BaudRate 

pic_data = serial ('COM28');
disp('Objekt erzeugt');
set(pic_data, 'BaudRate', 921600'); % -> in der Firmware auf dem µC Ändern
set(pic_data, 'DataBits', 8);
set(pic_data, 'Parity', 'none');
set(pic_data, 'StopBit', 1);
set(pic_data, 'ReadAsyncMode', 'continuous');
set(pic_data, 'Terminator', 'CR/LF');

% Öffnet Schnittstelle
fopen(pic_data);
disp('USART geöffnet');

% Status Flag 
global run_flag;
run_flag = 1;    
% Erzeuge Bilderordner 
% voda:
picture_folder = sprintf([picture_folder,'%s'],datestr(now,30));
mkdir(picture_folder);
img_counter    = 0;

% Lese Daten vom ADNS3090
while(run_flag)
   newline = fgetl(pic_data);
   disp([newline, 'image:' int2str(img_counter)]);
   
	  file   = [picture_folder,'/adns3090_',sprintf('%03u',img_counter)];
	  fileID = fopen(file,'wt');
	  
	  % Daten in die Datei schreiben
		for i=1:1:30 
          nextline = fgetl(pic_data);
          fprintf(fileID,nextline);
          fprintf(fileID,'\n');
		end
		
		fclose(fileID);
		% Bild ausgeben
		% voda: prüfe ob notwendig
		M = (dlmread(file,';',0,0));
		figure_handle = figure (1);
		clf;
		set(figure_handle,'Name','Image ADNS3090', 'KeyPressFcn',@stopper);
		image = imshow(M,[4 252]);
		drawnow;

		% Speichert die Daten als tif
		% voda:
		% Bildgröße 30*30*8 = 900 Byte pro Datei und Frame
		% 60 fps = 54000 Byte
		% Dauer pro Sequenz: 5 s
		% erwartete Datengröße pro Sequenz: 270000 Byte = 270 kB = 0,27 MB
    
		if(save_img == true)
			imwrite(uint8(M),[file,'.tif']);      	  
		end 	
    
    % voda: Warum zur HÃ¶lle geht hier keine C-Syntax :( 	
	img_counter = img_counter + 1;	  
	end 
    fclose(pic_data); 
%end function