• 按键公众号 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:2021-12-03

按键精灵安卓版
立即下载

软件版本:3.7.2
软件大小:46.2M
更新时间:2023-05-10

按键精灵iOS版
立即下载

软件版本:1.8.0
软件大小:29.2M
更新时间:2023-03-21

按键手机助手
立即下载

软件版本:3.8.0
软件大小:262M
更新时间:2023-05-30

快捷导航

登录 后使用快捷导航
没有帐号? 注册

返回列表 «678910111213» / 34
发新话题 回复该主题

[技术交流] 【院刊】-【201410期】模拟真实鼠标动作防检测——“老鼠慢慢跑... [复制链接]

181#

感谢分享!。!

182#

感觉还有很多需要学。

183#

学习学习,向大神学习 学习

184#

6666666666666666666666666666666666666

185#

符vvvvvvvvvvvvvvvvvvvvvvvv

186#


187#


188#

先回复一下,看看

189#

hjlkljuoio

190#

支持下你~~~加油

191#

哈哈哈啊哈哈哈哈哈哈哈哈

192#

学习 谢谢楼主

193#

我来看看看看看拉

194#

鼠标动作防

195#

//tD几毫秒移动一点
鼠标慢慢跑 800,100,500,200,10
Sub 鼠标慢慢跑(X1,Y1,X2,Y2,tD)
Dim xl,yl,xc,yc,endx,endy,sx,sy
Dim FORC,i
xl=abs(clng(X1)-clng(X2))
yl=abs(clng(y1)-clng(y2))
EndX = X2
EndY = Y2
XC=1
YC=1
sx=x1
sy=y1
If clng(X1)>=clng(X2) then
EndX = X1
xc = -1
end if
If clng(Y1)>=clng(Y2) then
EndY = Y1
yc = -1
End If
If xl>yl then
FORC = xl
Else
FORC = yl
End If
For i = 1 to FORC
MoveTo sx,sy
Delay clng(tD)
sx = sx + xc
sy = sy + yc
If sx=endx then
xc = 0
end if
If sy=endy then
yc=0

196#

学习

197#

学习,看看怎么用

198#

学习一波

199#

2017年2月15日16:18:54

200#

学习下

发新话题 回复该主题