• 歡迎訪問奇跡の海網站,本站不上傳任何資源,所有資源均來自于網絡,歡迎加入奇跡の海~!奇跡の海-WordPress QQ群
  • 本站下載資源為網絡上收集整理而來,并且以計算機技術研究交流為目的,版權歸原作者所有,僅供大家參考,學習,不存在任何商業目的與商業用途.
  • 本站系統鏡像均來自于官方原版,ed2k可視為P2P下載鏈接。所有操作系統默認均為試用版,如有正版密鑰可以有效激活,本站不提供任何激活和相關服務。

AutoIt3(au3)源碼-鼠標左鍵連擊工具

AutoIT3 奇跡の海 2年前 (2017-11-21) 471次瀏覽 已收錄 0個評論 掃描二維碼

代碼簡介

AutoIt3(au3)源碼-鼠標左鍵連擊工具
AutoIt做的鼠標左鍵連擊工具

AU3源碼

$z = 0         ;//=0一直循環=1停止循環,這算是個全局變量.
  HotKeySet("!1", "clickit")        ;//Alt+1 事件.
  HotKeySet("!2", "clickover")        ;//Alt+2 事件.
  HotKeySet("{esc}", "byebye")        ;//Esc 事件.
  MsgBox(0, "鼠標左鍵連擊工具提示", "Alt+1:開始點擊" & @CRLF & "Alt+2:暫停" & @CRLF & "Esc:退出程序" & @CRLF & @CRLF & "每秒點擊1次")
  While 1         ;//這邊連著3行我不懂為什么要寫,但是不寫就直接運行熱鍵對應的函數了,抄的幫助內的原句.
      Sleep(5000)
  WEnd
  Func clickit()         ;//Alt+1 事件.
     Dim $x = MouseGetPos()         ;// 得到當前鼠標的坐標,模擬點擊的時候就靠它來確定點擊的位置.
     $z = 0         ;//這相當于1個開關,每次按熱鍵Alt+1 都會把它打開 這樣就能模擬點擊了.
     While $z <> 1         ;//判斷當前開關的狀態.
         MouseClick("left", $x[0], $x[1], 1, 1000)         ;//1秒點擊1次.
     WEnd
 EndFunc           ;==>clickit
 Func clickover()         ;//Alt+2 事件.
     $z = 1         ;//把$z開關關閉,就暫停了 模擬點擊。聯系clickit()事件中的$z=0 就知道為什么這么做了.
 EndFunc           ;==>clickover
 Func byebye()         ;//Esc 事件.
     Exit 0         ;//exit=0 就是退出程序,為何=0?這和系統有關,我不清楚。
 EndFunc           ;==>byebye

版權聲明:本站所有文章和資源使用CC BY-NC-SA 4.0協議授權發布 , 轉載應當以相同方式注明文章來自“SeaOMC.COM->AutoIt3(au3)源碼-鼠標左鍵連擊工具!在下邊可以分享本文哦!
喜歡 (0)
[]
分享 (0)
奇跡の海
關于作者:
一個WordPress菜鳥!
發表我的評論
取消評論

表情 貼圖 加粗 刪除線 居中 斜體 簽到

Hi,您需要填寫昵稱和郵箱!

  • 昵稱 (必填)
  • 郵箱 (必填)
  • 網址
中国福利彩票36选7开奖结果