clear;

dat_fnm1='../exp_data/081102/081102.000'
dat_fnm2='../exp_data/090130/090130.000'
dat_fnm3='../exp_data/090316/090316.000'
range=[1 0 1 1];
indx1 = dlmread(dat_fnm1, ' ', range);
%indx2 = dlmread(dat_fnm2, ' ', range);
%indx3 = dlmread(dat_fnm3, ' ', range);
sctr = indx1(1);
gstp = indx1(2);
%range[3 0 3 1];
%[start, end] = dlmread(dat_fnm, ' ', range);
gstr = -30;
gend = 30;
dg = 1;
ang = [gstr:dg:gend];
range=[6 0 6+sctr+1 gstp]
data1 = dlmread(dat_fnm1, ' ', range);
data2 = dlmread(dat_fnm2, ' ', range);
data3 = dlmread(dat_fnm3, ' ', range);
%
%for i = 1:61
%    if data(1,i) > 500
%        data(1,i) = 5000;
%    end
%end
%

figure(1);
%subplot(2,2,1);
plot(ang, data1(1,1:61), '-rs','MarkerSize',4);
ylim([0 3000]);
grid on;
xlabel('Angle (deg.)');
ylabel('cps');
hold on
plot(ang, data2(1,1:61), '-bs','MarkerSize',4);
plot(ang, data3(1,1:61), '-ks','MarkerSize',4);
hold off