如何用Matlab做一个贪吃蛇游戏

如何用Matlab做一个贪吃蛇游戏

环境准备：

matlab开发环境：matlab R2010以上版本

操作系统：windows XP 及以上操作系统

matlab贪吃蛇游戏源码以及解析：
游戏运行方法：将以下代码保存为snake_game.m文件，用matlab打开，运行即可。

function snake_game()
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%     按 'Q' 键退出游戏         %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
close all

%OPTIONS%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

difficulty=9;            %难度等级:  1-10
bounds=0;         %是否设置边界  1-是（撞墙退出游戏） 0-不设置边界（撞墙后继续游戏）
axis_limit= 20;   %游戏界面大小

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

d=0; % 方向变量，1/2/3/4 代表键盘的上下左右键
x = round(axis_limit/2); %起始点X坐标
y =round(axis_limit/2); %起始点Y坐标
d =randi([1,4]);% 随机生成一个方向，作为初始方向
a =randi([1 axis_limit-1],1);%随机生成一个食物的X坐标
b =randi([1 axis_limit-1],1);%随机生成一个食物的Y坐标
snake(1,1:2)=[x y];%(X,Y)确定食物的坐标位置
size_snake=1; % 食物的大小
ate=1;   %吃掉食物
ex=0;    % 退出游戏的一个标志
food=[a b];%定义食物的坐标
draw_snake(snake,food,size_snake,axis_limit) % 开始游戏
figure('KeyPressFcn',@my_callback);
    function my_callback(~,event)%callback function for movement
        switch event.Character
            case 'q'  % Q键退出
                ex=1;
            case 30               % 箭头方向
                if(d~=2)
                    d = 1;              %向上 d=1
                end
            case 31
                if(d~=1)
                    d = 2;              %向下 d=2
                end
            case 29
                if(d~=4)
                    d = 3;              %向右 d=3
                end
            case 28
                if(d~=3)
                    d = 4;              %向左 d=4
                end
        end
    end
while (ex~=1) %循环执行，直到按q键退出游戏
    size_snake=size(snake);
    size_snake=size_snake(1);
    for l=size_snake+ate:-1:2
        snake(l,:)=snake(l-1,:);
    end
    switch d         %判断键盘的四个方向
        case 1
            snake(1,2)=snake(1,2)+1;%Y 坐标加1
        case 2
            snake(1,2)=snake(1,2)-1;% Y 坐标减1
        case 3
            snake(1,1)=snake(1,1)+1;% X 坐标加1
        case 4
            snake(1,1)=snake(1,1)-1;% X坐标减1
    end
    draw_snake(snake,food,size_snake,axis_limit)% 绘制蛇的形状
    
    pause(max([(105-difficulty*10)/(10*axis_limit) .001])) %设置难度等级
    
    if snake(1,1)==food(1) && snake(1,2)==food(2)%如果蛇头和食物相遇，再同一点
        ate=1; % 吃标记置1
        food(1) = randi([1 axis_limit-1]);%重新创建一个食物：X坐标
        food(2) = randi([1 axis_limit-1]);%重新创建一个食物：Y坐标
    else
        ate=0;
    end
   
    if bounds==1 % 如果设置了边界
        snake(1,:)
        if snake(1,1)==0 %如果超过了边界
            msgbox('YOU LOST!  ')
            ex=1;
            
        elseif snake(1,2)==0 % 如果超过了边界
            msgbox('YOU LOST!  ')
            ex=1;
            
        elseif snake(1,1)==axis_limit % 如果超过了边界
            msgbox('YOU LOST!  ')
            ex=1;
            
        elseif snake(1,2)==axis_limit % 如果超过了边界
            msgbox('YOU LOST!  ')
            ex=1;
            
        end
    else
        snake=snake-((snake>axis_limit).*(axis_limit+1));
        snake=snake+((snake<0).*(axis_limit+1));
    end
    if (sum(snake(:, 1) ==snake(1, 1)   & snake(:, 2) == snake(1, 2) )>1) %如果蛇碰到了自己的身体，退出
        msgbox('Hit yourself, YOU LOST! ')
        break
        
    end
end
close all
end

function draw_snake(snake,food,size_snake,axis_limit)
for p = 1:size_snake
    plot(snake(p,1),snake(p,2), 'wo')
    hold on
end
plot(food(1,1),food(1,2), 'rs')%creates the vectors for the food and snake and plots them
whitebg([0.1 0.8 0.4])% 设置游戏面板颜色
axis([0, axis_limit, 0, axis_limit])%创建游戏面板，四个界限
hold off
end

不定期分享有趣的代码和游戏，欢迎关注公号：“木石说”