最近看到一個新聞，8月11日第16屆世界五子棋錦標賽的決賽戰(zhàn)場上，兩名中國棋手分別取得了決賽組和女子組的冠軍。

畢竟是兩年一屆的世界最高水平的五子棋比賽，這樣的成績可以說是很優(yōu)秀了。

看完后，會長也是抖了個機靈，想著把之前用matlab寫過的五子棋游戲程序潤色一把，拿來做了珍貴的一篇推送～

五子棋，是一種邏輯非常簡單的棋盤游戲，入手容易，但想要技法精湛卻非常困難。

圖片來自電影《五子棋少女(2018)》片段

本篇應用實例就是一個簡單的雙人對戰(zhàn)五子棋游戲，而且想在編程實現(xiàn)游戲的同時加深大家對Matlab的while、if、for等邏輯分支和判斷語句的掌握。

寫在前面

概要地講，這樣一個五子棋程序的難點在于如何獲取用戶鼠標點擊事件的信息，鼠標點擊事件是五子棋游戲以及大多數(shù)電腦游戲人機信息交互的橋梁。

我們這里使用ginput函數(shù)的改版ginput1函數(shù)獲取鼠標點擊的位置信息(ginput()函數(shù)能獲取指定點坐標值，大家可以將ginput1改為ginput觀看替換前的效果)。

程序邏輯框架圖 及 代碼

1、首先，新建five.m文件，畫出一個棋盤figure('numbertitle','off','name','數(shù)學建模公會原創(chuàng)');
%棋盤的坐標范圍是橫坐標0-22，縱坐標0-16
axis([0?22?0?16]);
注意，要將橫縱坐標的單位尺度一致化，否則可能會得到一個扁扁的棋盤：axis?equal;
在棋盤上畫上15條交織的直線，形成棋盤輪廓for?i=1:15
????line([1?15],[i?i]);
????line([i?i],[1?15]);
end
下面是在棋盤上方和右端加入游戲狀態(tài)：gonggao=text(8,15.5,'正在進行游戲...');
text(1,15.5,'公眾號：數(shù)學建模公會');
Player1=text(17,12,'Player1');
Player2=text(17,8,'Player2');
time1=text(17,10,'0');
handles.time1=time1;
time2=text(17,6,'0');
handles.time2=time2;
t1=0;%記錄選手耗時
t2=0;
handles.gonggao=gonggao;
2、記錄棋盤狀態(tài)數(shù)據，1代表第一人在此處下棋，2代表第二人在此處下棋，0代表沒人在此處下棋；
使用flag用來記錄當前正在下棋的人qipan=zeros(15);
flag=1;

while?1
????time11=clock;?
????[x,y]=ginput1(1);%為了將ginput1將原始的ginput的十字光標改為其他形狀
????xx=round(x);
????yy=round(y);
while?xx>15||xx<1||yy>15||yy<1||qipan(xx,yy)~=0??%在棋盤之外或者已經有棋子的位置都是非法位置！記住，先判斷在棋盤之內，因為判斷是否有棋子需要在棋盤內
????set(handles.gonggao,'string','非法位置');
????pause(1);
????set(handles.gonggao,'string','正在進行游戲...');
????[x,y]=ginput1(1);
????xx=round(x);
????yy=round(y);
end
time22=clock;
dt=(time22(4:6)-time11(4:6))*[3600?60?1]';
if?flag==1
????line(xx,yy,'marker','.','markersize',30,'color','r');
????qipan(xx,yy)=1;
????t1=t1+dt;
????set(handles.time1,'string',num2str(t1));
????flag=2;
else
????line(xx,yy,'marker','.','markersize',30,'color','b');
????qipan(xx,yy)=2;
????t2=t2+dt;
????set(handles.time2,'string',num2str(t2));
????flag=1;
end3、判斷當前走完棋盤的選手有沒有獲勝，依據qipandata中記錄的數(shù)據
判斷選手1是否獲勝：?if?flag==2
?????a=0;
?????for?i=1:15
?????????for?j=1:15
?????????????if?(j+4<16)&&(sum([qipan(i,j),qipan(i,j+1),qipan(i,j+2),...
?????????????????????qipan(i,j+3),qipan(i,j+4)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break??????
?????????????end
?????????????if?(i+4<16)&&(j+4<16)&&(sum([qipan(i,j),qipan(i+1,j+1),...
?????????????????????qipan(i+2,j+2),qipan(i+3,j+3),qipan(i+4,j+4)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i+4<16)&&(sum([qipan(i,j),qipan(i+1,j),qipan(i+2,j),...
?????????????????????qipan(i+3,j),qipan(i+4,j)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i+4<16)&&(j-4>0)&&(sum([qipan(i,j),qipan(i+1,j-1),...
?????????????????????qipan(i+2,j-2),qipan(i+3,j-3),qipan(i+4,j-4)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(j-4>0)&&(sum([qipan(i,j),qipan(i,j-1),qipan(i,j-2),...
?????????????????????qipan(i,j-3),qipan(i,j-4)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i-4>0)&&(j-4>0)&&(sum([qipan(i,j),qipan(i-1,j-1),...
?????????????????????qipan(i-2,j-2),qipan(i-3,j-3),qipan(i-4,j-4)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i-4>0)&&(sum([qipan(i,j),qipan(i-1,j),qipan(i-2,j),...
?????????????????????qipan(i-3,j),qipan(i-4,j)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i-4>0)&&(j+4<16)&&(sum([qipan(i,j),qipan(i-1,j+1),...
?????????????????????qipan(i-2,j+2),qipan(i-3,j+3),qipan(i-4,j+4)]==ones(1,5))==5)
?????????????????a=1;
?????????????????break
?????????????end
?????????end
?????????if?a==1
?????????????break
?????????end????????
?????end
??????if?a==1
?????????????set(handles.gonggao,'string','選手1獲勝');
?????????????break?????????????
??????end
?end
判斷選手2是否獲勝：if?flag==1
?????a=0;
?????for?i=1:15
?????????for?j=1:15
?????????????if?(j+4<16)&&(qipan(i,j)+qipan(i,j+1)+qipan(i,j+2)+...
?????????????????????qipan(i,j+3)+qipan(i,j+4)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i+4<16)&&(j+4<16)&&(qipan(i,j)+qipan(i+1,j+1)+...
?????????????????????qipan(i+2,j+2)+qipan(i+3,j+3)+qipan(i+4,j+4)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i+4<16)&&(qipan(i,j)+qipan(i+1,j)+qipan(i+2,j)+...
?????????????????????qipan(i+3,j)+qipan(i+4,j)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i+4<16)&&(j-4>0)&&(qipan(i,j)+qipan(i+1,j-1)+...
?????????????????????qipan(i+2,j-2)+qipan(i+3,j-3)+qipan(i+4,j-4)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(j-4>0)&&(qipan(i,j)+qipan(i,j-1)+qipan(i,j-2)+...
?????????????????????qipan(i,j-3)+qipan(i,j-4)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i-4>0)&&(j-4>0)&&(qipan(i,j)+qipan(i-1,j-1)+...
?????????????????????qipan(i-2,j-2)+qipan(i-3,j-3)+qipan(i-4,j-4)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i-4>0)&&(qipan(i,j)+qipan(i-1,j)+qipan(i-2,j)+...
?????????????????????qipan(i-3,j)+qipan(i-4,j)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????????if?(i-4>0)&&(j+4<16)&&(qipan(i,j)+qipan(i-1,j+1)+...
?????????????????????qipan(i-2,j+2)+qipan(i-3,j+3)+qipan(i-4,j+4)==10)
?????????????????a=1;
?????????????????break
?????????????end
?????????end
?????????if?a==1
?????????????break
?????????end
????end??
????if?a==1
???????set(handles.gonggao,'string','選手2獲勝');
???????break???
????end
end?

end?%while?1以上就是五子棋游戲的程序設計，最終效果如下：

最終，會在窗口頂部顯示獲勝者信息：

基本本篇或者數(shù)學建模相關的其他課題，歡迎大家在公眾號留言討論或者加入數(shù)學建模交流qq群(309426503)里與我們切磋交流、經驗分享。

(點擊文章結尾“閱讀原文”，輸入提取碼“wrui”獲取源碼文件鏈接)

有獎互動

最激動人心的環(huán)節(jié)到了...本期有獎互動題目是：

(1)將15子棋盤替換成25子棋盤，并修改相應的棋譜范圍和邏輯規(guī)則；

(2)將五子連珠規(guī)則改為“水平方向四子連珠，其它方向五子連珠”。

第一個將改好的程序發(fā)送到qq群(309426503)中的號友可獲取30元紅包獎勵。此活動截止日期為2019年8月19日晚10點。

馬上九月份即將來臨的——

全國大學生數(shù)學建模競賽(國賽)、研究生數(shù)學建模競賽(研賽)

不知道大家都報名了沒有，

公會有整理好的建模資料，回復“資料”即可獲取哦

圖片來自電影《五子棋少女(2018)》片段。

撰文：HCLO4

編輯：花毛? ? ?

覺得有用，不妨“在看”。

總結

以上是生活随笔為你收集整理的matlab五子棋_应用 | 五子棋游戏——没人能在我的程序里打败我的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。