易语言砸地鼠游戏源码
.版本 2
.支持库 iext2
.支持库 eAPI
.程序集 窗口程序集_启动窗口
.程序集变量 地鼠1, 整数型
.程序集变量 地鼠2
.程序集变量 地鼠3
.程序集变量 锤子
.程序集变量 x, 整数型, , , ' 本源码来自三叶资源网(www.sanye.cx)
.程序集变量 标识2, 整数型
.程序集变量 碰撞标识值, 整数型
.程序集变量 a
.程序集变量 b
.子程序 __启动窗口_创建完毕
置随机数种子 ()
初始化 ()
a = 1
b = 3
' 动画框1.播放动画 (多项选择 (取随机数 (1, 3), 地鼠1, 地鼠2, 地鼠3), 1, , , )
.子程序 初始化
地鼠1 = 动画框1.创建物体 (动画物体2, 68, 80, 真, )
地鼠2 = 动画框1.创建物体 (动画物体4, 138, 80, 真, )
地鼠3 = 动画框1.创建物体 (动画物体5, 208, 80, 真, )
锤子 = 动画框1.创建物体 (动画物体1, 80, 80, 真, )
' 哭 = 动画框1.创建物体 (动画物体3, 80, 80, 假, )
.子程序 _动画框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
动画框1.播放动画 (锤子, 1, 假, -40, )
.子程序 _动画框1_动画框鼠标位置改变
.参数 横坐标, 整数型
.参数 纵坐标, 整数型
.参数 已被按下物体, 整数型
动画框1.置物体位置 (锤子, 横坐标 - 50, 纵坐标 - 50, 真)
.子程序 _时钟1_周期事件
.局部变量 次序, 整数型
置随机数种子 ()
次序 = 取随机数 (a, b)
动画框1.播放动画 (多项选择 (次序, 地鼠1, 地鼠2, 地鼠3), 1, , -36, )
.判断开始 (次序 = 1)
a = 2
b = 3
.判断 (次序 = 2)
a = 1
b = 3
.判断 (次序 = 3)
a = 2
b = 1
.默认
.判断结束
.子程序 _透明标签1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
结束 ()
.子程序 _动画框1_物体左键被按下
.参数 物体标识值, 整数型
.判断开始 (物体标识值 > 0)
.判断开始 (动画框1.取物体左边 (物体标识值) > 68 且 动画框1.取物体左边 (物体标识值) < 138)
动画框1.创建物体 (动画物体3, 68, 80, , )
.判断 (动画框1.取物体左边 (物体标识值) > 138 且 动画框1.取物体左边 (物体标识值) < 208)
动画框1.创建物体 (动画物体3, 138, 80, , )
.判断 (动画框1.取物体左边 (物体标识值) > 208)
动画框1.创建物体 (动画物体3, 208, 80, , )
.默认
.判断结束
.默认
.判断结束
.子程序 _按钮1_被单击
打开指定网址 (“//apps.wandoujia.com/apps/com.e4a.lx.yyybcjcdq?pos=w/search/list//%E6%98%93%E8%AF%AD%E8%A8%80/2”) ' 推荐易语言学习软件→-→-→ ' 豌豆荚 下载“易语言编程教程大全”(安装到手机即可观看:易语言海量学习教程)
砸地鼠软件开发
源码编程器之砸地鼠编程