该楼层疑似违规已被系统折叠 隐藏此楼查看此楼

function [ ] = five()

global a h m1 n1 m2 n2 t h1 h2 h3 color score hsc ha ss

hf=figure('resize','off','name','five',...

'position',[360 280 560 420],'numbertitle','off');

ha=axes;

set(gcf,'menubar','none','color',[0.3 0.3 0.3])

set(gca,'position',[0.2300 0.1100 0.7750 0.8150])

set(gca,'xlim',[0,9],'ylim',[0,9])

set(ha,'xtick',[],'ytick',[],'box','on')

set(ha,'color',[0.7 0.6,0.6])

set(ha,'DataAspectRatio',[1 1 1],'PlotBoxAspectRatio',[1 1 1])

x=repmat([0;9],1,9);

y=[1:9;1:9];

line(x,y,'color','k')

line(y,x,'color','k')

hst=uicontrol('style','text','string','Score','fontsize',30,...

'units','normal','position',[0.02,0.55,0.26,0.14],'parent',hf,...

'ForegroundColor','w','backgroundcolor',[0.3 0.3 0.3],...

'fontweight','bold');

hsc=uicontrol('style','text','string','0','fontsize',24,...

'units','normal','position',[0.02,0.4,0.26,0.14],'parent',hf,...

'ForegroundColor','w','backgroundcolor',[0.3 0.3 0.3],...

'fontweight','bold');

hbt=uicontrol('style','pushbutton','string','Restart','fontsize',18,...

'units','normal','position',[0.02,0.16,0.26,0.14],'parent',hf,...

'fontweight','bold','callback',@restart);

color=[...

1 1 0;

1 0 1;

0 1 1;

1 0 0;

0 1 0;

0 0 1;

0.7 0.3 0;

];

h1=annotation('ellipse',[0.04,0.84,0.06,0.08],'facecolor','k');

h2=annotation('ellipse',[0.12,0.84,0.06,0.08],'facecolor','k');

h3=annotation('ellipse',[0.2,0.84,0.06,0.08],'facecolor','k');

set(ha,'buttondownfcn',@select2)

initialize

function initialize()

global a h m1 n1 m2 n2 t h1 h2 h3 color score hsc ss

a=zeros(9);

h=zeros(9)*NaN;

m1=[];

n1=[];

m2=[];

n2=[];

score=0;

ss=0;

k=rs(1:81,5);

t=ceil(rand(1,5)*7);

a(k)=t;

[m,n] = ind2sub([9,9],k);

y=9.5-m;

x=n-0.5;

for p=1:5

h(k(p))=line(x(p),y(p),'marker','o','markersize',24,...

'markerfacecolor',color(t(p),:),'markeredgecolor','none',...

'buttondownfcn',@select1);

end

t=ceil(rand(1,3)*7);

set(h1,'facecolor',color(t(1),:))

set(h2,'facecolor',color(t(2),:))

set(h3,'facecolor',color(t(3),:))

function [k]=rs(s,n);

for m=1:n

t=ceil(rand*length(s));

k(m)=s(t);

s(t)=[];

end

function select1(src,eventdata)

global a h m1 n1

n1=ceil(get(src,'xdata'));

m1=ceil(9-get(src,'ydata'));

set(h(~isnan(h)),'markeredgecolor','none')

set(src,'markeredgecolor','w')

function select2(src,eventdata)

global a h m1 n1 m2 n2 t h1 h2 h3 color score hsc ha ss

if isempty(m1) || isempty(n1)

return

end

cp=get(src,'currentpoint');

n2=ceil(cp(1,1));

m2=ceil(9-cp(1,2));

if a(m2,n2)

return

end

b=~a;

b(m1,n1)=1;

b=bwlabel(b,4);

if b(m1,n1)~=b(m2,n2)

return

end

a(m2,n2)=a(m1,n1);

a(m1,n1)=0;

h(m2,n2)=h(m1,n1);

h(m1,n1)=NaN;

set(h(m2,n2),'xdata',n2-0.5,'ydata',9.5-m2,'markeredgecolor','none')

m1=[];