function [] = blort_blort_blort(data)
% bzlplot(data) plots points extracted from a BZL file.
% The command to convert data into a suitable format is
%    awk '(NF==1){a=b+1} (NF==2){print $0,a; b=a}' file.bzl > file.dat
% then load file.dat into matlab.

sz = size(data);

xlim = [min(min(data(:,1))) max(max(data(:,1)))];
ylim = [min(min(data(:,2))) max(max(data(:,2)))];

clf

ox = data(1,1); oy = data(1,2);   on = data(1,3);
text( 5+data(1,1), 5+data(1,2), num2str(1), 'FontSize', [8] );
set(gca,'XLim',xlim,'YLim',ylim);
hold on
for i = 2:sz(1),
	if (data(i,3) ~= on)
		plot( ox, oy, 'w' );
		pause(1);
		ox = [];   oy = [];
	end
	ox = [data(i,1) ox]; oy = [data(i,2) oy];  on = data(i,3);
	text( 5+data(i,1), 5+data(i,2), num2str(i), 'FontSize', [8] );
end
plot( ox, oy, 'w' );