function laserscans = scan()

% Initial input = output from calibrate.m, distance from laser to camera
% Name baseline image "sbase.jpg", and the scan images
% "sscan_1.jpg",...,"sscan_n.jpg"

n = input('Input total number of images including baseline: ') - 1;
baseline = convert('sbase.jpg');
ytotal = size(baseline,1);

laserscans = zeros(ytotal, n);

for i = 1:n
	image = convert(strcat('sscan_',num2str(i),'.jpg'));
	image = image - baseline;
	laserscans(:,i) = laserfind(image);
	save laserscans.mat laserscans
end