利用Matlab制作三子棋游戲的示例代碼
更新時(shí)間：2022年03月03日 10:47:49 作者：slandarer
三子棋是一種民間傳統(tǒng)游戲，又叫九宮棋、圈圈叉叉、一條龍、井字棋等。將正方形對(duì)角線連起來(lái)，相對(duì)兩邊依次擺上三個(gè)雙方棋子，只要將自己的三個(gè)棋子走成一條線，對(duì)方就算輸了。本文將用Matlab制作這一經(jīng)典游戲，感興趣的可以試一試
效果：
注： 由于用uifigure和uiaxes寫(xiě)的會(huì)比較慢，改成常規(guī)的axes和figure會(huì)快很多。
完整代碼：
function OX_chess
fig=uifigure('units','pixels',...
'position',[350 100 500 500],...
'Numbertitle','off',...
'name','OX_chess',...
'Color',[1 1 1],...
'resize','off',...
'menubar','none');
ax=uiaxes('Units','pixels',...
'parent',fig,...
'Color',[0.9106 0.9773 1],...
'Position',[-22 -20 540 540],...
'XLim',[0-20 400+20],...
'YLim',[0-20 400+20],...
'XColor',[0.8706 0.9373 0.9686],...
'YColor',[0.8706 0.9373 0.9686]);
ax.Toolbar.Visible='off';
hold(ax,'on')
drawCheckerboard()
%==========================================================================
set(fig,'WindowButtonDownFcn',@buttondown)
function buttondown(~,~)
xy=get(ax,'CurrentPoint');
xp=xy(1,2);yp=xy(1,1);
Pos=[xp,yp];
Pos=round((Pos-50)./150)+1;
if map(Pos(2),Pos(1))==0
switch turn
case 1,drawO(Pos(2),Pos(1)),turn=-1;map(Pos(2),Pos(1))=1;
case -1,drawX(Pos(2),Pos(1)),turn=1;map(Pos(2),Pos(1))=-1;
end
end
judge();
end
function judge(~,~)
judge1=sum(map,1);
judge2=sum(map,2);
judge3=sum(map(eye(3)==1));
judge4=sum(map([3,5,7]));
winner=[];
switch 1
case any(judge1==3)||any(judge2==3)||judge3==3||judge4==3,winner='甜甜圈';
case any(judge1==-3)||any(judge2==-3)||judge3==-3||judge4==-3,winner='手指餅干';
end
if ~isempty(winner)
buttonName1=uiconfirm(fig,[winner,'獲得勝利'],[winner,'獲得勝利'],'Options',{'關(guān)閉','重新開(kāi)始'},'Icon','success');
if isempty(buttonName1),buttonName1='end';end
if strcmp(buttonName1,'重新開(kāi)始'),restart();
elseif strcmp(buttonName1,'關(guān)閉');delete(fig);
end
end
end
function restart(~,~)
turn=1;
map=zeros(3,3);
delete(findobj(ax,'type','patch'))
delete(findobj(ax,'type','line'))
delete(findobj(ax,'type','scatter'))
drawCheckerboard()
end
turn=1;
map=zeros(3,3);
%==========================================================================
function drawX(i,j)
x=50+150*(i-1);
y=50+150*(j-1);
Xb=[-55:1:+55,+55:-1:-55];
Xs=[-50:1:+50,+50:-1:-50];
Yb=[(-15).*ones(1,length(Xb)/2),(+15).*ones(1,length(Xb)/2)];
Ys=[(-12).*ones(1,length(Xs)/2),(+12).*ones(1,length(Xs)/2)];
Xsin=-48:0.1:48;
Ysin=sin(Xsin./2).*5;
Xp=-47:15:45;
Yp=0.*ones(size(Xp));
theta=pi/6;
fill(ax,x+Xb.*cos(theta)-Yb.*sin(theta),y+Yb.*cos(theta)+Xb.*sin(theta),[1.0000 0.9216 0.6588]);
fill(ax,x+Xs.*cos(theta)-Ys.*sin(theta),y+Ys.*cos(theta)+Xs.*sin(theta),[0.6627 0.6431 0.2745],'EdgeColor','none');
plot(ax,x+Xsin.*cos(theta)-Ysin.*sin(theta),y+Ysin.*cos(theta)+Xsin.*sin(theta),'LineWidth',2,'Color',[0.9451 0.9843 0.8471])
scatter(ax,x+Xp.*cos(theta)-Yp.*sin(theta),y+Yp.*cos(theta)+Xp.*sin(theta),10,'filled','CData',[0.9216 0.4000 0.3725])
theta=3*pi/6;
fill(ax,x+Xb.*cos(theta)-Yb.*sin(theta),y+Yb.*cos(theta)+Xb.*sin(theta),[1.0000 0.9216 0.6588]);
fill(ax,x+Xs.*cos(theta)-Ys.*sin(theta),y+Ys.*cos(theta)+Xs.*sin(theta),[0.6627 0.6431 0.2745],'EdgeColor','none');
plot(ax,x+Xsin.*cos(theta)-Ysin.*sin(theta),y+Ysin.*cos(theta)+Xsin.*sin(theta),'LineWidth',2,'Color',[0.9451 0.9843 0.8471])
scatter(ax,x+Xp.*cos(theta)-Yp.*sin(theta),y+Yp.*cos(theta)+Xp.*sin(theta),10,'filled','CData',[0.9216 0.4000 0.3725])
end
function drawO(i,j)
x=50+150*(i-1);
y=50+150*(j-1);
R=55;
t=0:0.01:2*pi;
XR=x+cos(t).*R;
YR=y+sin(t).*R;
Xr=x+cos(t).*R.*0.4;
Yr=y+sin(t).*R.*0.4;
fill(ax,[XR,Xr],[YR,Yr],[0.90 0.73 0.45],'EdgeColor',[0.67 0.42 0.15],'LineWidth',1)
[t,rL,RL]=createRandomLine_O(R);
T=[t,t(end:-1:1)];
Rr=[RL,rL];
X=x+cos(T).*Rr;
Y=y+sin(T).*Rr;
fill(ax,X,Y,[0.33 0.18 0.12],'EdgeColor','none')
candiColor=[ 0.9765 0.8353 0.4902
0.9647 0.9647 0.8314
0.1490 0.4235 0.6980
0.2431 0.4510 0.3490
0.9490 0.9647 0.9686
0.7647 0.1059 0.1569
0.2784 0.1843 0.5216
0.8824 0.6471 0.7490];
for i=1:35
t1=rand(1)*2*pi;
t2=rand(1)*2*pi;
r1=(R*0.6-5).*rand(1)+R*0.4;
x1=x+cos(t1)*r1;
y1=y+sin(t1)*r1;
x2=x1+cos(t2)*7;
y2=y1+sin(t2)*7;
plot(ax,[x1,x2],[y1,y2],'Color',candiColor(randi(size(candiColor,1)),:),'LineWidth',2);
end
end
function [t,r,R]=createRandomLine_O(RR)
t=0:0.2:2*pi;
R=(RR-3)+5.*rand(size(t));
R=interp1(t,R,0:0.01:2*pi,'spline');
r=(RR*0.4+7)-6.*rand(size(t));
r=interp1(t,r,0:0.01:2*pi,'spline');
t=0:0.01:2*pi;
end
function drawCheckerboard
[Xq,Yq]=createRandomLine_CB(440,10,5,26);
fill(ax,Xq-20,Yq+112,[0.96 0.80 0.52],'EdgeColor',[0.45 0.11 0.05].*0.8,'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,5,26);
fill(ax,Xq-20,Yq+262,[0.96 0.80 0.52],'EdgeColor',[0.45 0.11 0.05].*0.8,'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,5,26);
fill(ax,Yq+112,Xq-20,[0.96 0.80 0.52],'EdgeColor',[0.45 0.11 0.05].*0.8,'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,5,26);
fill(ax,Yq+262,Xq-20,[0.96 0.80 0.52],'EdgeColor',[0.45 0.11 0.05].*0.8,'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,2,10);
fill(ax,Xq-20,Yq+120,[0.97 0.91 0.65],'EdgeColor',[0.5,0.3 0.3],'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,2,10);
fill(ax,Xq-20,Yq+270,[0.97 0.91 0.65],'EdgeColor',[0.5,0.3 0.3],'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,5,10);
fill(ax,Yq+120,Xq-20,[0.97 0.91 0.65],'EdgeColor',[0.5,0.3 0.3],'LineWidth',1)
[Xq,Yq]=createRandomLine_CB(440,10,5,10);
fill(ax,Yq+270,Xq-20,[0.97 0.91 0.65],'EdgeColor',[0.5,0.3 0.3],'LineWidth',1)
end
function [Xq,Yq]=createRandomLine_CB(Lim,N,randMax,h)
X1=linspace(0,Lim,N);
X2=X1(end:-1:1);
Y1=-randMax.*rand(size(X1));
Y2=randMax.*rand(size(X2));
Xq1=0:0.1:Lim;
Yq1=interp1(X1,Y1,Xq1,'spline');
Xq2=Lim:-0.1:0;
Yq2=interp1(X2,Y2,Xq2,'spline')+h;
Xq=[Xq1,Xq2];
Yq=[Yq1,Yq2];
end
end
到此這篇關(guān)于利用Matlab制作三子棋游戲的示例代碼的文章就介紹到這了,更多相關(guān)Matlab三子棋游戲內(nèi)容請(qǐng)搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家！
相關(guān)文章
這篇文章主要介紹了c++自定義sort()函數(shù)的排序方法介紹，文章通過(guò)圍繞主題展開(kāi)詳細(xì)的內(nèi)容戒殺，具有一定的參考價(jià)值，需要的小伙伴可以參考一下2022-09-09
C語(yǔ)言實(shí)現(xiàn)短字符串壓縮的三種方法詳解
這篇文章主要和大家分享一下smaz，shoco，unisox2三種短字符串壓縮算法，并分別探索它們各自的壓縮率與壓縮和解壓縮性能，需要的可以參考一下2022-08-08
這篇文章主要介紹了C語(yǔ)言轉(zhuǎn)義字符詳解,本篇文章通過(guò)簡(jiǎn)要的案例,講解了C語(yǔ)言轉(zhuǎn)義字符該項(xiàng)技術(shù)的了解與使用,以下就是詳細(xì)內(nèi)容,需要的朋友可以參考下2021-07-07
這篇文章主要給大家分享的是C++常用字符串函數(shù)的大全，cstring.h庫(kù)即C語(yǔ)言中的string.h庫(kù)，它是C語(yǔ)言中為字符串提供的標(biāo)準(zhǔn)庫(kù)。C++對(duì)此進(jìn)行了兼容，所以我們?cè)贑++當(dāng)中一樣可以使用，下面文章的詳細(xì)內(nèi)容,需要的朋友可以參考一下2021-11-11
C++簡(jiǎn)單實(shí)現(xiàn)shared_ptr的代碼
智能指針用于資源管理，為了保證資源的操作得到順利的執(zhí)行防止資源泄露，因此大多數(shù)實(shí)現(xiàn)都以noexcept在參數(shù)列表后聲明為不拋出異常，這篇文章主要介紹了C++簡(jiǎn)單實(shí)現(xiàn)shared_ptr的代碼,需要的朋友可以參考下2022-09-09
c++中struct和class的區(qū)別小結(jié)
在C++中,class和struct都是用于定義自定義數(shù)據(jù)類型的關(guān)鍵字,本文主要介紹了c++中struct和class的區(qū)別小結(jié),具有一定的參考價(jià)值,感興趣的可以了解一下2023-08-08
C++實(shí)現(xiàn)移動(dòng)立方體示例講解
這篇文章主要介紹了C++實(shí)現(xiàn)移動(dòng)立方體，文中通過(guò)示例代碼介紹的非常詳細(xì)，對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來(lái)一起學(xué)習(xí)吧2022-12-12
C++實(shí)現(xiàn)動(dòng)態(tài)煙花效果
這篇文章主要介紹了利用C++實(shí)現(xiàn)的放煙花程序，用到了EGE圖形庫(kù)，文中的示例代碼講解詳細(xì)，對(duì)我們學(xué)習(xí)C++有一定幫助，需要的可以參考一下2022-01-01
Eclipse中C++連接mysql數(shù)據(jù)庫(kù)
這篇文章主要為大家詳細(xì)介紹了Eclipse中C++連接mysql數(shù)據(jù)庫(kù) ，文中示例代碼介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們可以參考一下2019-06-06
詳解C++的String類的字符串分割實(shí)現(xiàn)
這篇文章主要介紹了詳解C++的String類的字符串分割實(shí)現(xiàn)的相關(guān)資料,需要的朋友可以參考下2017-07-07