成长值: 246 签到天数: 4707 天 [LV.Master]伴坛终老
|
发表于 2017/7/16 02:01
|
显示全部楼层
|Google Chrome 59.0.3071.115 |Windows 10
夏娜高级版qwer全丢
- BeginThread 线程a
- Delay 500
- BeginThread 线程b
- Delay 500
- BeginThread 线程c
- Delay 500
- BeginThread 线程d
- Delay 500
- Sub 线程a
- Hwnd = 1575712
- Rem aa
- Call Plugin.Bkgnd.KeyPress(Hwnd, 81)
- Delay 12500
- Goto aa
- End Sub
- Sub 线程b
- Hwnd = 1575712
- Rem bb
- Call Plugin.Bkgnd.KeyPress(Hwnd, 87)
- Delay 15500
- Goto bb
- End Sub
- Sub 线程c
- Hwnd = 1575712
- Rem cc
- Call Plugin.Bkgnd.KeyPress(Hwnd, 69)
- Delay 1000
- Call Plugin.Bkgnd.KeyPress(Hwnd, 69)
- Delay 15500
- Goto cc
- End Sub
- Sub 线程d
- Rem dd
- Hwnd = 1575712
- Call Plugin.Bkgnd.KeyPress(Hwnd, 82)
- Delay 80500
- Goto dd
- End Sub
复制代码
注意外面不要设置无限循环,会卡死循环,脚本已经自带循环
|
|