精易论坛

标题: 论坛首发-任意两点之间鼠标带轨迹直线移动 [打印本页]

---

作者: cx66543154    时间: 2018-5-5 12:35
标题: 论坛首发-任意两点之间鼠标带轨迹直线移动


前几天别人定做的功能,今天花了点时间写出来,但是上家跑路了所以现在拿出来分享,
算法写的比较乱,但应该是论坛目前最完善的一个，另外我想这个功能可以添加到精易模块里去@精易客服

鼠标轨迹移动.zip

2018-5-5 12:35 上传

点击文件名下载附件

下载积分: 精币 -2 枚

179.73 KB, 下载次数: 496, 下载积分: 精币 -2 枚

调用了精易模块

---

作者: Godsteal    时间: 2018-5-5 12:40
昨天 发了一个例子！那个好像 也可以实现吧

---

作者: cx66543154    时间: 2018-5-5 12:42

Godsteal 发表于 2018-5-5 12:40
昨天 发了一个例子！那个好像 也可以实现吧

那个我看了  不满足标题的条件

---

作者: 凌哥    时间: 2018-5-5 12:58
这个算法不够完美

---

作者: cx66543154    时间: 2018-5-5 13:00

凌哥 发表于 2018-5-5 12:58
这个算法不够完美

我测试N次 应该是任意坐标都可以实现   欢迎提出BUG

---

作者: 凌哥    时间: 2018-5-5 13:03

cx66543154 发表于 2018-5-5 13:00
我测试N次 应该是任意坐标都可以实现   欢迎提出BUG

  

子程序名	返回值类型	公开	备 注
鼠标直线移动算法

变量名	类 型	静态	数组	备 注
x1	双精度小数型
y1	双精度小数型
x	双精度小数型
y	双精度小数型
cs	双精度小数型
轨迹x	双精度小数型
轨迹y	双精度小数型
x2	双精度小数型
y2	双精度小数型
v	双精度小数型

x1 ＝ 900
y1 ＝ 900
x ＝ 取鼠标水平位置 ()
y ＝ 取鼠标垂直位置 ()
x2 ＝ x
y2 ＝ y
如果 (取绝对值 (x － x1) ＞ 取绝对值 (y － y1))
cs ＝ 取绝对值 (x － x1)
cs ＝ 取绝对值 (y － y1)
如果真 (cs ≠ 0)
轨迹x ＝ (x1 － x) ÷ cs
轨迹y ＝ (y1 － y) ÷ cs
判断循环首 (x ≠ x1 且 y ≠ y1)
x ＝ x ＋ 轨迹x
y ＝ y ＋ 轨迹y
SetCursorPos (x, y)
如果真 (到整数 (取绝对值 (x － x1)) ≤ 1 且 到整数 (取绝对值 (y － y1)) ≤ 1)
SetCursorPos (x1, y1)
跳出循环 ()
延时 (1)
判断循环尾 ()

.版本 2<br /> <br /> .子程序 鼠标直线移动算法<br /> .局部变量 x1, 双精度小数型<br /> .局部变量 y1, 双精度小数型<br /> .局部变量 x, 双精度小数型<br /> .局部变量 y, 双精度小数型<br /> .局部变量 cs, 双精度小数型<br /> .局部变量 轨迹x, 双精度小数型<br /> .局部变量 轨迹y, 双精度小数型<br /> .局部变量 x2, 双精度小数型<br /> .局部变量 y2, 双精度小数型<br /> .局部变量 v, 双精度小数型<br /> <br /> x1 ＝ 900<br /> y1 ＝ 900<br /> x ＝ 取鼠标水平位置 ()<br /> y ＝ 取鼠标垂直位置 ()<br /> x2 ＝ x<br /> y2 ＝ y<br /> .如果 (取绝对值 (x － x1) ＞ 取绝对值 (y － y1))<br />     cs ＝ 取绝对值 (x － x1)<br /> .否则<br />     cs ＝ 取绝对值 (y － y1)<br /> .如果结束<br /> .如果真 (cs ≠ 0)<br />     轨迹x ＝ (x1 － x) ÷ cs<br />     轨迹y ＝ (y1 － y) ÷ cs<br /> .如果真结束<br /> .判断循环首 (x ≠ x1 且 y ≠ y1)<br />     x ＝ x ＋ 轨迹x<br />     y ＝ y ＋ 轨迹y<br />     SetCursorPos (x, y)<br />     .如果真 (到整数 (取绝对值 (x － x1)) ≤ 1 且 到整数 (取绝对值 (y － y1)) ≤ 1)<br />         SetCursorPos (x1, y1)<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1)<br /> .判断循环尾 ()

---

作者: 凌哥    时间: 2018-5-5 13:04

  

子程序名	返回值类型	公开	备 注
鼠标直线移动算法

变量名	类 型	静态	数组	备 注
x1	双精度小数型
y1	双精度小数型
x	双精度小数型
y	双精度小数型
cs	双精度小数型
轨迹x	双精度小数型
轨迹y	双精度小数型
x2	双精度小数型
y2	双精度小数型
v	双精度小数型

x1 ＝ 900
y1 ＝ 900
x ＝ 取鼠标水平位置 ()
y ＝ 取鼠标垂直位置 ()
x2 ＝ x
y2 ＝ y
如果 (取绝对值 (x － x1) ＞ 取绝对值 (y － y1))
cs ＝ 取绝对值 (x － x1)
cs ＝ 取绝对值 (y － y1)
如果真 (cs ≠ 0)
轨迹x ＝ (x1 － x) ÷ cs
轨迹y ＝ (y1 － y) ÷ cs
判断循环首 (x ≠ x1 且 y ≠ y1)
x ＝ x ＋ 轨迹x
y ＝ y ＋ 轨迹y
SetCursorPos (x, y)
如果真 (到整数 (取绝对值 (x － x1)) ≤ 1 且 到整数 (取绝对值 (y － y1)) ≤ 1)
SetCursorPos (x1, y1)
跳出循环 ()
延时 (1)
判断循环尾 ()

.版本 2<br /> <br /> .子程序 鼠标直线移动算法<br /> .局部变量 x1, 双精度小数型<br /> .局部变量 y1, 双精度小数型<br /> .局部变量 x, 双精度小数型<br /> .局部变量 y, 双精度小数型<br /> .局部变量 cs, 双精度小数型<br /> .局部变量 轨迹x, 双精度小数型<br /> .局部变量 轨迹y, 双精度小数型<br /> .局部变量 x2, 双精度小数型<br /> .局部变量 y2, 双精度小数型<br /> .局部变量 v, 双精度小数型<br /> <br /> x1 ＝ 900<br /> y1 ＝ 900<br /> x ＝ 取鼠标水平位置 ()<br /> y ＝ 取鼠标垂直位置 ()<br /> x2 ＝ x<br /> y2 ＝ y<br /> .如果 (取绝对值 (x － x1) ＞ 取绝对值 (y － y1))<br />     cs ＝ 取绝对值 (x － x1)<br /> .否则<br />     cs ＝ 取绝对值 (y － y1)<br /> .如果结束<br /> .如果真 (cs ≠ 0)<br />     轨迹x ＝ (x1 － x) ÷ cs<br />     轨迹y ＝ (y1 － y) ÷ cs<br /> .如果真结束<br /> .判断循环首 (x ≠ x1 且 y ≠ y1)<br />     x ＝ x ＋ 轨迹x<br />     y ＝ y ＋ 轨迹y<br />     SetCursorPos (x, y)<br />     .如果真 (到整数 (取绝对值 (x － x1)) ≤ 1 且 到整数 (取绝对值 (y － y1)) ≤ 1)<br />         SetCursorPos (x1, y1)<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1)<br /> .判断循环尾 ()

---

作者: 豆瓣君    时间: 2018-5-5 13:23
学习一下~~

---

作者: 1185384801    时间: 2018-5-5 14:05
好像我写过

---

作者: cx66543154    时间: 2018-5-5 14:50

凌哥 发表于 2018-5-5 13:04
[e=0].版本 2

.子程序 鼠标直线移动算法

一般问题的答案都不是唯一的 不过我这个帖子倒是钓出了不少大神的算法

---

作者: kmskik    时间: 2018-5-5 17:13

凌哥 发表于 2018-5-5 13:04
[e=0].版本 2

.子程序 鼠标直线移动算法

我凌哥厉害

---

作者: 感谢无阻大哥    时间: 2018-5-5 20:58
学习一下~~

---

作者: static101    时间: 2018-5-5 23:06
看看              

---

作者: wywhlch    时间: 2018-5-6 20:40
666666666666老哥

---

作者: zjkhzx    时间: 2018-5-7 12:33
6666666666666学习一下

---

作者: 不会英文学习易    时间: 2018-5-7 13:55
下载来看看。感谢分享

---

作者: By：谜乱    时间: 2018-5-8 05:46
这个很实用,支持你了

---

作者: 1055339300    时间: 2018-5-8 17:41
感谢楼主的奉献精神，小白路过学习。

---

作者: kgdipw333    时间: 2018-5-9 00:21

下载来看看。感谢分享

---

作者: wy5201314    时间: 2018-5-9 07:51

感谢分享           

---

作者: 小白白123123    时间: 2018-5-11 15:52
66666666666666666666666多谢老哥

---

作者: 微信的木头人    时间: 2018-5-13 16:23
东西好不好无所谓 分享就是好样的

---

作者: 技术小王子    时间: 2018-5-13 23:59
我来瞅瞅怎么样  

---

作者: SureFire2    时间: 2018-5-14 10:58
这是最简单的模拟鼠标了。

---

作者: 安与好    时间: 2018-5-14 15:40
支持开源~！感谢分享

---

作者: sqyclycd    时间: 2018-5-22 21:54
谢谢楼主分享

---

作者: zxc9527    时间: 2018-5-22 22:44
感谢分享！！！

---

作者: lls605    时间: 2018-9-18 23:01
学习下·············

---

作者: hbqxssb    时间: 2019-1-18 09:05

学习下··

---

作者: lianjiedian    时间: 2019-5-4 20:52
感谢!!!!!!!!

---

作者: 萌新苏苏    时间: 2019-5-21 02:18
#在这里快 本帖最后由 cx66543154 于 2018-5-5 12:36 编辑   前几天别人定做的功能,今天花了点时间写出来,但是上家跑路了所以现在拿出来分享,速回复#

---

作者: 289437293    时间: 2019-6-28 21:12
支持！！！！！！

---

作者: hmilyvivi    时间: 2019-7-14 22:44
感谢分享

---

作者: jhwydcf    时间: 2022-6-30 15:33
感谢分享

---

作者: 玄易    时间: 2022-8-9 16:41

感谢分享
学习，学习一下

---

作者: wangjian998    时间: 2023-3-31 14:41
看看啥玩意

---

作者: wdjyltzh01    时间: 2023-4-1 22:51
支持一下xx

---

作者: zhh1122    时间: 2023-8-27 20:13
6666666666666666666666

---

作者: xxs666    时间: 2024-1-14 21:54
6666666666666666666666666666666

---

作者: feigewudi    时间: 2025-3-7 11:51
666666666666666666666666666666

---

作者: walkerbones    时间: 2025-4-9 16:48

---

作者: walkerbones    时间: 2025-4-9 16:48

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4