function saveFeatures(imgfilename, n)

if(nargin<2)
    n=43;
end

img = imread(imgfilename);
figure;imshow(img);
hold on;

xy = [];
for i = 1:n
	disp(['Vous dessinez présentement le point #' num2str(i)]);
	[x,y] = ginput(1);
	plot(x,y,'.r', 'LineWidth',5);
	text(x,y,num2str(i),'fontsize',10) % Affichera le numéro a côté du point
	xy = [xy; x y];
end

asciifilename = [imgfilename(1:find(imgfilename=='.',1,'last')) 'txt'];
save(asciifilename, 'xy', '-ascii');