易语言 随鼠标方向移动!!!!!
就是做个动画物体,把这个物体弄成个人,然后人脸一直指向鼠标的位置,就像祖玛一样,鼠标跑哪儿,青蛙就往哪问看。求助啊!!!...
就是做个动画物体,把这个物体弄成个人,然后人脸一直指向鼠标的位置,就像祖玛一样,鼠标跑哪儿,青蛙就往哪问看。求助啊!!!
展开
3个回答
展开全部
.版本 2
.支持库 iext2
.子程序 取到鼠标方向角度, 整数型
.参数 物体标示值, 整数型
.局部变量 物体中心_横坐标, 整数型
.局部变量 物体中心_纵坐标, 整数型
.局部变量 鼠标_横坐标, 整数型
.局部变量 鼠标_纵坐标, 整数型
处理事件 ()
物体中心_横坐标 = 动画框1.取物体左边 (物体标示值) + 动画框1.取物体宽度 (物体标示值) ÷ 2
物体中心_纵坐标 = 动画框1.取物体顶边 (物体标示值) + 动画框1.取物体高度 (物体标示值) ÷ 2
鼠标_横坐标 = 取鼠标水平位置 ()
鼠标_纵坐标 = 取鼠标垂直位置 ()
.判断开始 (物体中心_横坐标 ≥ 鼠标_横坐标)
返回 (动画框1.置角度 (物体标示值, -(-求反正切 ((物体中心_纵坐悉模首标 - 鼠标_纵坐标) ÷ (物体中心_横坐标 - 鼠标_横坐标)) × 180 ÷ #pi - 90)))
.默认
返回 (动画框1.置角度码野 (物体标示值, -(-求反正切 ((物体中心_纵坐标 - 鼠标_纵坐标) ÷ (物体中心睁数_横坐标 - 鼠标_横坐标)) × 180 ÷ #pi + 90)))
.判断结束
返回 (-1)
.支持库 iext2
.子程序 取到鼠标方向角度, 整数型
.参数 物体标示值, 整数型
.局部变量 物体中心_横坐标, 整数型
.局部变量 物体中心_纵坐标, 整数型
.局部变量 鼠标_横坐标, 整数型
.局部变量 鼠标_纵坐标, 整数型
处理事件 ()
物体中心_横坐标 = 动画框1.取物体左边 (物体标示值) + 动画框1.取物体宽度 (物体标示值) ÷ 2
物体中心_纵坐标 = 动画框1.取物体顶边 (物体标示值) + 动画框1.取物体高度 (物体标示值) ÷ 2
鼠标_横坐标 = 取鼠标水平位置 ()
鼠标_纵坐标 = 取鼠标垂直位置 ()
.判断开始 (物体中心_横坐标 ≥ 鼠标_横坐标)
返回 (动画框1.置角度 (物体标示值, -(-求反正切 ((物体中心_纵坐悉模首标 - 鼠标_纵坐标) ÷ (物体中心_横坐标 - 鼠标_横坐标)) × 180 ÷ #pi - 90)))
.默认
返回 (动画框1.置角度码野 (物体标示值, -(-求反正切 ((物体中心_纵坐标 - 鼠标_纵坐标) ÷ (物体中心睁数_横坐标 - 鼠标_横坐标)) × 180 ÷ #pi + 90)))
.判断结束
返回 (-1)
追问
怎么没反应?
展开全部
...应该会用上动画框的..还需要动画物体往左、右、上、下看时的图片
追问
要代码
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
取鼠标窗口坐标(闹孝Mouse.X,Mouse.Y)
动画物体窗液羡稿派凯口坐标(X,Y)
判断 Mouse.X >X 即右边 相反就左边
判断 Mouse.Y>Y 即上边 相反就下边
根据不同调用不同方位的图片即可
动画物体窗液羡稿派凯口坐标(X,Y)
判断 Mouse.X >X 即右边 相反就左边
判断 Mouse.Y>Y 即上边 相反就下边
根据不同调用不同方位的图片即可
追问
要代码
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询