八数码难题 Matlab(5)

q=b-E{i};

if sum(sum(q.^2))

E(i)={kaka(E{i-1})};

celldisp(E(i))

else

break;

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [a1]=kaka(a)

global I;

global E;

c=[2 8 3;1 0 4;7 6 5];

E(1)={c};

[x,y]=find(a==0);

z=9;

if x==1

if y==1

[x1,y1]=xia(a);

if y1<z

if panduan(x1)

b=x1;

z=y1;

end

end

[x2,y2]=you(a);

if y2<z

if panduan(x2)

b=x2;

z=y2;

end

end

a1=b;

end

if y==2

[x1,y1]=xia(a);

if y1<z

if panduan(x1)

b=x1;

z=y1;

end

end

[x2,y2]=zuo(a);

if y2<z