Matlab五子棋源代码
:function z=jcs() try z=dlmread('nzdr'); catch dlmwrite('nzdr',0);z=dlmread('nzdr'); end
function wuziqi(liyuan) %liyuan参数的作用,如果是5那就5子棋,4就4子棋,10就10子棋。不给,就默认为5; if nargin==0 liyuan=5; end nzd=jcs(); figure('position',[-3 5 1024 734]);axes('position',[0.05 0.05 0.9 0.9]); axis equal;h_ax=gca;set(h_ax,'visible','off');set(gcf ,'MenuBar','none','color',[0.8125 1.0000 0.1875]);hqi=1;hqib=1; hold on; for m=1:19 text(m,0.5,num2str(m));text(0.5,m,char(116-m));
|