|
本帖最后由 bbgzzg 于 2022-6-28 11:15 编辑
这几天摸索了一下动画框 教程主要还是新人向的 做了一下控制人物移动 、 碰撞方向返回 、 碰撞停止该方向移动 、 地图或动画框移动、 这些应该是很早就有的 不过易语言的自带碰撞效果大家都知道,花了几天时间想了个另外的法子 详细见图和源码
话说怎么发不需要币的 免费的附件啊——https://wwn.lanzouf.com/ii47v071ghli——源码 只有扩展组件(无模块) 免费的我只能发链接 不能直接放进去 窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 物体1 | 整数型 | | 地图 | 整数型 | | pass点 | 整数型 | | 重叠了 | 逻辑型 | | 上 | 整数型 | | 下 | 整数型 | | 左 | 整数型 | | 右 | 整数型 | | 是否走到终点 | 逻辑型 | |
地图 = 动画框1. 创建物体 (动画物体1, 0, 0, 真, ) 物体1 = 动画框1. 创建物体 (动画物体2, 10, 10, 真, ) pass点 = 动画框1. 创建物体 (, 1900, 830, 真, ) 动画框1. 置图片 (pass点, #pass点, ) 动画框1. 置碰撞管理 (pass点, 真, ) 动画框1. 置层次 (pass点, 1 ) 动画框1. 添加监视键 (10, #W键 )动画框1. 添加监视键 (10, #S键 )动画框1. 添加监视键 (10, #A键 )动画框1. 添加监视键 (10, #D键 )|
_动画框1_碰撞到边界 | 逻辑型 | | |
物体标识值 | 整数型 | | | | 碰撞前横坐标 | 整数型 | | | | 碰撞前纵坐标 | 整数型 | | | | 边界类型 | 整数型 | | | | 如果真 (物体标识值 = 物体1 )动画框1. 置物体位置 (物体1, 碰撞前横坐标, 碰撞前纵坐标, 真)|
_动画框1_监视键被按下 | | | |
键代码 | 整数型 | | | | 功能键状态 | 整数型 | | | | 如果 (键代码 = #A键 且 编辑框1.内容 ≠ “z”) 如果真 (编辑框1.内容 ≠ “z”) 编辑框1.内容 = “”左 = 1
左 = 0 如果 (键代码 = #D键 且 编辑框1.内容 ≠ “y”)如果真 (编辑框1.内容 ≠ “y”)编辑框1.内容 = “”右 = 1右 = 0 如果 (键代码 = #W键 且 编辑框1.内容 ≠ “s”)如果真 (编辑框1.内容 ≠ “s”)编辑框1.内容 = “”上 = 1上 = 0 如果 (键代码 = #S键 且 编辑框1.内容 ≠ “x”)如果真 (编辑框1.内容 ≠ “x”)编辑框1.内容 = “”下 = 1下 = 0 如果真 (上 = 1 ) 如果 (动画框1. 取物体顶边 (物体1 ) < 250 且 动画框1. 取物体顶边 (地图 ) < 0 ) 动画框1. 置物体位置 (地图, 动画框1. 取物体左边 (地图 ), 动画框1. 取物体顶边 (地图 ) + 3, ) 动画框1. 置物体位置 (pass点, 动画框1. 取物体左边 (地图 ) + 1900, 动画框1. 取物体顶边 (地图 ) + 830, )动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ), 动画框1. 取物体顶边 (物体1 ) - 3, 真) 如果真 (下 = 1 )如果 (动画框1. 取物体顶边 (物体1 ) > 250 且 动画框1. 取物体顶边 (地图 ) > -500 )动画框1. 置物体位置 (地图, 动画框1. 取物体左边 (地图 ), 动画框1. 取物体顶边 (地图 ) - 3, )动画框1. 置物体位置 (pass点, 动画框1. 取物体左边 (地图 ) + 1900, 动画框1. 取物体顶边 (地图 ) + 830, )动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ), 动画框1. 取物体顶边 (物体1 ) + 3, 真)如果真 (左 = 1 )如果 (动画框1. 取物体左边 (物体1 ) < 350 且 动画框1. 取物体左边 (地图 ) < 0 )动画框1. 置物体位置 (地图, 动画框1. 取物体左边 (地图 ) + 3, 动画框1. 取物体顶边 (地图 ), )动画框1. 置物体位置 (pass点, 动画框1. 取物体左边 (地图 ) + 1900, 动画框1. 取物体顶边 (地图 ) + 830, )动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ) - 3, 动画框1. 取物体顶边 (物体1 ), 真)如果真 (右 = 1 )如果 (动画框1. 取物体左边 (物体1 ) > 350 且 动画框1. 取物体左边 (地图 ) > -1200 )动画框1. 置物体位置 (地图, 动画框1. 取物体左边 (地图 ) - 3, 动画框1. 取物体顶边 (地图 ), )动画框1. 置物体位置 (pass点, 动画框1. 取物体左边 (地图 ) + 1900, 动画框1. 取物体顶边 (地图 ) + 830, )动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ) + 3, 动画框1. 取物体顶边 (物体1 ), 真)判断 (动画框1. 是否重叠 (物体1, 地图 )) 重叠了 = 真 重叠了 = 假 如果 (重叠了 = 真) 判断 (上 = 1 且 左 = 0 且 右 = 0 ) 上 = 0 动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ), 动画框1. 取物体顶边 (物体1 ) + 4, 真) 编辑框1.内容 = “s” 判断 (下 = 1 且 左 = 0 且 右 = 0 )下 = 0 动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ), 动画框1. 取物体顶边 (物体1 ) - 4, 真)编辑框1.内容 = “x”判断 (左 = 1 且 上 = 0 且 下 = 0 )左 = 0 动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ) + 4, 动画框1. 取物体顶边 (物体1 ), 真)编辑框1.内容 = “z”判断 (右 = 1 且 上 = 0 且 下 = 0 )右 = 0 动画框1. 置物体位置 (物体1, 动画框1. 取物体左边 (物体1 ) - 4, 动画框1. 取物体顶边 (物体1 ), 真)编辑框1.内容 = “y”如果真 (是否走到终点 = 假)如果真 (动画框1. 是否重叠 (物体1, pass点 )) 是否走到终点 = 真 信息框 (“走到终点了”, 0, , )调试输出 (上, 下, 左, 右 )编辑框meL.内容 = 到文本 (动画框1. 取物体左边 (物体1 )) 编辑框meT.内容 = 到文本 (动画框1. 取物体顶边 (物体1 )) 编辑框mapL.内容 = 到文本 (动画框1. 取物体左边 (地图 )) 编辑框mapT.内容 = 到文本 (动画框1. 取物体顶边 (地图 )) 调试输出 (重叠了 )|
_动画框1_放开某键 | 逻辑型 | | |
键代码 | 整数型 | | | | 功能键状态 | 整数型 | | | | 判断开始断 (键代码 = #W键 ) . . .
|
评分
-
查看全部评分
|