小编给大家分享一下Matlab怎么实现贪吃蛇小游戏,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!
补动图:
没错这就有点类似贪吃蛇大作战里的蛇啦
然后做出的改进包括:
在关闭窗口时不报错的设置,因为用了timer这个函数,在关闭图像时他会报错,我们就可以加入一个回调函数:
set(gcf,'tag','co','CloseRequestFcn',@clo); function clo(~,~) stop(game) delete(findobj('tag','co')); clf close end
意思是每次有关闭请求时就调用clo这个函数
然后为了防止他提示你用递归的方式调用close,
再加上delete(findobj(‘tag’,‘co’));删除之前的设定。
完整代码
function snake %axis set.............................................................. axis equal len=40; axis(0.5+[0,len,0,len]) set(gca,'xtick',[],'ytick',[],'xcolor','w','ycolor','w') set(gca,'color','k') hold on %snake and food begining set........................................... snaketop=[5,5;4.5,5]; body=[5,5;4.5,5;4,5;3.5,5;3,5;2.5,5]; food=[10,10]; direction=[1,0]; long=6; plotsnake=scatter(gca,body(:,1),body(:,2),120,'w','filled'); plotfood=scatter(gca,food(1),food(2),120,'w','filled'); %timer set............................................................. set(gcf,'WindowButtonMotionFcn',@snakefcn) fps = 8; game = timer('ExecutionMode', 'FixedRate', 'Period',1/fps, 'TimerFcn', @snakegame); start(game) %.................................................................................. set(gcf,'tag','co','CloseRequestFcn',@clo); function clo(~,~) stop(game) delete(findobj('tag','co')); clf close end function snakegame(~,~) snaketop=[body(1,:)+direction;body(1,:)+1/2*direction]; snaketop(snaketop>len)=snaketop(snaketop>len)-len; snaketop(snaketop<1)=snaketop(snaketop<1)+len; body=[snaketop;body]; body(long+1:end,:)=[]; if (snaketop(1,1)-food(1))^2+(snaketop(1,2)-food(2))^2<1 long = long + 2; food = randi(len, [1, 2]); end set(plotfood,'XData',food(1),'YData',food(2)) set(plotsnake,'XData',body(:,1),'YData',body(:,2)) end function snakefcn(~,~) xy=get(gca,'CurrentPoint'); x=xy(1,1);y=xy(1,2); dir=[x-body(1,1),y-body(1,2)]; dis=sqrt((x-body(1,1))^2+(y-body(1,2))^2); direction=dir/dis; end end
以上是“Matlab怎么实现贪吃蛇小游戏”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注亿速云行业资讯频道!
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。