Question

请教一名按键精灵大师！！协助做一个后台按键点击的脚本！！

如题。
Plugin hwnd=Window.Find(0,"魔兽世界")
t1=time
Rem a
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：53)按键
Plugin Bkgnd.KeyPress(Hwnd, 53)
Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：54)按键
Plugin Bkgnd.KeyPress(Hwnd, 54)
Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：55)按键
Plugin Bkgnd.KeyPress(Hwnd, 55)
Delay 2000
While DateDiff("s",t1,time)<1680
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：122)按键
Plugin Bkgnd.KeyPress(Hwnd, 122)
Delay 200
EndWhile
Delay 1000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：53)按键
Plugin Bkgnd.KeyPress(Hwnd, 53)
Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：54)按键
Plugin Bkgnd.KeyPress(Hwnd, 54)
Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：55)按键
Plugin Bkgnd.KeyPress(Hwnd, 55)
Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：56)按键
Plugin Bkgnd.KeyPress(Hwnd, 56)
这个脚本本应该在28分钟停止按f11.没有停下。求高手帮忙改改

Answer 1

朋友看下面行不，按F11没停下的原因估计是后台没接收到F11被按下的事件
两个办法：
办法一
//在句子最后面加个等侍28分钟，然后接收F11按键。
Delay 1680000
plugin Bkgnd.keypress(Hwnd,122)

办法二
//在句子中间加入判断F11是否按下的语句。
Plugin hwnd=Window.Find(0,"魔兽世界")
t1=time
Rem a,key
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：53)按键
Plugin Bkgnd.KeyPress(Hwnd, 53)

//下面加个判断F11是否按下的语句
Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：54)按键
Plugin Bkgnd.KeyPress(Hwnd, 54)

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：55)按键
Plugin Bkgnd.KeyPress(Hwnd, 55)

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 2000
While DateDiff("s",t1,time)<1680
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：122)按键
Plugin Bkgnd.KeyPress(Hwnd, 122)
Delay 200
EndWhile

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 1000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：53)按键
Plugin Bkgnd.KeyPress(Hwnd, 53)

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：54)按键
Plugin Bkgnd.KeyPress(Hwnd, 54)

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：55)按键
Plugin Bkgnd.KeyPress(Hwnd, 55)

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Delay 2000
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：56)按键
Plugin Bkgnd.KeyPress(Hwnd, 56)

Getlastkey key
If key =122
plugin Bkgnd.keypress(Hwnd,122)
endIf

Answer 2

来找我吧，跟我系统学下按键精灵，收费的，抱有免费心理的就不用来了。