易语言游戏脚本源码能做红包版的游戏吗

.程序集 窗口程序集_启动窗口
.程序集变量 人物标识, 整数型
.程序集变量 热狗标识, 整数型, , "0"
.程序集变量 死亡, 逻辑型
.程序集变量 得分, 整数型
.子程序 _开始按钮_被单击
动画物体2.图片 = #人粅
人物标识 = 动画框1.创建物体 (动画物体2, 取鼠标水平位置 () - _启动窗口.左边 - 25, 取鼠标垂直位置 () - _启动窗口.顶边 - 26, 真, )
开始按钮.可视 = 假
.局部变量 熱狗, 整数型
.局部变量 移动速度, 整数型
.局部变量 新增速度, 整数型
.局部变量 i, 整数型
动画物体1.图片 = #热狗
.判断循环首 (死亡 = 假)
 移动速度 = 移动速喥 - 1
 新增速度 = 新增速度 - 20
.子程序 _动画框1_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
动画框1.置粅体位置 (人物标识, 取鼠标水平位置 () - _启动窗口.左边 - 25, 取鼠标垂直位置 () - _启动窗口.顶边 - 26, 真)
.子程序 _动画框1_碰撞到物体
.参数 碰撞物体标识值, 整數型
.参数 碰撞前横坐标, 整数型
.参数 碰撞前纵坐标, 整数型
.参数 被碰撞物体标识值, 整数型
.如果真 (被碰撞物体标识值 > 得分 + 1 或 碰撞物体标识值 > 得分 + 1)
 得分 = 得分 + 1
 _启动窗口.标题 = “王校长吃热狗 得分:” + 到文本 (得分)
动画框1.置图片 (人物标识, #成功, )
动画框1.置图片 (人物标识, #人物, )
.子程序 __启动窗口_可否被关闭, 逻辑型
.子程序 _动画框1_碰撞到边界, 逻辑型
.参数 物体标识值, 整数型
.参数 碰撞前横坐标, 整数型
.参数 碰撞前纵坐标, 整数型
.参數 边界类型, 整数型
.如果真 (物体标识值 ≠ 人物标识 且 边界类型 = 8)
 动画框1.销毁所有物体 ()
 信息框 (“游戏结束得分:” + 到文本 (得分), 0, , )
 开始按钮.可視 = 真
 _启动窗口.标题 = “王校长吃热狗”

我要回帖

更多关于 易语言游戏脚本源码 的文章

 

随机推荐