溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊(cè)×
其他方式登錄
點(diǎn)擊 登錄注冊(cè) 即表示同意《億速云用戶服務(wù)條款》

如何用Matlab制作一款簡單的龍舟小游戲

發(fā)布時(shí)間:2022-03-03 13:04:29 來源:億速云 閱讀:268 作者:iii 欄目:開發(fā)技術(shù)

今天小編給大家分享一下如何用Matlab制作一款簡單的龍舟小游戲的相關(guān)知識(shí)點(diǎn),內(nèi)容詳細(xì),邏輯清晰,相信大部分人都還太了解這方面的知識(shí),所以分享這篇文章給大家參考一下,希望大家閱讀完這篇文章后有所收獲,下面我們一起來了解一下吧。

效果圖:

如何用Matlab制作一款簡單的龍舟小游戲

如何用Matlab制作一款簡單的龍舟小游戲

步驟

1 創(chuàng)建Axes及圖片導(dǎo)入

窗口創(chuàng)建:

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',[]);

圖片導(dǎo)入:

[bkg_C,~,~]=imread('river.png');
[boat_C,~,boat_Alp]=imread('boat.png');
[stone_C,~,stone_Alp]=imread('stone.png');

圖片素材可以從這里拿喲

2 創(chuàng)建timer函數(shù)移動(dòng)背景

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

如何用Matlab制作一款簡單的龍舟小游戲

3 繪制石塊并移動(dòng)

其實(shí)是5個(gè)石塊來回變位置,當(dāng)一個(gè)石塊位置減小到負(fù)數(shù)就把數(shù)值增加并重新繪制

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

如何用Matlab制作一款簡單的龍舟小游戲

4 繪制船并創(chuàng)建鼠標(biāo)回調(diào)

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

如何用Matlab制作一款簡單的龍舟小游戲

5 碰撞判斷函數(shù)

    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函數(shù)做如下改寫

    function dragongame(~,~)
    
		%這里是之前一大堆代碼
		%。。。。。。。。。。
		%。。。。。。。。。。
		%。。。。。。。。。。

        if judge(boatPos,stonePos)
            stop(game)
            set(gcf,'WindowButtonMotionFcn',[]); 
            text(50,200,'游戲結(jié)束','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,['已前進(jìn)',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',['已前進(jìn)',num2str(t),'米']);
        
        if judge(boatPos,stonePos)
            stop(game)
            set(gcf,'WindowButtonMotionFcn',[]); 
            text(50,200,'游戲結(jié)束','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制作一款簡單的龍舟小游戲”這篇文章的所有內(nèi)容,感謝各位的閱讀!相信大家閱讀完這篇文章都有很大的收獲,小編每天都會(huì)為大家更新不同的知識(shí),如果還想學(xué)習(xí)更多的知識(shí),請(qǐng)關(guān)注億速云行業(yè)資訊頻道。

向AI問一下細(xì)節(jié)

免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場,如果涉及侵權(quán)請(qǐng)聯(lián)系站長郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI