论坛 › 已解决问题区 › 哪位大侠进来帮下忙

madkook 发表于 2009-10-25 11:20:03

哪位大侠进来帮下忙

本帖最后由 madkook 于 2009-10-25 20:13 编辑

sleep (5000)
While 1
Send ("{ENTER}")
sleep (500)
send ("{DOWN}")
sleep (500)
send ("{ENTER}")
sleep (1000)
WEnd

如何将上面的代码 加两个热键 F5开始运行 F6停止。大侠们帮下忙，看了帮助只有暂停跟退出的代码没设置热键执行的。

rchockxm 发表于 2009-10-25 11:39:09

類似這個吧HotKeySet("{PAUSE}", "TogglePause")
Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
      sleep(100)
      ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc

madkook 发表于 2009-10-25 12:12:10

不让它一开始就运行，按热键才运行这一段该怎么写呢。

rchockxm 发表于 2009-10-25 13:57:24

3# madkook

那就是這樣吧
Global $Paused
HotKeySet("{F5}", "Start")
HotKeySet("{F6}", "Pause")

While 1
Sleep(5)
WEnd

Func Start()
Send("{ENTER}")
Sleep(500)
send("{DOWN}")
Sleep(500)
send("{ENTER}")
Sleep(1000)
EndFunc

Func Pause()
$Paused = NOT $Paused
While $Paused
    Sleep(100)
WEnd
EndFunc

madkook 发表于 2009-10-25 20:11:39

本帖最后由 madkook 于 2009-10-25 20:15 编辑

谢谢四楼的兄弟.:face (22):

查看完整版本: 哪位大侠进来帮下忙