本帖最后由 MaGiCmAn 于 2013-8-24 20:11 编辑
我前面那个代码马虎了,移动鼠标后忘记重置时间。#include <Misc.au3>
$daley=0 ;计时
While 1
$aPos = MouseGetPos()
Sleep(200)
$bPos = MouseGetPos()
If $aPos[0]<>$bPos[0] Or $aPos[1]<>$bPos[1] Or _IsPressed(01)=1 Or _IsPressed(02)=1 Or _IsPressed(03)=1 Then ;如果鼠标有动作就重置计时
$daley=0
MsgBox(1,"捕捉到",MouseGetPos(2))
EndIf
$daley+=200
If $daley=240000 Then ;计时达到4分钟就移动鼠标
MouseMove($apos[0]+1,$apos[1]+1)
$daley=0 ;重置计时
EndIf
WEnd
另外你可以把MouseMove($apos[0]+1,$apos[1]+1)这行改成MouseMove($apos[0]+10,$apos[1]+10)或者其他什么数试试,增大鼠标移动的幅度。 |