addpath('~frank/whots/software');

% make a figure
comp_fign=figure;
set(comp_fign,'position',[6,31,467,655]);

day_fign=figure;
set(day_fign,'position',[483,31,467,655]);

hour_fign=figure;
set(hour_fign,'position',[931,31,467,655]);

% load the vos data
loopcnt=0;

while true,
	loopcnt=loopcnt+1;
	% do clearing subroutines (nan galbraith's trick)
	clear functions
	more off;
	% disp('before get vos');
	get_raw_vos 
	% disp('after get vos');
	nfid=fopen('all_ai.txt'); fclose(nfid);
	disp(['Record: ', num2str(length(vos.yday)),  ...
	 '; Files: ', num2str(nfid-3), ...
	 '; Loop: ', num2str(loopcnt)]);
	more on;

	plot_complete_record(comp_fign,vos);

	plot_day_record(day_fign,vos);

	plot_hour_record(hour_fign,vos);

	% disp('before pause');
	% pause(1)
	pause(10); pause(10); pause(10); pause(10); pause(10); pause(10); % 60 seconds
	pause(10); pause(10); pause(10); pause(10); pause(10); pause(10); % 120 seconds


% disp('after pause');
end;

