
load('output\images.mat')
try
load('scenescores')
catch
    scenescores=nan(0,2);
end
for ii=1:length(images)
    p=images(ii);
    if ismember(p.date,scenescores(:,1))
        continue
    end
    
    clf
    A=geoimread(p.filename);
    A=imresize()
    imshow(chisteq(im2single(A)))
    
    title(sprintf('%.0f/%.0f',ii,length(r)))

    
    [X,Y,button]=ginput(1);
    if ~isempty(button)
        switch button
            case num2cell('0':'9')
                scenescores(end+1,:)=[p.date button-'0'];
            otherwise
        end
    end
end
save('scenescores','scenescores');
