5238869 发表于 2011-11-10 14:30:52

一个热键控制程序启动和暂停 au3

例子1
HotKeySet("`","hoho");快捷键【~】,数字1左边那个键
$ok = 0 ;脚本打开时不点击鼠标
While 1 ;死循环
         Sleep(400);每次点击的间隔,毫秒
         If $ok = 1 Then
               MouseClick("left");点击左键
               ;MouseClick("left");点击右键
         EndIf         
WEnd
Func hoho();开关
$ok = Abs($ok - 1);按一下0,再按一下1,再按一下0…………
EndFunc
例子2
HotKeySet("{F2}","toggle")
Dim $toggle = 0
While 1
         While $toggle
               代码
         WEnd
WEnd
Func toggle()
         $toggle = Not $toggle
EndFunc
-------------------
个人觉得例子2比较好懂,也比较好用

xms77 发表于 2011-11-10 21:10:00

学习了开关功能$ok = Abs($ok - 1);

mylve 发表于 2011-12-7 14:59:27

看看是什么参数使用的

au3x 发表于 2011-12-8 01:38:57

学习了.............

chentuyu1203 发表于 2012-12-6 12:00:12

来学习一下

jasonny 发表于 2012-12-23 23:32:28

感謝大大分享

schm168 发表于 2013-1-19 13:37:24

来学习一下

huangke 发表于 2013-1-23 14:57:58

跟开关电灯一样了,不错

273952582 发表于 2014-1-3 21:11:48

学习了~~~~

bingshen2014 发表于 2014-1-15 18:07:00

学习了,感谢楼主分享。

joyran 发表于 2014-3-1 08:58:36

学习学习...

ooxxgod 发表于 2014-5-6 23:22:11

留下 后备用

pris 发表于 2014-11-12 14:29:00

好。........

605284 发表于 2014-11-15 21:12:28

来学习一下

raymondjan 发表于 2017-1-5 10:34:09

不好意思!小改一下,這樣有畫面反應,初學者比較容易理解

HotKeySet("{F2}","toggle")
Dim $toggle = false
While 1
         if$toggle =True then
               MsgBox(0,"",$toggle,1)
                          Else
                               MsgBox(0,"",$toggle,1)
               EndIf
WEnd

Func toggle()
         $toggle = Not $toggle
EndFunc
页: [1]
查看完整版本: 一个热键控制程序启动和暂停 au3