本帖最后由 CCM 于 2012-5-9 14:58 编辑
自動點擊我自己也寫了一個,這個適用於位置一樣,只需等待時間點擊。HotKeySet("^c", "MyExit");设定中断热键
$Timeout = 6 ; 设定倒数
Sleep(100)
SplashTextOn("设定坐标,中断请按CTRL+C", "", 360, 60)
For $t = $Timeout To 1 Step -1
ControlSetText("设定坐标,中断请按CTRL+C", "", "Static1", "请在 " & $t & " 秒内将光标移到指定的位置")
Sleep(1000)
Next
SplashOff()
$title = WinGetTitle("") ;取得窗口标题
$pos = MouseGetPos() ;撷取鼠标光标所在坐标
$input = InputBox("时间设定", "请输入重复点击秒数", "", "", 250, 150)
If $input = 0 Then Exit
While 1
WinWaitActive($title);输出窗口名称
If WinExists($title) Then
MouseClick("", $pos[0], $pos[1]) ;输出 X、Y 坐标
Sleep($input & "000")
EndIf
WEnd
Func MyExit();接续中断热键
Exit
EndFunc ;==>MyExit
|