基于Matlab制作一款简单的龙舟小游戏
更新时间：2022年03月02日 14:51:51 作者：slandarer
这篇文章主要为大家介绍如何利用Matlab制作一款简单的龙舟小游戏，文中的示例代码讲解详细，对我们学习Matlab有一定帮助，需要的可以参考一下
效果图：
没找到合适的背景就自己画了个，大家如果有更好看的可以换一下。。。
步骤
1 创建Axes及图片导入
窗口创建：
Mainfig=figure('units','pixels','position',[50 100 760 400],...
'Numbertitle','off','menubar','none','resize','off',...
'name','dragonBoat');
axes('parent',Mainfig,'position',[0 0 1 1],...
'XLim', [0 760],...
'YLim', [0 400],...
'NextPlot','add',...
'layer','bottom',...
'Visible','on',...
'YDir','reverse',...
'XTick',[], ...
'YTick',[]);
图片导入：
[bkg_C,~,~]=imread('river.png');
[boat_C,~,boat_Alp]=imread('boat.png');
[stone_C,~,stone_Alp]=imread('stone.png');
2 创建timer函数移动背景
DrawBkgHdl=image([0 760],[0 400],bkg_C);
t=0;
tempBkg_C=[bkg_C,bkg_C];
fps = 20;
game = timer('ExecutionMode', 'FixedRate', 'Period',1/fps, 'TimerFcn', @dragongame);
start(game)
function dragongame(~,~)
t=t+6;
modt=mod(t,720);
newBkg_C=tempBkg_C(:,1+modt:684+modt,:);
set(DrawBkgHdl,'CData',newBkg_C)
end
3 绘制石块并移动
其实是5个石块来回变位置，当一个石块位置减小到负数就把数值增加并重新绘制
stonePos=[600;870;1140;1410];
stonePos=[stonePos,randi([90,330],[4,1])];
for i=1:size(stonePos,1)
drawStoneHdl(i)=image([stonePos(i,1)-39 stonePos(i,1)+39],[stonePos(i,2)-20 stonePos(i,2)+20],stone_C,'AlphaData',stone_Alp);
end
function dragongame(~,~)
%这里是之前写的背景部分代码
%。。。。。。。。。。。
%。。。。。。。。。。。
stonePos(:,1)=stonePos(:,1)-20/3;
stonePos(stonePos(:,1)<0,2)=randi([90,330],[1,1]);
stonePos(stonePos(:,1)<0,1)=stonePos(stonePos(:,1)<0,1)+1080;
for ii=1:size(stonePos,1)
set(drawStoneHdl(ii),'XData',[stonePos(ii,1)-39 stonePos(ii,1)+39],...
'YData',[stonePos(ii,2)-20 stonePos(ii,2)+20]);
end
end
4 绘制船并创建鼠标回调
boatPos=[380,200];
DrawBoatHdl=image([boatPos(1)-75 boatPos(1)+75],[boatPos(2)-50 boatPos(2)+50],boat_C,'AlphaData',boat_Alp);
set(gcf,'WindowButtonMotionFcn',@moveBoat,'tag','mov')
function moveBoat(~,~)
xy=get(gca,'CurrentPoint');
temp_y=xy(1,2);
temp_y(temp_y<100)=90;
temp_y(temp_y>340)=330;
boatPos=[380,temp_y];
set(DrawBoatHdl,'YData',[temp_y-50 temp_y+50]);
end
5 碰撞判断函数
function flag=judge(Bpos,Spos)
flag1=abs(Bpos(1)-Spos(:,1))<80;
flag2=abs((Bpos(2)+35)-Spos(:,2))<30;
flag3=flag1&flag2;
flag=any(flag3);
end
dragongame函数做如下改写
function dragongame(~,~)
%这里是之前一大堆代码
%。。。。。。。。。。
%。。。。。。。。。。
%。。。。。。。。。。
if judge(boatPos,stonePos)
stop(game)
set(gcf,'WindowButtonMotionFcn',[]);
text(50,200,'游戏结束','FontSize',54,'Color','w','tag','txt')
end
end
6 完整代码
function dragonBoat
Mainfig=figure('units','pixels','position',[50 100 760 400],...
'Numbertitle','off','menubar','none','resize','off',...
'name','dragonBoat');
axes('parent',Mainfig,'position',[0 0 1 1],...
'XLim', [0 760],...
'YLim', [0 400],...
'NextPlot','add',...
'layer','bottom',...
'Visible','on',...
'YDir','reverse',...
'XTick',[], ...
'YTick',[]);
[bkg_C,~,~]=imread('river.png');
[boat_C,~,boat_Alp]=imread('boat.png');
[stone_C,~,stone_Alp]=imread('stone.png');
DrawBkgHdl=image([0 760],[0 400],bkg_C);
stonePos=[600;870;1140;1410];
stonePos=[stonePos,randi([90,330],[4,1])];
for i=1:size(stonePos,1)
drawStoneHdl(i)=image([stonePos(i,1)-39 stonePos(i,1)+39],[stonePos(i,2)-20 stonePos(i,2)+20],stone_C,'AlphaData',stone_Alp);
end
boatPos=[380,200];
DrawBoatHdl=image([boatPos(1)-75 boatPos(1)+75],[boatPos(2)-50 boatPos(2)+50],boat_C,'AlphaData',boat_Alp);
t=0;
tempBkg_C=[bkg_C,bkg_C];
fps = 20;
game = timer('ExecutionMode', 'FixedRate', 'Period',1/fps, 'TimerFcn', @dragongame);
start(game)
text(10,20,['已前进',num2str(t),'米'],'FontSize',14,'Color','w','tag','txt');
set(gcf,'WindowButtonMotionFcn',@moveBoat,'tag','mov')
function dragongame(~,~)
t=t+6;
modt=mod(t,720);
newBkg_C=tempBkg_C(:,1+modt:684+modt,:);
set(DrawBkgHdl,'CData',newBkg_C)
stonePos(:,1)=stonePos(:,1)-20/3;
stonePos(stonePos(:,1)<0,2)=randi([90,330],[1,1]);
stonePos(stonePos(:,1)<0,1)=stonePos(stonePos(:,1)<0,1)+1080;
for ii=1:size(stonePos,1)
set(drawStoneHdl(ii),'XData',[stonePos(ii,1)-39 stonePos(ii,1)+39],...
'YData',[stonePos(ii,2)-20 stonePos(ii,2)+20]);
end
set(findobj('tag','txt'),'String',['已前进',num2str(t),'米']);
if judge(boatPos,stonePos)
stop(game)
set(gcf,'WindowButtonMotionFcn',[]);
text(50,200,'游戏结束','FontSize',54,'Color','w','tag','txt')
end
end
function moveBoat(~,~)
xy=get(gca,'CurrentPoint');
temp_y=xy(1,2);
temp_y(temp_y<100)=90;
temp_y(temp_y>340)=330;
boatPos=[380,temp_y];
set(DrawBoatHdl,'YData',[temp_y-50 temp_y+50]);
end
function flag=judge(Bpos,Spos)
flag1=abs(Bpos(1)-Spos(:,1))<80;
flag2=abs((Bpos(2)+35)-Spos(:,2))<30;
flag3=flag1&flag2;
flag=any(flag3);
end
end
到此这篇关于基于Matlab制作一款简单的龙舟小游戏的文章就介绍到这了,更多相关Matlab龙舟游戏内容请搜索脚本之家以前的文章或继续浏览下面的相关文章希望大家以后多多支持脚本之家！
相关文章
这篇文章主要为大家详细介绍了基于C语言实现三子棋小游戏，文中示例代码介绍的非常详细，具有一定的参考价值，感兴趣的小伙伴们可以参考一下2021-11-11
这篇文章主要介绍了C语言实现进程间通信原理解析,文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价值,需要的朋友可以参考下2020-06-06
大家好，本篇文章主要讲的是C语言之快速排序算法（递归Hoare版）介绍，感兴趣的同学赶快来看一看吧，对你有帮助的话记得收藏一下2021-12-12
这篇文章主要为大家详细介绍了OpenCV实现多图像拼接成一张大图，具有一定的参考价值，感兴趣的小伙伴们可以参考一下2019-01-01![char str[] 与 char *str的区别详细解析](//img.jbzj.com/images/xgimg/bcimg4.png)
以下是对char str[]与char *str的区别进行了详细的介绍，需要的朋友可以过来参考下2013-09-09
扫雷是一款经典的小游戏，这篇文章主要为大家详细介绍了C语言轻松实现扫雷小游戏，文中示例代码介绍的非常详细，具有一定的参考价值，感兴趣的小伙伴们可以参考一下2022-08-08
这篇文章主要为大家详细介绍了C语言实现linux网卡检测的精简版，具有一定的参考价值，感兴趣的小伙伴们可以参考一下2018-06-06
本篇文章是对C语言中空指针、空指针常量、NULL & 0 进行了详细的分析介绍，需要的朋友参考下2013-05-05
带头双向循环链表：结构最复杂，一般用在单独存储数据。实际中使用的链表数据结构，都是带头双向循环链表。另外这个结构虽然结构复杂，但是使用代码实现以后会发现结构会带来很多优势，实现反而简单2022-03-03
这篇文章主要介绍了C++短路求值（逻辑与、逻辑或）实例,以实例形式讲述了逻辑或的短路与逻辑与的短路及相应的应用实例,需要的朋友可以参考下2014-10-10
![char str[] 与 char *str的区别详细解析](http://img.jbzj.com/images/xgimg/bcimg4.png)
最新评论