clear all
clc
in=imread('A1.png');
base=imread('A2.png');
subplot(2,2,1),imshow(in);
subplot(2,2,2),imshow(base);
k=0;
while k==0
cpselect(in,base);
k=waitforbuttonpress;
end
tform=cp2tform(movingPoints,fixedPoints,'projective');
out=imtransform(in,tform);
subplot(2,2,3),imshow(out);