Bots 自动控制发送

Bots 自动控制发送,bots,keypress,autoit,Bots,Keypress,Autoit,只是试着用键盘模拟击键。由于某种原因,它不起作用 While 1 ControlSend("PokeMMO", "", "", "{DOWN}") Sleep(900) ControlSend("PokeMMO", "", "", "{DOWN}") Sleep(900) ControlSend("PokeMMO", "", "", "{DOWN}") Sleep(900) ControlSend("PokeMMO", "", "", "a") S

只是试着用键盘模拟击键。由于某种原因,它不起作用

While 1
   ControlSend("PokeMMO", "", "", "{DOWN}")
   Sleep(900)
   ControlSend("PokeMMO", "", "", "{DOWN}")
   Sleep(900)
   ControlSend("PokeMMO", "", "", "{DOWN}")
   Sleep(900)
   ControlSend("PokeMMO", "", "", "a")
   Sleep(Random(750, 2000, 1))
   ControlSend("PokeMMO", "", "", "a")
   Sleep(Random(750, 2000, 1))
   ControlSend("PokeMMO", "", "", "a")
   Sleep(Random(750, 2000, 1))
   ControlSend("PokeMMO", "", "", "a")
   Sleep(3000)
WEnd
:

标题:МokММO,
类别:LWJGL

Global$sProcess=“javaw.exe”;波克莫法
ControlSend(_Process2Win($sProcess),“”,“”,“{DOWN}”)
Func_Process2Win($pid)
如果是字符串($pid),则$pid=ProcessExists($pid)
如果$pid=0,则返回-1
$list=WinList()
对于$i=1至$list[0][0]
如果$list[$i][0]”和BitAND(wingtstate($list[$i][1]),则
$wpid=wingtprocess($list[$i][0])
如果$wpid=$pid,则返回$list[$i][0]
恩迪夫
下一个
返回-1
EndFunc;==>_Process2Win

您可以先使用Wingthandle接收窗口的句柄,然后在ControlSend函数中使用此句柄,这应该可以正常工作。如下所示:

$handle = WinGetHandle("[TITLE:PokeMMO; CLASS:LWJGL]")
ControlSend($handle, Default, $handle, "{Down}")
首先尝试显示句柄的内容以确认您正在接收一个工作句柄。像
ConsoleWrite($handle)
MsgBox(1,“handle”,wingtitle($handle))

去,试试看;-)

祝你好运

它不起作用。我自己也试过别的东西。我更新了它!那么$handle的内容是什么?你能得到一个合适的头衔吗?
$handle = WinGetHandle("[TITLE:PokeMMO; CLASS:LWJGL]")
ControlSend($handle, Default, $handle, "{Down}")