基於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龍舟遊戲內容請搜索WalkonNet以前的文章或繼續瀏覽下面的相關文章希望大傢以後多多支持WalkonNet!
推薦閱讀:
- 教你用Matlab制作黃金礦工小遊戲
- 快速解決cv2.imread()讀取圖像為BGR的問題
- python OpenCV圖像直方圖處理
- 利用Matlab制作一款3D版2048小遊戲
- C++類型轉換詳解