怎么用按键精灵实现鼠标拖动 按键精灵怎么实现 按住鼠标左键时候 鼠标向下平移（可调速）
pinx = Plugin.Sys.GetScRX()
Call 平滑移动鼠标to(pinx, 0, 5000, 0, 0,10)
//这里展示了鼠标 历时5秒 从屏幕左上角移动到屏幕右上角的例子，下面是参数说明
//参数：平滑灵敏度说明：整形，范围1~其实坐标差最大值，鼠标单次跨越的距离。
//移动总时间越长或起始坐标距离越短，平滑灵敏度越小越好
//反之，越大越准确，但一般不超过起始坐标最大差值的10%
//设置灵敏度是为了调节delay函数延时太短时，无法准确执行延时
Function 平滑移动鼠标to(终点坐标px,终点坐标py,移动时间,起点坐标beginx,起点坐标beginy,平滑灵敏度)
dim mx
dim x,y
dim tx,ty
x=起点坐标beginx
y=起点坐标beginy
tx=abs(x-终点坐标px)
ty=abs(y-终点坐标py)
if tx>=ty
mx=tx
else
mx=ty
end if
if mx>0
for i = 0 to mx step 平滑灵敏度
sx=int((终点坐标px*i+x*(mx-i))/mx)
sy=int((终点坐标py*i+y*(mx-i))/mx)
moveto sx,sy
delay int(移动时间/mx*平滑灵敏度)
Next
else
delay 移动时间
end if
MoveTo 终点坐标px, 终点坐标py
平滑移动鼠标to=true
End Function
代码完全没问题
没效果可能是游戏限制了
可以尝试一下
Delay 1000
MoveTo 1111,897
Delay 100
LeftDown 1
Delay 100
MoveTo 783,897
Delay 100
LeftUp 1
Function TuoDong(ii_x,ii_y,ii_x1,ii_y1)
'按键精灵实现拖拽鼠标功能，从(ii_x,ii_y)拖动到(ii_x1,ii_y1)
'不可以使用MoveTo指令，必须用MoveR相对移动功能，一个像素一个像素地拖动。
moveto ii_x,ii_y
delay 100
leftDown 1
delay 50
abs_x=abs(ii_x1-ii_x)
abs_y=abs(ii_y1-ii_y)
if ii_x1>ii_x then
deita_x= 1
else
deita_x= -1
endif
if ii_y1>ii_y then
deita_y= 1
else
deita_y= -1
endif
for i=0 to abs(ii_x1-ii_x)
MoveR deita_x,0
next
for i=0 to abs(ii_y1-ii_y)
MoveR 0,deita_y
next
delay 50
leftUP 1
End Function
Sub mmm()
TuoDong 100,100,300,300
End Sub
Event Form1.Button1.Click
Delay 3000
Call mmm
End Event
x = 1111
y = 897
MoveTo x, y
Delay 200
LeftDown 1
Delay 50
For i = 1 To 328
x=x-1
MoveTo x,y
Next
LeftUp 1
关于用按键精灵设置鼠标按住拖动问题~
Dim pinx
pinx = Plugin.Sys.GetScRX()
Call 平滑移动鼠标to(pinx, 0, 5000, 0, 0,10)
//这里展示了鼠标 历时5秒 从屏幕左上角移动到屏幕右上角的例子，下面是参数说明
//参数：平滑灵敏度说明：整形，范围1~其实坐标差最大值，鼠标单次跨越的距离。
//移动总时间越长或起始坐标距离越短，平滑灵敏度越小越好
//反之，越大越准确，但一般不超过起始坐标最大差值的10%
//设置灵敏度是为了调节delay函数延时太短时，无法准确执行延时
Function 平滑移动鼠标to(终点坐标px,终点坐标py,移动时间,起点坐标beginx,起点坐标beginy,平滑灵敏度)
dim mx
dim x,y
dim tx,ty
x=起点坐标beginx
y=起点坐标beginy
tx=abs(x-终点坐标px)
ty=abs(y-终点坐标py)
if tx>=ty
mx=tx
else
mx=ty
end if
if mx>0
for i = 0 to mx step 平滑灵敏度
sx=int((终点坐标px*i+x*(mx-i))/mx)
sy=int((终点坐标py*i+y*(mx-i))/mx)
moveto sx,sy
delay int(移动时间/mx*平滑灵敏度)
Next
else
delay 移动时间
end if
MoveTo 终点坐标px, 终点坐标py
平滑移动鼠标to=true
End Function
我有一个笨方法哈哈
y = 100
moveto 200, y
leftdown 1
for 5
delay 500
y = y + 50
moveto 200, y
next
leftup 1
用延迟的时间和y加的那个数值调速
按键精灵设置鼠标移动脚本
答：//上面的IF语句里比较最近两次鼠标坐标，只要一有变化则计数器n清0 //当连续5次鼠标无变化时，则执行 If n>4 MoveTo 450,350 Delay 5 LeftClick 1 n=0 EndIf EndWhile 把上面的粘贴到按键精灵里会睇得更清楚。其实无必要比较完5次啦，只要比较最近两次有无变化就行了。如果确实要看比较5次的...
按键精灵8怎么把鼠标移动到目标?命令是什么?
答：你这个是按7代码，修改为按8代码如下：For 4 Call GetScreenResolution(fx, fy)x0 = fx / 2 : n = 1 : y0 = fy / 2 While n < 45 x = x0 + 4 * (cos(n) + n * sin(n))y = y0 + 3 * (sin(n) - n * cos(n))MoveTo x, y //MoveTo是鼠标移动命令 n = n ...
按键精灵按下Q键,执行鼠标移动到某一点,点击,代码怎么写。
答：MoveTo x, y //x为屏幕横坐标，y为屏幕纵坐标。把以上代码写入按键精灵的代码里。设定快捷键为q 就可以完成了。最好用到抓抓工具
按键精灵 怎么让鼠标移动到固定位置
答：这··很简单啊···首先你要明确是相对移动还是绝对移动，然后在确定你当前运行的程序支持不支持按键精灵（因为部分游戏或者软件针对按键屏蔽了它的功能）。如果什么都不考虑的话就是以下内容 MoveTo 1, 1 就是命令鼠标移动 1 1是移动的坐标 ...
怎么用按键精灵进行鼠标后台移动
答：偏移抓点:当使用偏移抓点时,实际抓到的是鼠标附近的一点的坐标和颜色(具体抓到的点用一个“瞄准镜”表示)。这样可以解决在某些情况下,鼠标图标颜色会挡住真实坐标颜色的问题。 按键精灵动作介绍 按键精灵的所有动作都需要在“动作选择区”中选定,然后插入“脚本内容区”。按键精灵的所有功能也都集中在动作选择区中。
按键精灵能控制鼠标在屏幕上固定位置拖动吗?
答：这个可以的。。
按键精灵中鼠标移动到X1点左键按下移动到X2点鼠标左键松开 代码如何实 ...
答：说明:(按键精灵代码)将100,100替换为x1的坐标,将200,200替换为x2的坐标即可.MoveTo 100, 100 LeftDown 1 delay 150 MoveTo 200, 200 LeftUp 1
按键精灵。鼠标固定X轴,y轴连续移动且可设定速度,如何实现? 另外操作...
答：x = 1 y = 1 y轴移动坐标 = 1 延迟时间 = 1000 While 1 = 1 MoveTo x , y Delay 延迟时间 y = y + y轴移动 Wend 复制以上代码，修改X,Y的值为起始值，y轴移动的值填你需要的每次y轴坐标移动多少个坐标点，延迟时间的值控制移动速度，单位为毫秒，1000毫秒=1秒 ...
按键精灵怎样操作鼠标抓点
答：1、打开按键精灵，点击新建，如下图。2、接着，截屏（按printscreen键）桌面（因为我的电脑在桌面上）。然后点击按键精灵页面中的‘抓抓’，如下图。3、在出现的按键抓抓辅助工具中点击‘图像’，就会出现我们刚截的屏，接下来在‘计算机’图标上选取一特殊的点，光标移到‘计算机’特殊点上，右键...
按键精灵网页内鼠标按住后移动
答：利用按键中的鼠标命令中的按下和弹起语句再加上鼠标移动语句就可以完成了 例如：leftdown 1 moveto ()leftup 1 这只是举个简单的例子 中间的坐标 延时都没写 希望对你有启发 希望能帮到你
