matlab代码实现为扫雷游戏增加一个菜单项，可以设置行数、列数和雷数 当点击的方块为0时，能自动打开其周围所有方块

下面是一个用MATLAB实现扫雷游戏增加菜单项的示例代码，该菜单项可以设置行数、列数和雷数，并且在点击方块为0时自动打开其周围的所有方块。

clc;
clear;

% 初始化游戏设置
rows = 10;
cols = 10;
numMines = 10;

% 创建扫雷游戏面板
board = createBoard(rows, cols, numMines);

% 游戏主循环
gameOver = false;
while ~gameOver
    % 显示当前游戏面板
    disp(board);
    
    % 提示用户输入操作
    disp('请选择操作:');
    disp('1. 点击方块');
    disp('2. 设置行数、列数和雷数');
    disp('0. 退出游戏');
    
    choice = input('请输入选项: ');
    
    switch choice
        case 1  % 点击方块
            row = input('请输入行号: ');
            col = input('请输入列号: ');
            
            if row >= 1 && row <= rows && col >= 1 && col <= cols
                if board(row, col) == -1
                    disp('游戏结束，你踩到雷了！');
                    gameOver = true;
                else
                    if board(row, col) == 0
                        % 自动打开周围所有方块
                        openZeros(row, col, board);
                    else
                        board(row, col) = -2; % 标记为已点击方块
                    end
                    
                    % 判断是否胜利
                    if checkWin(board)
                        disp('恭喜你，扫雷成功！');
                        gameOver = true;
                    end
                end
            else
                disp('无效的行号或列号！');
            end
            
        case 2  % 设置行数、列数和雷数
            rows = input('请输入行数: ');
            cols = input('请输入列数: ');
            numMines = input('请输入雷数: ');
            
            % 重新创建游戏面板
            board = createBoard(rows, cols, numMines);
            
        case 0  % 退出游戏
            disp('游戏结束，再见！');
            gameOver = true;
            
        otherwise
            disp('无效的选项！');
    end
end

% 创建扫雷游戏面板函数
function board = createBoard(rows, cols, numMines)
    % 初始化游戏面板
    board = zeros(rows, cols);
    
    % 在随机位置布置雷
    indices = randperm(rows*cols, numMines);
    board(indices) = -1;
    
    % 计算每个方块周围的雷数
    for i = 1:rows
        for j = 1:cols
            if board(i, j) ~= -1
                nearbyMines = countNearbyMines(i, j, board);
                board(i, j) = nearbyMines;
            end
        end
    end
end

% 计算方块周围的雷数函数
function nearbyMines = countNearbyMines(row, col, board)
    nearbyMines = 0;
    [rows, cols] = size(board);
    
    for i = -1:1
        for j = -1:1
            % 跳过当前方块
            if i == 0 && j == 0
                continue;
            end
            
            newRow = row + i;
            newCol = col + j;
            
            % 检查邻近方块是否在游戏面板内并且是雷
            if newRow >= 1 && newRow <= rows && newCol >= 1 && newCol <= cols && board(newRow, newCol) == -1
                nearbyMines = nearbyMines + 1;
            end
        end
    end
end

% 自动打开周围所有方块函数
function openZeros(row, col, board)
    [rows, cols] = size(board);
    
    % 打开当前方块
    board(row, col) = -2; % 标记为已点击方块
    
    for i = -1:1
        for j = -1:1
            newRow = row + i;
            newCol = col + j;
            
            % 检查周围方块是否在游戏面板内并且未点击过
            if newRow >= 1 && newRow <= rows && newCol >= 1 && newCol <= cols && board(newRow, newCol) == 0
                openZeros(newRow, newCol, board);
            end
        end
    end
end

% 检查是否胜利函数
function win = checkWin(board)
    win = all(board(:) ~= -2); % 所有方块都不是未点击方块时胜利
end

这个示例代码实现了一个简单的命令行版扫雷游戏。菜单项包括点击方块、设置行数、列数和雷数以及退出游戏。当点击方块为0时，会自动打开其周围的所有方块。你可以根据需要对代码进行修改和扩展，例如添加更多菜单项、改变游戏界面等。