LUAT游戏第一弹---贪吃蛇

最新推荐文章于 2023-06-29 22:18:09 发布
最新推荐文章于 2023-06-29 22:18:09 发布
阅读量1.1k 收藏 3
点赞数
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/qq_29536545/article/details/119035602
版权

文章目录

前言

开个新系列，基于LUAT制作小游戏

准备工作

硬件准备

1，准备724,724等能运行luat的开发版
2，矩阵键盘

软件准备

首先呢，准备几个需要用到的图片，例如这样的

0

开始制作

游戏制作

好了，图片准备完了，开始做吧，我使用的是ST7899的LCD做的，1.54寸屏幕上分辨率 240*240，画面细腻有弹性

所以最先准备的是LCD驱动，直接使用

0

有屏幕了，还需要按键呀，矩阵按键走起

module(..., package.seeall)


--[[
sta：按键状态，IDLE表示空闲状态，PRESSED表示已按下状态，LONGPRESSED表示已经长按下状态
longprd：长按键判断时长，默认3秒；按下大于等于3秒再弹起判定为长按键；按下后，在3秒内弹起，判定为短按键
longcb：长按键处理函数
shortcb：短按键处理函数
]]
local sta,longprd = "IDLE",1500

local function longtimercb()
 log.info("keypad.longtimercb")
 sta = "LONGPRESSED"
end

local lcd_out = pins.setup(pio.P0_7,1)--GPIO7配置为输出

local function keyMsg(msg)
 --msg.key_matrix_row：行
 --msg.key_matrix_col：列
 --msg.pressed：true表示按下，false表示弹起
 --log.info("keyMsg",msg.key_matrix_row,msg.key_matrix_col,msg.pressed)
 if msg.pressed then
 disp.sleep(0)
 lcd_out(1)
 if msg.key_matrix_row == 2 then
 if msg.key_matrix_col == 1 then
 sys.publish("key","key_up")
 elseif msg.key_matrix_col == 2 then
 sys.publish("key","key_back")
 elseif msg.key_matrix_col == 3 then
 end
 elseif msg.key_matrix_row == 3 then
 if msg.key_matrix_col == 1 then
 sys.publish("key","key_down")
 elseif msg.key_matrix_col == 2 then
 end
 elseif msg.key_matrix_row == 4 then
 if msg.key_matrix_col == 1 then
 sys.publish("key","key_left")
 elseif msg.key_matrix_col == 2 then
 sys.publish("key","key_right")
 end
 elseif msg.key_matrix_row == 255 then
 if msg.key_matrix_col == 255 then
 sta = "PRESSED"
 sys.timerStart(longtimercb,longprd)
 end
 end
 else
 sys.timerStop(longtimercb)
 if sta=="PRESSED" then
 sys.publish("key","key_ok")
 elseif sta=="LONGPRESSED" then
 rtos.poweroff()
 end
 sta = "IDLE"
 end
end

--注册按键消息处理函数
rtos.on(rtos.MSG_KEYPAD,keyMsg)
--初始化键盘阵列
--第一个参数：固定为rtos.MOD_KEYPAD，表示键盘
--第二个参数：目前无意义，固定为0
--第三个参数：表示键盘阵列keyin标记，例如使用了keyin0、keyin1、keyin2、keyin3，则第三个参数为1<<0|1<<1|1<<2|1<<3 = 0x0F
--第四个参数：表示键盘阵列keyout标记，例如使用了keyout0、keyout1、keyout2、keyout3，则第四个参数为1<<0|1<<1|1<<2|1<<3 = 0x0F
rtos.init_module(rtos.MOD_KEYPAD,0,0x1C,0x0E)

这样就可以通过消息机制得到按键事件了，加了长按关机

按键有了，屏幕有了，接下来开始愉快的掉头发吧

首先创建一个协程作为入口，然后加个游戏图标

disp.setbkcolor(0x0000)
 disp.clear()
 lcd.setcolor(0x00FF)
 disp.setfontheight(24)
 disp.puttext(common.utf8ToGb2312("贪吃蛇"),(lcd.HEIGHT-string.utf8Len("贪吃蛇")*24)/2,170)
 disp.putimage("/lua/snake.png",90,90)
 disp.update()
 disp.setfontheight(16)
 sys.wait(2000)

好，接下来开始做蛇：

我们知道，对象由属性和方法组成。LUA中最基本的结构是table，所以需要用table来描述对象的属性。

lua 中的 function 可以用来表示方法。那么LUA中的类可以通过 table + function 模拟出来。

至于继承，可以通过 metetable 模拟出来，所以有了我们的蛇：

local sk = {}
sk.__index = sk
local function snake()
 return setmetatable({
 x = 20+2*20,
 y = 40+0,
 body = {{20+2*20,40+0},{40,40},{20,40}},
 body_len = 3,
 direction = "right",
 food = {},
 run = false,
    }, sk)
end

可以看到属性有蛇头的初始坐标，蛇身坐标，长度，蛇头方向，食物坐标，蛇的状态，接下来我们使用snake1=snake()即可创建一条蛇的对象，

然后放蛇！！！！不对，界面是不是很丑？没有围墙跑出去咬人咋整，哈哈哈，随后初始化游戏环境：

local function snake_init()
 disp.clear()
 disp.puttext(common.utf8ToGb2312("得分:"),10,2)
 disp.puttext(common.utf8ToGb2312(score),55,2)
 for i = 0, LCD_WIDTH-20, 20 do
 disp.putimage("/lua/wall.png",i,20)
 end
 for i = 0, LCD_WIDTH-20, 20 do
 disp.putimage("/lua/wall.png",i,LCD_WIDTH-20)
 end
 for i = 20, LCD_HEIGHT-20, 20 do
 disp.putimage("/lua/wall.png",0,i)
 end
 for i = 20, LCD_HEIGHT-20, 20 do
 disp.putimage("/lua/wall.png",LCD_HEIGHT-20,i)
 end
 if snake1.direction=="left" then
 disp.putimage("/lua/snake_l.png",snake1.x,snake1.y)
 elseif snake1.direction=="right" then
 disp.putimage("/lua/snake_r.png",snake1.x,snake1.y)
 elseif snake1.direction=="up" then
 disp.putimage("/lua/snake_u.png",snake1.x,snake1.y)
 elseif snake1.direction=="down" then
 disp.putimage("/lua/snake_d.png",snake1.x,snake1.y)
 end
 for k,v in pairs(snake1.body) do
 if k==1 then
 -- body
 else
 disp.putimage("/lua/snake_body.png",v[1],v[2])
 end
 end
 disp.putimage("/lua/start.png",40,100)
 disp.update()
end

可以看到我们放了墙，和墙，之后呢？按开始进入游戏入口

while true do
   local result, data = sys.waitUntil("key",20)
   if result == true then
     if data == "key_ok" then
       game_thread()
     end
   end
 end

游戏里做一个协程吧，死了或者退出就break出来，nice

local function game_thread()
 snake1.run = true
 snake1:putfood()
 while true do
 snake1:draw()
 disp.putimage("/lua/food.png",snake1.food[1],snake1.food[2])
 disp.update()
 local result, data = sys.waitUntil("key",500 - score*4)
 if result == true then
 if data == "key_left" then
 snake1.direction="left"
 elseif data == "key_right" then
 snake1.direction="right"
 elseif data == "key_up" then
 snake1.direction="up"
 elseif data == "key_down" then
 snake1.direction="down"
 elseif data == "key_back" then
 snake1.run = false
 elseif data == "key_ok" then
 disp.putimage("/lua/start.png",40,100)
 disp.update()
 while true do
 local result, data = sys.waitUntil("key",500 - score*4)
 if result == true then
 if data == "key_ok" then
 break
 end
 end
 end
 end
 end
 if snake1.run == false then
 snake1:kill()
 snake_init()
 break
 end
 end
end

可以看到，进去之后让蛇的状态为存活，投食，之后循环画蛇画食物，通过按键改变蛇方向状态，如果死了或者退出就break出去，得分越高，速度越快，那我们还缺什么呢？对哦，投食和画蛇

那么投食来了

function sk:putfood()
 local state
 local x
 local y
 repeat
 x = math.random(1,10)*20
 y = math.random(2,10)*20
 state = 0
 for k,v in pairs(self.body) do
 if x == v[1] and y == v[2] then
 state = 1
 break
 end
 end
 until( state == 0 )
 self.food[1]=x
 self.food[2]=y
end

很简单，做两个墙以内的，不在蛇身上的随机数来放食物，之后画蛇：

function sk:draw()
 disp.drawrect(20,40,220,220,0x0000)
 if self.direction=="left" then
 self.x = self.x - 20
 disp.putimage("/lua/snake_l.png",self.x,self.y)
 elseif self.direction=="right" then
 self.x = self.x + 20
 disp.putimage("/lua/snake_r.png",self.x,self.y)
 elseif self.direction=="up" then
 self.y = self.y - 20
 disp.putimage("/lua/snake_u.png",self.x,self.y)
 elseif self.direction=="down" then
 self.y = self.y + 20
 disp.putimage("/lua/snake_d.png",self.x,self.y)
 end

 for k,v in pairs(self.body) do
 if self.x == v[1]and self.y == v[2]then
 self.run = false
 break
 end
 end

 if self.x>LCD_WIDTH-20-20 or self.x<20 or self.y>LCD_HEIGHT-20-20 or self.y<20+20 then
 self.run = false
 table.insert(self.body,1,{self.x,self.y})
 table.remove (self.body)
 elseif self.x ==self.food[1] and self.y==self.food[2] then
 disp.drawrect(0,0,240,19,0x0000)
 score=score+1
 disp.puttext(common.utf8ToGb2312("得分:"),10,2)
 disp.puttext(common.utf8ToGb2312(score),55,2)
 table.insert(self.body,1,{self.x,self.y})
 self:putfood()
 else
 table.insert(self.body,1,{self.x,self.y})
 table.remove (self.body)
 end
 for k,v in pairs(self.body) do
 if k == 1 then
 -- body
 else
 disp.putimage("/lua/snake_body.png",v[1],v[2])
 end
 end
end

也很好理解，就是不断地加蛇身坐标，删除蛇尾坐标，如果吃到食物就不删除蛇尾，吃自己或者撞墙就死掉

大功告成，还差点什么？？？？？对喽，B G M

0

local function game_thread() audio.play(0,"FILE","/lua/bgm.mp3",1,nil,true)

在入口处加上，OK，开玩！！！

0

好了，一起来玩好玩的贪吃蛇吧

Dozingfiretruck
关注
  • 0
    点赞
  • 踩
  • 3
    收藏
    觉得还不错? 一键收藏
  • 1
    评论
【quick-cocos2d-lua】 贪吃蛇游戏
Super_Cola的博客
06-23 916
  登录界面：开始游戏，设置，退出等按钮标签 游戏界面：主角蛇，奖励物苹果，边界框框，还有一个记录吃掉苹果个数的标签 玩法：初始时蛇身只有两节，蛇保持一直移动，点击屏幕可以控制蛇的游动方向，屏幕会随机出现苹果，当蛇吃到苹果，蛇身会增长一节，记录苹果的标签加1，蛇跟苹果只能出现在框框内，蛇碰到框框或者碰到自身就会死掉。 项目结构： 几大类：Snake(主角蛇)，fence(围墙)，Ap...
cocos2d-lua 贪吃蛇
07-07
cocos2d-x lua 创建的贪吃蛇游戏，有些问题，还要优化
lua table insert_使用lua语言制作贪吃蛇游戏（love2d）（七）完结篇
weixin_39971132的博客
11-28 606
先上效果图：代码：function love.load() snake = {}--用二维数组表示蛇--for i = 1, 3 dotable.insert(snake, {x = i * 31, y = 0, w = 30, h = 30})endsnakeTime = 5 --控制蛇速度的变量--direction = { "right" } --方向table--food = {} --食...
cocos2d-x lua 贪吃蛇完整项目
weixin_42224688的博客
06-20 879
cocos2d-x lua 贪吃蛇游戏 一步一步开发学习 本文地址： http://blog.csdn.net/qq_26437925/article/details/51842647源代码： https://github.com/doctording/cocos2dx_lua_snake学习视频见慕课网开发环境，项目编译运行===windows 直接下载windows版本最新的，网址如下（官网可...
Lua贪吃蛇开发笔记1
一颗苹果
10-23 2110
Lua贪吃蛇笔记1 --------Lua添加音乐------- cc.SimpleAudioEngine:getInstance():playMusic("**.mp3",true) ------Lua添加成绩------- local score = 0 local scoreLabel = nil scoreLabel = cc.Label:createWithSys
嵌入式开源项目应用-《Luat上层脚本包script-LuaTask-V2.4.4.7z》
最新发布
11-07
一：lib脚本修改 lib脚本版本号：2.4.4 新增 （1）gpsHxxt.lua 510U快速定位 （2）gpsZkw.lua 530Z快速定位 （3）aliyun.lua 阿里云自定义rrpc主题 （4）errdump.lua 支持向https服务器发送错误日志 （5）socket.lua...
Luat-Lua-Air724U-master.zip
03-11
本项目"Luat-Lua-Air724U-master"提供了一个完整的开发框架，旨在简化基于Air724U模块的物联网产品的开发流程。 首先，让我们深入了解Lua语言。Lua语言设计的核心理念是易读、易写和易嵌入，其语法简洁明了，非常...
LUAT-LED.rar
06-24
标题 "LUAT-LED.rar" 暗示这是一个与 Lua 脚本语言相关的压缩文件，特别是用于控制 LED 设备的程序或库。Lua 是一种轻量级的、解释型的编程语言，常用于嵌入式系统和游戏开发，它的语法简洁明了，非常适合编写小型...
lua-libmodbus:lua绑定到libmodbus
05-11
IE：res = dev:read_registers(0x2000, 2)print(#res) -- prints 2print(res[1]) - prints register address 0x2000, _not_ 0x2001（从上一版本生成）地位RTU / TCP和几乎所有操作的客户端绑定。 一些用于处理16/32...
Luat_4G_ASR_1802S-0008.zip
09-17
1. Lua语言：Lua是一种轻量级的、解释型的脚本语言，常用于嵌入式系统和游戏开发。它语法简洁，易于学习，且具有高效性能。在物联网(IoT)领域，Lua常被用来编写设备上的控制逻辑和应用程序，因为它占用资源少，适合...
用lua语言编贪吃蛇
05-21
用的一种新的脚本语言lua编写的贪吃蛇，Lua是一种可扩展、动态的脚本语言，小巧高效，易于学习，由标准C编写，嵌入式语言，设计的目的是嵌入到其它语言中，可以和任何语言结合。
反转贪吃蛇 Cocos2d-x+lua贪食蛇游戏源码
12-13
使用cocos2d-x lua和code ide编写的贪吃蛇小游戏 反转贪食蛇一改传统贪食蛇的玩法，游戏大屏幕一分为二。半屏采用传统贪食蛇玩法，半屏加入反转元素，触屏即向相反方向转头！ 除此之外，还新增多种规则，等着你来体验。 ###游戏特性： 1. 全屏畅通体验，一改传统贪食蛇边框，不设置限制，可以左右上下穿透； 2. 分屏反转体验，屏幕一分为二，正反切换，准备好你的手指头迎战吧！ 3. 优化用户体验，装到障碍物扣除爱心后，触屏选择再次行走方向，避免不必要的生命损失！ 4. 全新场景体验，体验版有3大仿真场景任你选择，多款地图随机产生，不再是卡通背景，满足你的视觉享受。 5. 新建规则，吃食物之外还会吃自己！ 旧游戏，新玩法，新视觉，新体验，等着你来一起贪食蛇吧！ ###初始化 将cocos2d-x 3.1.1 创建的lua项目中，frameworks/cocos2d-x复制到framesworks publish目录下有Android的apk安装包
贪吃蛇代码
03-23
这是一个贪吃蛇的源代码，txt文档，里边包括四个java类，一看就会明白，导入eclipse或myeclise即可使用，结构清晰
Lua贪吃蛇开发笔记3
一颗苹果
10-24 721
Lua贪吃蛇笔记3 ---9.蛇头与食物的碰撞 local function pengzhuang() if snakeHead.col == snakeFood.col and snakeHead.row == snakeFood.row then  ---当食物与蛇头行列相等时--- snakeFood.col = math.random(0,9)    ---重置食物的位置-- s
lua进入压缩包_使用lua语言制作贪吃蛇游戏（love2d）（一）开发环境的搭建
weixin_36083434的博客
01-22 665
本教程教大家使用lua制作一个贪吃蛇，游戏引擎使用love2d，因为它开源轻巧而且跨平台。1.开发环境搭建：windows系统：在windows系统下，首先我们进入官网www.love2d.org。love2d官网进入官网可以看到Download选项，在windows列表下，选择下载，如果你是32位 系统，那就选择32-bit，64位的选择64-bit。推荐下载installer，如果你下的是压缩...
自己写的贪吃蛇（1）
jijun7885417的专栏
10-08 1901
最近很多人在玩一个《贪吃蛇大作战》的游戏，以前小时候也经常在文曲星上玩贪吃蛇这个小游戏，于是自己就试着写一个传统的贪吃蛇游戏来玩玩，先写了一个简单demo。 我们知道小蛇是由一块块正方形的块组成的，于是首先需要的就是画出方格地图。我用的cocos2dx的lua版本来做这个小游戏的SCREEN_WIDTH =(cc.Director:getInstance():getOpenGLView():get
贪吃蛇代码(新手)
DevXU的博客
06-08 3425
还有一些Bug // 必要的头文件 #include <stdio.h> #include <stdlib.h> #include <conio.h> #include <time.h> #include <windows.h> #include <string.h> // 定义标记上下左右的明示常量 #define UP 1 #define DOWN 2 #define LEFT 3 #define RIGHT 4 #defi
贪吃蛇完整代码 简便
li___12345的博客
06-29 7286
【代码】贪吃蛇完整代码 简便。
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值