你可以使用MATLAB编写一个绘制五子棋游戏（或连连看游戏）的函数。以下是一个简单的示例代码：
```matlab
function wzq_plot()
% 创建棋盘
board = zeros(15, 15); % 创建一个15x15大小的棋盘，初始状态为0
% 开始游戏循环
while true
% 绘制棋盘
draw_board(board);
% 玩家下棋
[row, col] = input_move(board);
board(row, col) = 1; % 玩家下的棋标记为1
% 检查游戏是否结束
if check_game_over(board, row, col, 1)
fprintf('玩家赢了！\n');
break;
end
% 电脑下棋
[row, col] = computer_move(board);
board(row, col) = 2; % 电脑下的棋标记为2
% 检查游戏是否结束
if check_game_over(board, row, col, 2)
fprintf('电脑赢了！\n');
break;
end
end
end
function draw_board(board)
clf; % 清空当前图形窗口
% 绘制棋盘网格线
for i = 1:14
line([i+0.5, i+0.5], [0.5, 14.5], 'Color', 'k', 'LineWidth', 1);
line([0.5, 14.5], [i+0.5, i+0.5], 'Color', 'k', 'LineWidth', 1);
end
% 绘制棋子
for i = 1:15
for j = 1:15
if board(i, j) == 1
rectangle('Position', [j-0.75, i-0.75, 1.5, 1.5], 'Curvature', [1, 1], 'FaceColor', 'b');
elseif board(i, j) == 2
rectangle('Position', [j-0.75, i-0.75, 1.5, 1.5], 'Curvature', [1, 1], 'FaceColor', 'r');
end
end
end
axis equal; % 设置坐标轴比例为相等
axis([0.5, 14.5, 0.5, 14.5]); % 设置坐标轴范围
set(gca, 'XTick', [], 'YTick', []); % 隐藏坐标轴刻度
box on; % 显示坐标轴边框
end
function [row, col] = input_move(board)
while true
fprintf('请输入您要下棋的位置（行 列）：');
move = input('');
row = move(1);
col = move(2);
if row < 1 || row > 15 || col < 1 || col > 15 || board(row, col) ~= 0
fprintf('输入无效，请重新输入！\n');
else
break;
end
end
end
function [row, col] = computer_move(board)
% 这里是电脑下棋的逻辑，你可以自行编写
% 这里只是一个随机下棋的示例
while true
row = randi(15);
col = randi(15);
if board(row, col) == 0
break;
end
end
end
function game_over = check_game_over(board, row, col, player)
% 这里是检查游戏是否结束的逻辑，你可以自行编写
% 这里只是一个简单的示例检查，仅检查行和列是否连成5子
game_over = false;
if sum(board(row, :) == player) >= 5 || sum(board(:, col) == player) >= 5
game_over = true;
end
end
```
这段代码实现了一个简单的五子棋游戏，玩家和电脑交替下棋，先连成5子的一方获胜。运行 `wzq_plot()` 函数即可开始游戏。你可以根据需要修改游戏规则和电脑下棋的逻辑。
扫一扫
1021
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
